Tạo và viết các dòng vào một tập tin

Question

Có thể tạo một tập tin và viết các dòng vào tập tin bằng vbscript không?

Tương tự như echo in bat tệp (echo something something >>sometextfile.txt).

Khi thực thi vbscript tùy thuộc vào đường dẫn của tập lệnh sẽ tạo tệp autorun.inf để thực thi một chương trình cụ thể (\ smartdriverbackup \ sdb.exe).

Ngoài ra làm thế nào tôi có thể loại bỏ/xóa ký tự ổ đĩa khỏi đường dẫn tệp hoàn chỉnh?

Answer 1

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) 

Answer 2

Bạn cần xử lý File System Object. Xem mẫu phương thức OpenTextFile này.