Создание и запись строк в файл - PullRequest
41 голосов
/ 04 февраля 2010

Можно ли создать файл и записать в него строки в vbscript?

Что-то похожее на echo в файле bat (echo something something >>sometextfile.txt).

Вкл.выполнение сценария vbscript в зависимости от пути сценария приведет к созданию файла autorun.inf для выполнения определенной программы ( \ smartdriverbackup \ sdb.exe ).

Также как я могу удалить /удалить букву диска из полного пути к файлу?

Ответы [ 3 ]

104 голосов
/ 04 февраля 2010
Set objFSO=CreateObject("Scripting.FileSystemObject")

' How to write file
outFile="c:\test\autorun.inf"
Set objFile = objFSO.CreateTextFile(outFile,True)
objFile.Write "test string" & vbCrLf
objFile.Close

'How to read a file
strFile = "c:\test\file"
Set objFile = objFS.OpenTextFile(strFile)
Do Until objFile.AtEndOfStream
    strLine= objFile.ReadLine
    Wscript.Echo strLine
Loop
objFile.Close

'to get file path without drive letter, assuming drive letters are c:, d:, etc
strFile="c:\test\file"
s = Split(strFile,":")
WScript.Echo s(1)
6 голосов
/ 04 февраля 2010

Вам нужно будет разобраться с File System Object.Смотрите этот OpenTextFile пример метода.

2 голосов
/ 08 февраля 2019
' Create The Object
Set FSO = CreateObject("Scripting.FileSystemObject")

' How To Write To A File
Set File = FSO.CreateTextFile("C:\foo\bar.txt",True)
File.Write "Example String"
File.Close

' How To Read From A File
Set File = FSO.OpenTextFile("C:\foo\bar.txt")
Do Until File.AtEndOfStream
    Line = File.ReadLine
    WScript.Echo(Line)
Loop
File.Close

' Another Method For Reading From A File
Set File = FSO.OpenTextFile("C:\foo\bar.txt")
Set Text = File.ReadAll
WScript.Echo(Text)
File.Close
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...