[VBSCRIPT] OpenTextFile

[me1299]

Ik probeer met vbscript een bestand te openen en daarna iets toe te voegen.

code:

dim a
dim fs
dim Filename
Filename="c:\boot.ini"

Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile(Filename, 8)

a.Write(" /sos")
a.Close

Maar nu print hij /sos op de volgende regel. Weet iemand hoe ik ervoor kan zorgen dat hij het achter de laatste regel print en niet op een volgende regel begint?

[ Voor 5% gewijzigd door me1299 op 12-10-2003 17:23 ]

[Limhes]

2 mogelijkheden:
• Lees eerst alles in, haal de laatste vbNewline weg, plak je eigen tekst erachter en schrijf alles weer weg naar 't bestand
• Print een backspace voor de rest van de tekst: a.Write( chr( 8 ) & "bla" )

Weet niet of het laatste werkt, maar is wel makkelijker als het werkt.

[ Voor 11% gewijzigd door Limhes op 12-10-2003 17:32 ]