ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Windows [игнор отключен] [закрыт для гостей] / Vbscript - ограничения
18 сообщений из 18, страница 1 из 1
Vbscript - ограничения
    #37345883
vbscript22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbscript22
Гость
Добрый день.
Написал скрипт, который получает определённые файлики из почты, распаковывает их и складывает в определённую папку.

Распаковака осуществляется утилитой unzip.exe

Почему-то распаковывается только 25 файлов и утилита виснет. дальше скрипт не отрабатывает.
Виснет не только unzip.exe, но и утилита рашифровки файлов. тоже отрабатывает только 25 файлов.

из-за чего это может быть и как с этим бороться?

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
...
' запустим утилиту получения почты
Set oExec = WshShell.Exec("T9Net.exe POP3 param.scn /e:error.log")

Do While oExec.Status =  0 
     WScript.Sleep  100 
Loop

' распакуем архивы
Set oExec = WshShell.Exec("unzip.exe -o " & lTempPath & "\*" &lDay & lMonth & lYear & "*.zip -d " & lTempPath)

Do While oExec.Status =  0 
     WScript.Sleep  100 
Loop

FSO.CopyFile lTempPath & "\*.xml", lFullDestinationPath, true
If Not FSO.FolderExists(lTempPath & "\Archive") Then 
	FSO.CreateFolder(lTempPath & "\Archive")
 End If
FSO.MoveFile lTempPath & "\*.xml", lTempPath & "\Archive" 
FSO.DeleteFile lTempPath & "\*.*"
...
Рейтинг: 0 / 0
11.07.2011, 11:51
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37345957
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Anatoly Podgoretsky
Участник
Следует ли тебя понимать, что автономная процедура распаковки тоже виснет?
...
Рейтинг: 0 / 0
11.07.2011, 12:15
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37345969
vbscript22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbscript22
Гость
Anatoly PodgoretskyСледует ли тебя понимать, что автономная процедура распаковки тоже виснет?

автономная - это какая?
...
Рейтинг: 0 / 0
11.07.2011, 12:24
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346005
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Anatoly Podgoretsky
Участник
Что это значит
авторВиснет не только unzip.exe, но и утилита рашифровки файлов
...
Рейтинг: 0 / 0
11.07.2011, 12:43
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346008
vbscript22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbscript22
Гость
Anatoly PodgoretskyЧто это значит
авторВиснет не только unzip.exe, но и утилита рашифровки файлов

в скрипте так же пытаюсь ещё расшифровывать полученные файлы

Код: plaintext
1.
2.
3.
4.
5.
6.
' расшифруем файлы
Set oExec = WshShell.Exec("vdcmd.exe d " & lTempPath & "\*" &lDay & lMonth & lYear & "*.p7e")

Do While oExec.Status =  0 
     WScript.Sleep  100 
Loop

расшифровка тоже виснет после 25-го файла.
...
Рейтинг: 0 / 0
11.07.2011, 12:46
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346017
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Anatoly Podgoretsky
Участник
Хм, теперь уже совсем другой скрипт.
Сделай vdcmd.exe d Path.p7e
или тоже с unzip
...
Рейтинг: 0 / 0
11.07.2011, 12:50
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346044
vbscript22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbscript22
Гость
Anatoly PodgoretskyХм, теперь уже совсем другой скрипт.
Сделай vdcmd.exe d Path.p7e
или тоже с unzip

почему другой?
такой же.

эти обе утилиты (unzip.exe и vdcmd.exe ), если их запускать из vbscript'a почему-то обрабатывают только 25 файлов.
Если их запускать просто из командной строки, то всё отрабатывает нормально.
...
Рейтинг: 0 / 0
11.07.2011, 13:02
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346046
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Anatoly Podgoretsky
Участник
Покажи пример вызова из командной строки
...
Рейтинг: 0 / 0
11.07.2011, 13:03
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346078
vbscript22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbscript22
Гость
Anatoly PodgoretskyПокажи пример вызова из командной строки

Код: plaintext
1.
C:\Temp\unzip.exe -o C:\Temp\Logs\*.zip -d C:\Temp\Logs\
...
Рейтинг: 0 / 0
11.07.2011, 13:18
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346085
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Anatoly Podgoretsky
Участник
Не соответствует тексту скрипта, если это работает, то проблема может быть с переменными скрипта.
...
Рейтинг: 0 / 0
11.07.2011, 13:21
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346090
vbscript22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbscript22
Гость
Anatoly PodgoretskyНе соответствует тексту скрипта, если это работает, то проблема может быть с переменными скрипта.

Оно бы тогда совсем не работало бы, нет? почему только 25 файлов??
с переменными всё ок.
...
Рейтинг: 0 / 0
11.07.2011, 13:24
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346097
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Anatoly Podgoretsky
Участник
Это слова, а вот значения скрыты, нам видимо ни к чему их знать.
...
Рейтинг: 0 / 0
11.07.2011, 13:27
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346098
vbscript22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbscript22
Гость
Anatoly Podgoretsky,

Код: plaintext
1.
2.
3.
4.
5.
lTempPath = "C:\Temp\Logs\"
lDay = Right("0" & DatePart("d", now - lDayOffSet),  2 )
lMonth = Right("0" & DatePart("m", now - lDayOffSet),  2 )
lFullYear = DatePart("yyyy", now - lDayOffSet)
lYear  = Right(DatePart("yyyy", now - lDayOffSet),  2 )
...
Рейтинг: 0 / 0
11.07.2011, 13:30
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346111
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Anatoly Podgoretsky
Участник
Спасибо, но уже неинтересно, тем более что опять не полный список.
Теперь себя сам упрашивай.
...
Рейтинг: 0 / 0
11.07.2011, 13:36
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346113
bazile
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
bazile
Участник
vbscript22,

Попробуй использовать метод Run вместо Exec и цикла со Sleep.
...
Рейтинг: 0 / 0
11.07.2011, 13:37
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346116
vbscript22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbscript22
Гость
Anatoly Podgoretsky,

и Вам спасибо
...
Рейтинг: 0 / 0
11.07.2011, 13:38
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37346125
vbscript22
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
vbscript22
Гость
bazilevbscript22,

Попробуй использовать метод Run вместо Exec и цикла со Sleep.

спасибо! с Run отрабатывает полностью
...
Рейтинг: 0 / 0
11.07.2011, 13:47
| Ответить | Цитировать | Написать  
Vbscript - ограничения
    #37397595
Ficoos
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Ficoos
Гость
vbscript22,

тоже задачку поставили принять почту, выгрузить, расшифровать, распаковать, снять с подписи и потом полученый файл вложить в искомое почтовое сообщение и отослать пользователю уведомление со ссылкой на почтовое сообщение о том, что вложение обработано. С выгрузкой и распаковкой разобрался, а с расшифровкой и снятие с подписи утилитой vdcmd.exe _ что-то никак не получается. Конечно ключей нет, да и кто их даст. Нужен просто синтаксис
...
Рейтинг: 0 / 0
16.08.2011, 13:24
| Ответить | Цитировать | Написать  
18 сообщений из 18, страница 1 из 1
Форумы / Windows [игнор отключен] [закрыт для гостей] / Vbscript - ограничения
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=26&msg=37397595&tid=1497891]:
 0ms
get settings:
 10ms
get forum list:
 19ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 49ms
get topic data:
 13ms
get forum data:
 3ms
get page messages:
 66ms
get tp. blocked users:
 1ms
others: 256ms
total:  423ms
созд. / загр.: 423ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]