Met onderstaand scriptje probeer ik in het bestand test.txt alle 0 te vervangen voor 1. Ik krijg geen foutmelding maar het vervangen gaat ook niet goed. Wie weet wat ik hier fout doe.
Zoals jullie zien ben ik nog een beginner, wie weet een goeie manier om de VB taal onder de knie te krijgen, sites, boeken???
Script:
dim oFile, oSrcFile, oDestFile, sLine
Set oFile = CreateObject("Scripting.FileSystemObject")
Set oSrcFile = oFile.OpenTextFile("c:\test.txt", 1, false)
Replace oScrFile, "0" , "1"
oSrcFile.Close
set oSrcFile = Nothing
Set oFile = Nothing
Zoals jullie zien ben ik nog een beginner, wie weet een goeie manier om de VB taal onder de knie te krijgen, sites, boeken???
Script:
dim oFile, oSrcFile, oDestFile, sLine
Set oFile = CreateObject("Scripting.FileSystemObject")
Set oSrcFile = oFile.OpenTextFile("c:\test.txt", 1, false)
Replace oScrFile, "0" , "1"
oSrcFile.Close
set oSrcFile = Nothing
Set oFile = Nothing