Мониторинг входа/выхода пользователей - VB
Формулировка задачи:
Нужно написать скрипт,который записывал бы время,дату и имя компьютера в txt файл,сразу же после выполнения входа в ОС.
Решение задачи: «Мониторинг входа/выхода пользователей»
textual
Листинг программы
Set fs = CreateObject("Scripting.FileSystemObject").OpenTextFile(Replace(WScript.ScriptFullName, WScript.ScriptName, "") & "1.txt", 8 ,True , -2) fs.WriteLine CreateObject("WScript.Network").ComputerName & " " & Cstr(Now) : fs.Close