Тестовый скрипт
Код:
Код: Выделить всё
Set FSO = CreateObject("Scripting.FileSystemObject")
Set WS = CreateObject("WScript.Shell")
Set TS = FSO.CreateTextFile("D:\kuku.txt", True)
TS.Close
Do While True
Set TS = FSO.OpenTextFile("D:\kuku.txt", 8)
a = CStr(Now)
TS.WriteLine CStr(a)
TS.Close
If WS.Popup(a, 10, "Test", 1) = 2 Then Exit Do
LoopWindows Server 2003. В назначенных заданиях он запускается не от имени пользователя, который вошел в систему. В файл D:\kuku.txt записывается каждые 10 сек время
.