2010-02-04 2 views
26

È possibile creare un file e scrivere righe in vbscript?Creazione e scrittura di righe su un file

Simile a echo nel file bat (echo something something >>sometextfile.txt).

Sulla esecuzione del VBScript a seconda del percorso dello script creerebbe un file autorun.inf per eseguire un particolare programma (\ smartdriverbackup \ sdb.exe).

Come è possibile rimuovere/rimuovere la lettera di unità dal percorso completo del file?

risposta

82
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) 
+0

Grazie a ghostdog74 per la risposta, ho provato lo script. Funziona. Devo inserirlo nell'applicazione effettiva. –

+0

Ho un problema nella scrittura di una riga di testo con virgolette, ad es .: questo è un "test" "stringa". Oltre a iF voglio che un valore variabile sia scritto in virgolette che non posso. –

+0

devi sfuggire alle virgolette. prova '" "" "" ' – ghostdog74

4

Avrete bisogno di occuparsi di File System Object. Vedi questo esempio di metodo OpenTextFile.

+4

@hdgarrood, se entri in una macchina e trovi che il volante è mancante o nascosto dalla vista normale, saresti un "vampiro di aiuto" se hai bisogno di aiuto? Tutti devono reinventare la ruota perché la persona precedente era troppo pigra per implementare correttamente la F1 (o forse lo fa apposta per creare la domanda di "consulenza" - sai come funziona) – Sam

+0

Ho messo in svantaggio questa risposta perché punta il richiedente direzione corretta mentre richiede ancora che lui/lei faccia un po 'di ricerca e pensiero, invece di fare tutto il lavoro per lui/lei. (Anche se mi dispiace usare la frase "aiuto vampiro") – hdgarrood

+2

Non sono qui per imparare VBScript. Sono qui per scrivere un singolo script che non fa altro che scrivere una stringa su un file e (se tutto va secondo i piani) non toccherò mai più la lingua. Se questo mi rende un "aiuto vampiro", così sia. –