Я ищу vbscript, который выполняет следующие задачи
Задачи сценария
выполнять при запуске компьютера,
выполняется путем помещения его в папку автозагрузки Windows вC:\Documents and Settings\Admin\Start Menu\Programs\Startup
если выходной текстовый файл существует, запишите текст и выйдите
- если текстовый файл не существует, он выводит полный пункт назначения
код такой, как предоставлен, любая помощь будет оценена
'create txt.vbs
'vbscript
Set WshShell = CreateObject("WScript.Shell")
Set objFSO = CreateObject("Scripting.FileSystemObject")
CurrentDirectory = objFSO.GetAbsolutePathName(".")
FilePath = CurrentDirectory & "\test.txt"
Existcode = objFSO.FileExists(FilePath)
' wscript.echo "FileExists code:" & Existcode
if Existcode = False then
Existcode = objFSO.FileExists(FilePath)
'for debugging
wscript.echo "file not exist" & vbCrLf _
& "FileExists code:" & Existcode
Set objFile = objFSO.CreateTextFile(FilePath,True)
strtext = "file created:" & vbCrLf & chr(34) & "New Line" & chr(34)
objFile.Write strtext & vbCrLf
objFile.Close
else
'for debugging
wscript.echo "file exist" & vbCrLf _
& "FileExists code:" & Existcode & vbCrLf & vbCrLf _
& FilePath & vbCrLf _
& CurrentDirectory & vbCrLf
end if
wscript.echo "end"
при запуске, нажав на него, либо через командный файл, сценарий работает без ошибок, и результат соответствует ожиданиям.
в то время как он выполняется из папки
startup
в окнах, он показывает все эхо, которое я установил для отладки, но не создает выходной файл и не записывает в него текст, но также он читает его как существующий, я не уверен, почему