Guten Morgen,
der "Code" besteht im Grunde aus nix anderem, weil ich das
ja wie gesagt nur teste. Aber okay ;-)
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 filtern und das Datum da rausholen
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)
Do Until objDatei.AtEndOfStream
TLine = objDatei.ReadLine
If Left(Trim(TLine),1) = "=" Then
objDatei.SkipLine
Elseif Left(Trim(TLine),1) = "P" Then
objDatei.SkipLine
Else
Response.Write objDatei.ReadLine & "<br>" & VbCrlf
End If
Loop
objDatei.Close
SET objDatei = Nothing
SET objFS = nothing
> -----Urspr�ngliche Nachricht-----
> Von: Karin Walter [mailto:[EMAIL PROTECTED]]
> Gesendet: Mittwoch, 23. Januar 2002 18:37
> An: AspGerman Kaffeehaus
> Betreff: [aspdecoffeehouse] AW: Ich stehe mal wieder auf'm Schlauch...
>
>
>
> vielleicht schickst du doch mal deinen Source, manchmal �bersieht
> man vor lauter suchen eine Kleinigkeit, weiss ich aus Eigenerfahrung ;-)
>
>
>
> lg.
> Karin
>
> > -----Urspr�ngliche Nachricht-----
> > Von: Thomas Bandt [mailto:[EMAIL PROTECTED]]
> > Gesendet: Mittwoch, 23. J�nner 2002 18:20
> > An: AspGerman Kaffeehaus
> > Betreff: [aspdecoffeehouse] AW: Ich stehe mal wieder auf'm Schlauch...
> >
> >
> > Ja klar,
> >
> > in der Theorie wie gesagt alles super, aber praktisch
> > baut er mist - und ich kann dahinter kein System er-
> > kennen.
>
>
>
> | [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
