bin gerade etwas von der rolle und muss zudem noch mit
meinem liebling, dem fso k�mpfen :-/
und zwar hab ich nen txtfile an welches, wenns existiert,
ne zeile drangeh�ngt werden soll...
mit nachfolgendem code bringe ich aber lediglich dem server
zum absturz...
hat jemand nen snipplet zur hand?
If FSO.FileExists(strFile) Then
Set CurrentFile =
FSO.OpenTextFile(strFile,1,True)
Do While Not CurrentFile.AtEndOfStream
If CurrentFile.AtEndOfStream =
True Then
CurrentFile.WriteLine(VbCrlf & strBestellung)
End If
Loop
Set CurrentFile = Nothing
Else
Set NewFile = FSO.CreateTextFile(strFile)
NewFile.WriteLine(strBestellung)
Set NewFile = Nothing
End If
gru�, thomas
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
