Noch eine kurze Frage:

wie kann ich die "Zeilen" nun noch einmal splitten? Komme
da auf keinen gr�nen Zweig

> -----Urspr�ngliche Nachricht-----
> Von: Thomas Bandt [mailto:[EMAIL PROTECTED]]
> Gesendet: Donnerstag, 24. Januar 2002 11:40
> An: AspGerman Kaffeehaus
> Betreff: [aspdecoffeehouse] AW: RE: AW: RE: AW: RE: AW: Ich stehe mal
> wieder auf'm Schlauch...
>
>
>
> > Und wie sieht die L�sung jetzt aus?
>
> so:
>
> strDateiname = Request.ServerVariables("APPL_PHYSICAL_PATH") &
> "\data\15_0_0.txt"
> SET objFS = Server.CreateObject("scripting.FileSystemObject")
> SET objDatei = objFS.OpenTextFile(strDateiname,1,true)
>
> Betreff_0 = objDatei.Readline
> Betreff_1 = Split(Betreff_0," ")
> Betreff_2 = Split(Betreff_1(1),"-")
> Datum = Betreff_2(2) & "." & Betreff_2(1) & "." & Betreff_2(0)
>
> ObenAb = 1 : UntenAb = 1
> Zeilen = split(objDatei.readAll(),vbCrLf)
> For i = ObenAb To ubound(Zeilen)-UntenAb
>       Response.write Datum & " " & Zeilen(i) & "<br>"
> Next
>
> objDatei.Close
> SET objDatei = Nothing
> SET objFS = nothing
>
>
> | [aspdecoffeehouse] als [EMAIL PROTECTED] subscribed
> | http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
> | Sie k�nnen sich unter folgender URL an- und abmelden:
> | http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp
>


| [aspdecoffeehouse] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdecoffeehouse/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdecoffeehouse.asp

Antwort per Email an