nicht angemeldet
Ich habe folgendes script:
***********************************
Set FSO = CreateObject("Scripting.FileSystemObject")
Set Name = FSO.OpenTextFile("C:\Dokumente und Einstellungen\T. Hintermann\Desktop\bla\text1.txt")
Set Name2=FSO.CreateTextFile("C:\Dokumente und Einstellungen\T. Hintermann\Desktop\bla\text2.txt")
do until Name.AtEndOfStream
line=Name.readLine
If InStr(line, "insured") Then
line = Replace(line, "insured", "")
End If
Name2.writeLine line
loop
Name.close
Name2.close
************************************************
das script suche mit in text 1 zeile für zeile nach insured. wenn es das gefunden hat schreibt er in diesem fall nichts in die zeile, es entsteht dann sozusagen eine lücke. wie kann ich das übergehen, dass er sozusagen die zeile löscht?