probleme mit CreateTextFile

[chewbacca]

hallo,

ich habe probleme damit eine datei zu erstellen.

ich benutze folgenden code dazu:

----------------------

Dim objFileSys
           Set objFileSys = Server.CreateObject("Scripting.FileSystemObject")

Dim objTextStream
           Set objTextstream = objFileSys.CreateTextFile(Server.MapPath("./files/" & objRs.Fields("rand_id") & ".asp"))

Dim strFileContent
               strFileContent = "Hallo Welt, das ist ein Test. um genau zu sein ist dies hier ein test für die profilerstellung von " & objRs.Fields("rand_nickname") &_

objTextStream.Write (strFileContent)

objTextStream.Close

Set objTextStream = Nothing
           Set objFileSys = Nothing

----------------------

das problem ist, dass die datei zwar erstellt wird, aber leider ohne inhalt. ich vermute das es irgendwas mit der zeile "objTextStream.Write (strFileContent)" zu tun hat.

aber was?

dankbar für eure hilfe,

chewie.

[chewbacca]

habe mein problem gefunden, es war das "&_" nach
"Dim strFileContent
     strFileContent = "Hallo Welt, das ist ein Test. um genau zu sein ist dies hier ein test für die profilerstellung von " & objRs.Fields("rand_nickname")"

HA!,

trotzdem danke.