Список форумов Акцент Акцент
официальный форум разработчика программы Акцент
 
 FAQFAQ   ПоискПоиск   ПользователиПользователи   ГруппыГруппы   РегистрацияРегистрация 
 ПрофильПрофиль   Войти и проверить личные сообщенияВойти и проверить личные сообщения   ВходВход 

Вопрос по VBS

 
Начать новую тему   Ответить на тему    Список форумов Акцент -> Акцент 6.0
Предыдущая тема :: Следующая тема  
Автор Сообщение
virainf



Зарегистрирован: 15.01.2009
Сообщения: 58

СообщениеДобавлено: Чт Окт 15, 2009 3:08 pm    Заголовок сообщения: Вопрос по VBS Ответить с цитатой

Как прекратить выполнение кода?
Не функции, не процедуры, а всего кода целиком!
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
olimp
Site Admin


Зарегистрирован: 10.03.2005
Сообщения: 2661

СообщениеДобавлено: Чт Окт 15, 2009 3:37 pm    Заголовок сообщения: Re: Вопрос по VBS Ответить с цитатой

virainf писал(а):
Как прекратить выполнение кода?
Не функции, не процедуры, а всего кода целиком!


Выдернуть шнур из розетки :)

Можно вопрос "развернуть" ?
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
Юров Ю.С.



Зарегистрирован: 11.03.2005
Сообщения: 383
Откуда: Павлоград

СообщениеДобавлено: Чт Окт 15, 2009 6:54 pm    Заголовок сообщения: Re: Вопрос по VBS Ответить с цитатой

virainf писал(а):
Как прекратить выполнение кода?
Не функции, не процедуры, а всего кода целиком!

Закрыть приложение, в котором этот скрипт выполняется.
Для Windows Script Host иногда очень удобно
Код:
Option Explicit

If wscript.Arguments.Count=0 Then MsgBox "Не передан аргумент" : wscript.Quit
Dim fpn : fpn=wscript.Arguments(0)
Call ChangeDateLMod(fpn)

Sub ChangeDateLMod(fpn)
  ......................


В Акценте такой подход (app.Quit) тоже работает, но действительно - что вилку из розетки вытащить, что приложение выполняющее код прекратить.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
virainf



Зарегистрирован: 15.01.2009
Сообщения: 58

СообщениеДобавлено: Пт Окт 16, 2009 9:02 am    Заголовок сообщения: Ответить с цитатой

Я так понял, что app.quit вырубает Акцент. Но мне не это надо.
Есть отчет, в котором есть процедуры, функции и т.д.
Вне процедур и функций по условию нужно остановить работу отчета.
Пока обошолся if then else.
Но просто для интереса.
Чтото типа Exit для Pascal.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
olimp
Site Admin


Зарегистрирован: 10.03.2005
Сообщения: 2661

СообщениеДобавлено: Пт Окт 16, 2009 10:54 am    Заголовок сообщения: Ответить с цитатой

virainf писал(а):
Я так понял, что app.quit вырубает Акцент. Но мне не это надо.
Есть отчет, в котором есть процедуры, функции и т.д.
Вне процедур и функций по условию нужно остановить работу отчета.
Пока обошолся if then else.
Но просто для интереса.
Чтото типа Exit для Pascal.

Если это отчет, то Close
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
virainf



Зарегистрирован: 15.01.2009
Сообщения: 58

СообщениеДобавлено: Пт Окт 16, 2009 3:12 pm    Заголовок сообщения: Ответить с цитатой

Простите, не так сформулировал вопрос.
Отчет строится модулем и пишется в Excel.
Вернуться к началу
Посмотреть профиль Отправить личное сообщение
olimp
Site Admin


Зарегистрирован: 10.03.2005
Сообщения: 2661

СообщениеДобавлено: Пт Окт 16, 2009 4:36 pm    Заголовок сообщения: Ответить с цитатой

virainf писал(а):
Простите, не так сформулировал вопрос.
Отчет строится модулем и пишется в Excel.


Просто не получится. Нужно ставить семафор и его проверять после вызова процедур, если в цикле что-то обрабатывается.

А внутри процедур
Exit Sub
Exit Function
Вернуться к началу
Посмотреть профиль Отправить личное сообщение Отправить e-mail Посетить сайт автора
Показать сообщения:   
Начать новую тему   Ответить на тему    Список форумов Акцент -> Акцент 6.0 Часовой пояс: GMT + 2
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах


Powered by phpBB © 2001, 2005 phpBB Group