Hi Karin,
> Set LogObject =
> Server.CreateObject("Scripting.FileSystemObject")
> Set TextLog = LogObject.OpenTextFile(strPhysPath, 1, false)
>
> Do Until TextLog.AtEndOfStream
> if Left(Trim(TextLog.ReadLine),1) = "#" then
> TextLog.SkipLine
> else
> Zeile = Zeile + 1
> response.write(TextLog.ReadLine&"<br>")
> end if
>
> loop
> response.write(Zeile)
Da bin ich auch schon reingefallen :-)
Bei der If Anweisung verwendest Du ja schon "TextLog.ReadLine". Damit
springt er schon eine Zeile weiter. Ist es kein Kommentar, liest Du wieder
mit "TextLog.ReadLine" aus. Also wieder ein Zeilensprung.
Workaround:
Benutze eine Variable und weise Ihr die Zeile zu:
sLine = TextLog.ReadLine
Die Abfrage und Ausgabe dannn nur noch mit der Variable.
Ciao
Buchi
| [aspgerman] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp
