При отработке скриптом schtasks получаю error C:\WINDOWS\system32\kernel32.dll - VB
Формулировка задачи:
Здравствуйте Уважаемые! Столкнулся вот с какой проблемой:
1. Скрипт, задача которого собирать инфу об установленном оборудовании во всей сетке(ЮФО, без ростова). Он был написан давным давно, работал, перестал. Я его подправил, насколько смог изучить VB.
Скрипт)):
2. Батник, создающий в планировщике на каждом компе задачу, которая запускает программу мониторинга, запускается из скрипта.
BAT-ник:
3. Если убрать из батника путь, параметр /S с переменной, скрипт и батник отрабатывают на ура, НО, только на локальном компе т.е. сервере. Т.е. задача создаётся, в определённое время, отрабатывает, но только на серве. путь с переменной вставляешь и получаем
error C:\WINDOWS\system32\kernel32.dll press any key
Система серва 2003, остальные машины XP, 7-ка, пара вист. DEP антивирус и файрволл на серве отключал.
гугль раскурил так, что даже фильтра не осталось, да и специфические форумы пока не помогли, сайт microsoft тоже не помогает
З.Ы. только учусь в этом направлении, если код покажется бредом, извиняйте
Решение задачи: «При отработке скриптом schtasks получаю error C:\WINDOWS\system32\kernel32.dll»
textual
Листинг программы
sPC="pc4"
Set objWMI = GetObject("WinMgmts:{impersonationLevel=impersonate}!\\" & sPC & "\Root\CIMV2")
Set colItems = objWMI.ExecQuery("Select * from Win32_OperatingSystem" )
sCmd="schtasks /create /tn ""Имя задачи"" /tr """"{Путь к задаче}"""" /SC weekly /D MON,TUE,WED,THU,FRI /st 13:30:00 /ru {Юзер} /rp {Парооль} > c:\taskshed.log"
msgbox sCmd
Set objProcess = objWMI.Get("Win32_Process")
Set objProgram = objProcess.Methods_( _
"Create").InParameters.SpawnInstance_
objProgram.CommandLine = sCmd
Set strShell = objWMI.ExecMethod( "Win32_Process", "Create", objProgram)