webForumDet fria alternativet

Spara i .txt fil?

ASP

7 svar · 274 visningar · startad av asp

Medlem sedan aug. 2002733 inlägg
Frågan#1

Hej, jag läser ur .txt med:

Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objTS = objFSO.OpenTextFile(Server.MapPath("fil.txt"))

Resose.Write(objTS.ReadAll)

Men om jag vill spara t.ex. strängarna strNamn och strOrt i fil.txt så det ser ut såhär i .txt dokumentet:

Före:

Johan Mellberg Göteborg
Karl Karlsson Karlsund

Efter:

Johan Mellberg Göteborg
Karl Karlsson Karlsund
Sven Svensson Sverige

Tack på förhand!

Medlem sedan dec. 200012 464 inlägg
#2
Const  forAppend = 3
    Dim fs, f
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.OpenTextFile(Server.MapPath("fil.txt"), forAppend,TristateFalse)
    f.Write strNamn & " " & strOrt 
    f.Close
Medlem sedan aug. 2002733 inlägg
#3
Error Type:
Körningsfel i Microsoft VBScript (0x800A0005)
Ogiltigt proceduranrop eller argument.
/marcus/rapport/default.asp, line 8

Rad 8:

Set f = fs.OpenTextFile(Server.MapPath("fil.txt"), forAppend,TristateFalse)
Medlem sedan dec. 200012 464 inlägg
#4
Const  forAppend = 8
    Dim fs, f
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.OpenTextFile(Server.MapPath("fil.txt"), forAppend)
    f.Write strNamn & " " & strOrt 
    f.Close

(Jag tog exemplet direkt fråm MSDN. Dokumentatören har tydligen slarvat. ;))

Medlem sedan aug. 2002733 inlägg
#5

det fungerar nu iaf =)

Medlem sedan mars 20023 561 inlägg
#6

asp skrev:

det fungerar nu iaf =)

Markera då gärna det hjälpande inlägget som "Acceptera som slutgiltigt svar".

Medlem sedan aug. 2002733 inlägg
#7

Tack Josef!

Medlem sedan aug. 2002733 inlägg
#8

inget

280 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
144 ms — deklarationer (db)
0 ms — hämta statistik (cache)
132 ms — hämta tråd, inlägg och bilagor (db)
144 ms — ändringar (db)