Crear y escribir líneas en un archivo

Question

¿Es posible crear un archivo y escribir líneas en vbscript?

Algo similar a echo en el archivo bat (echo something something >>sometextfile.txt).

Al ejecutar el vbscript, según la ruta del script, se crearía un archivo autorun.inf para ejecutar un programa en particular (\ smartdriverbackup \ sdb.exe).

Además, ¿cómo puedo quitar/quitar la letra de la unidad de la ruta completa del archivo?

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

Deberá tratar con File System Object. Consulte esta muestra del método OpenTextFile.