Форум программистов, компьютерный форум, киберфорум
VBScript/JScript/WSH/WMI
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.86/7: Рейтинг темы: голосов - 7, средняя оценка - 4.86
0 / 0 / 0
Регистрация: 09.06.2017
Сообщений: 5

Дядюшка Эксель и другие мелкие родственники не возвращаются домой

10.06.2017, 09:48. Показов 1371. Ответов 3
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Вопрос ниже после примеров, пишу на маленьком экране и не получается привести к нормальному виду


Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
RetCode = WshShell.Run("C:\PROGRA~1\MICROS~1\OFFICE14\EXCEL.EXE /r C:\SAS\bin\UTF-8.xlsm", 1, True)
 
with CreateObject("Excel.Application")
    .WorkBooks.Open("C:\SAS\bin\UTF-8.xlsm")
    .Run "Auto_Open"
    .Quit
end with
 
Set appAccess = CreateObject("Access.Application")
appAccess.Visible = True
appAccess.OpenCurrentDatabase("C:\SAS\BIS_BM_Access\Access_BIS_BM.accdb")
appAccess.DoCmd.RunMacro ("full_result_bis")
WScript.Echo "Возвратился скотина..."
appAccess.CloseCurrentDatabase 
appAccess.Quit
Прошу извинить за вольности в теме, вопрос по существу.

Ну никак не возвращаются приложения Офиса и не только они в срипт после правильного вызова и такой же отработки. Нет ни ошибок, ни чего другого - приложение отработало, дало верные результаты в файл и все, скрипт пропал. Из за этого приходится делить скрипт, подбирать результаты из файла для дальнейшего прохождения и тп. Вот несколько примеров:

Добавлено через 21 час 16 минут
Немного добавлю - не возвращаются это значит, что скрипт самопроизвольно завершается после того как вызванное приложение отработало. Так, в третьем примере сообщение никогда не выводится. Кроме приведенных примеров то же самое при вызова SAS Enterprise Guide (своим собственным vbs кодом), SQL Assistant (через метод WshShell.Run). А вот консольный архиватор 7z ну просто отлично крутится.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
10.06.2017, 09:48
Ответы с готовыми решениями:

Богатый дядюшка
Богатый дядюшка подарил мне 1 доллар в мой первый день рождения. В каждый следующий день рожденье он удваивал сумму подарка и прибавлял к...

Богатый дядюшка
Мой богатый дядюшка подарил мне один доллар на мой первый день рождения. В каждый следующий день рождения он удваивал свой прошлогодний...

Богатый дядюшка и сумма на N ДР
Добрый день. Помогите пожалуйста решить задачу: Мой богатый дедушка на день рождения дарил мне столько долларов, сколько лет мне...

3
0 / 0 / 0
Регистрация: 09.06.2017
Сообщений: 5
14.06.2017, 21:00  [ТС]
Все оказалось просто, если найти ларчик (который просто открывается, когда его найдешь). Причина - таймаут серверов wscript/cscript по умолчанию, установленный на моей рабочей машине. Вместо бесконечности он оказался равен 100 (!!!) секунд. Придется открывать новый пост как с этим бороться.
0
Эксперт WindowsАвтор FAQ
 Аватар для Dragokas
18030 / 7733 / 892
Регистрация: 25.12.2011
Сообщений: 11,502
Записей в блоге: 16
16.06.2017, 17:56
Лучший ответ Сообщение было отмечено SerhKh как решение

Решение

Нажмите Win + R, введите:
Windows Batch file
1
WScript
откроется окно. Там есть таймаут.

Или напишите в коде скрипта:
Windows Batch file
1
WScript.Timeout = 0
Можно ещё здесь посмотреть:
HKLM\Software\Microsoft\Windows Script Host\Settings
HKCU\Software\Microsoft\Windows Script Host\Settings
Для обхода таймаута в индивидуальных скриптах, можно их вызывать с ключиком /T
Windows Batch file
1
wscript 1.vbs //T:0
1
0 / 0 / 0
Регистрация: 09.06.2017
Сообщений: 5
17.06.2017, 10:06  [ТС]
Спасибо, Dragokas. Именно в реестре в Settings таймаут оказался выставленным на 100 сек. Я с помощью коллеги нашел это почти сразу, на следующий день как понял что это таймаут. Поменял его на 0 и все стало прекрасно. Спасибо вам большое за точные и правильные рекомендации.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
17.06.2017, 10:06
Помогаю со студенческими работами здесь

Автоматизация переноса значений из одного документа в эксель в другой эксель
Мне необходимо из таблицы перенести все данные в акта. На каждую строчку таблицы необходим отдельный акт, всего в таблице более 200 строк...

Почему при открытии файла эксель, появляется из фонового скрытого режима мой файл эксель
Добрый день уважаемые форумчане, столкнулся с такой проблеммой. Есть небольшая программка которая при запуске и нажатии кнопки запускает...

Создать БД "Родственники" в Паскале
Доброе время суток! Нужна помощь в решении следующей задачи: "Разработать базу данных «Список родственников» (фамилия, имя, отечество,...

задали домой
помогите решить плиз... 1.Вычислите частичную сумму ряда S=1+1/2+1/4+1/8+... Вычисления прекратите, когда модуль очередного слагаемого...

Дорога домой
Возвращаясь домой, после захватывающей игры в гостях у Винни Пуха, ослик Иа решил немного прогуляться. Поскольку во время прогулки он все...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Новые блоги и статьи
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
Расчёт переходных процессов в цепи постоянного тока
igorrr37 16.01.2026
/ * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит переходные токи и напряжения на элементах схемы. . . .
Восстановить юзерскрипты Greasemonkey из бэкапа браузера
damix 15.01.2026
Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .
Сукцессия микоризы: основная теория в виде двух уравнений.
anaschu 11.01.2026
https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/
WordPad для Windows 11
Jel 10.01.2026
WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .
Classic Notepad for Windows 11
Jel 10.01.2026
Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .
Почему дизайн решает?
Neotwalker 09.01.2026
В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru