vlazari
27-06-2006, 11:54
Нужен скрипт, который будет запускаться при загрузке компьютера и искать файл rasphone.pbk (Настройки подключения DialUp). В этом файле необходимо иногда что-то менять (номер дозвона, настройки ...). Сам скрипт для изменения файла есть (см. ниже). Пользователи не имеют права на изменение файла в своём профиле (запрещено политиками). Каким образом в него можно добавить поиск этого файла в профилях всех пользователей компьютера?
----------------------
Const ForReading = 1
Const ForWriting = 2
strFileName = Wscript.Arguments(0)
strOldText = Wscript.Arguments(1)
strNewText = Wscript.Arguments(2)
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(strFileName, ForReading)
strText = objFile.ReadAll
objFile.Close
strNewText = Replace(strText, strOldText, strNewText)
Set objFile = objFSO.OpenTextFile(strFileName, ForWriting)
objFile.WriteLine strNewText
objFile.Close
---------------------
----------------------
Const ForReading = 1
Const ForWriting = 2
strFileName = Wscript.Arguments(0)
strOldText = Wscript.Arguments(1)
strNewText = Wscript.Arguments(2)
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile(strFileName, ForReading)
strText = objFile.ReadAll
objFile.Close
strNewText = Replace(strText, strOldText, strNewText)
Set objFile = objFSO.OpenTextFile(strFileName, ForWriting)
objFile.WriteLine strNewText
objFile.Close
---------------------