VaskoCuturil
30.11.2010, 14:48
Здравствуйте .
Проблема в следующем перестал работать лог скрипт через групповую политику он уменя реализован как VBS скрипт вот код скрипта:
Set WshShell = CreateObject("WScript.Shell")
Set FSO = CreateObject("Scripting.FileSystemObject")
CompName = WshShell.ExpandEnvironmentStrings("%COMPUTERNAME%")
Set NewsFile = FSO.OpenTextFile("\\Server\LOG$" + CompName + ".txt",8,True)
strFilename = Date & " " & Time
NewsFile.WriteLine(strFilename)
RetCode = WshShell.Run("regedit -s \\Server\Scripts$\Рарус.reg", 0, True)
NewsFile.WriteLine("Set Raruse's base "& Time)
RetCode = WshShell.Run("regedit -s \\Server\Scripts$\Proxy.reg", 0, True)
NewsFile.WriteLine("Set Proxy "& Time)
RetCode = WshShell.Run ("\\Server\Scripts$\Printers.vbs", 0, True)
NewsFile.WriteLine("Set Printer settings "& Time)
NewsFile.Close
Он постоянно при выполнении ругается на NewsFile .. .в чем проблема что не так ???
Проблема в следующем перестал работать лог скрипт через групповую политику он уменя реализован как VBS скрипт вот код скрипта:
Set WshShell = CreateObject("WScript.Shell")
Set FSO = CreateObject("Scripting.FileSystemObject")
CompName = WshShell.ExpandEnvironmentStrings("%COMPUTERNAME%")
Set NewsFile = FSO.OpenTextFile("\\Server\LOG$" + CompName + ".txt",8,True)
strFilename = Date & " " & Time
NewsFile.WriteLine(strFilename)
RetCode = WshShell.Run("regedit -s \\Server\Scripts$\Рарус.reg", 0, True)
NewsFile.WriteLine("Set Raruse's base "& Time)
RetCode = WshShell.Run("regedit -s \\Server\Scripts$\Proxy.reg", 0, True)
NewsFile.WriteLine("Set Proxy "& Time)
RetCode = WshShell.Run ("\\Server\Scripts$\Printers.vbs", 0, True)
NewsFile.WriteLine("Set Printer settings "& Time)
NewsFile.Close
Он постоянно при выполнении ругается на NewsFile .. .в чем проблема что не так ???