Показать сообщение отдельно
Старый 23.11.2005, 14:54     # 10
LightImage
Junior Member
 
Регистрация: 16.10.2002
Адрес: Россия-матушка
Пол: Male
Сообщения: 96

LightImage Нимб уже пробиваетсяLightImage Нимб уже пробивается
Nicodim
VBS вполне стандартный способ, и является средством винды начиная кажется с win98 =) Чуть уточню только вызов скрипта, приведенного в _http://aboutwin.pp.ru/fido7.ru.windows.f2000/14888.html
Код:
cscript Delay.vbs /E:C:\Windows\Notepad.exe /D:10
или
Код:
wscript Delay.vbs /E:C:\Windows\Notepad.exe /D:10
В свое время для себя я написал скрипт, который просто выжидает нужное время, назвав его так же delay.vbs:
Код:
Option Explicit
Const cdefpause = 10
Dim pause, argvobj
 Set argvobj = WScript.Arguments
 if argvobj.Count < 1 then
  pause=cdefpause
 else
  pause=CLng(argvobj(0))
 end if

 Wscript.Echo WScript.ScriptName & ": Задержка выполнения на " & pause & " секунд"
 MyPause(pause)

sub MyPause(delay)
dim st
 st = now
 do while datediff("s", st, now) < delay
 loop
end sub
(про WScript.Sleep я тогда не знал=))
Из батника вызываю так:
Код:
cscript /nologo delay.vbs 300
__________________
1 миллибайт = 1/1024 байта

Последний раз редактировалось LightImage; 23.11.2005 в 15:17.
LightImage вне форума