12. august 2008 - 16:12Der er
3 kommentarer og 1 løsning
Gem resultatet (responset) fra asp side i fil
Hvordan får jeg resultatet fra en asp side, dvs. alt det jeg udskriver med response.write, til at blive skrevet til en fil?
Jeg søger efter en løsning hvor asp siden til sidst gemmer teksten i en fil og ikke en løsning hvor en anden asp side kalder siden og gemmer indholdet vha. en adodb.stream.
skriv_til_fil = skriv_til_fil & "|" & response.write("et eller andet")
og så til slut i din asp fil
arr_skriv = split(skriv_til_fil,"|") opret_fil = now() opret_fil = replace(opret_fil,"-","") opret_fil = replace(opret_fil,":","") opret_fil = replace(opret_fil," ","") opret_fil = opret_fil&".html" 'her angiver du filnavn og sti dim fs,f set fs=Server.CreateObject("Scripting.FileSystemObject") set f=fs.CreateTextFile(server.mappath(opret_fil),true) for a = 0 to ubound(arr_skriv) f.WriteLine(arr_skriv(a)) next f.WriteLine(now()) f.WriteLine
f.WriteLine Request.ServerVariables("QUERY_STRING") f.close set f=nothing set fs=nothing
Et problem med den løsning er dog at variablen skriv_til_fil kun kan indeholde en vis mængde og koden vil med sikkerhed stoppe da jeg udskriver store mængder informationer.
Hvis det skal gøres på den måde, skal der løbende skrives til filen for at undgå at variablen "overfyldes".
opret_fil = now() opret_fil = replace(opret_fil,"-","") opret_fil = replace(opret_fil,":","") opret_fil = replace(opret_fil," ","") opret_fil = opret_fil&".html" 'her angiver du filnavn og sti dim fs,f set fs=Server.CreateObject("Scripting.FileSystemObject") set f=fs.CreateTextFile(server.mappath(opret_fil),true) f.WriteLine(hver gang du har har noget fra db her)
f.close set f=nothing set fs=nothing
eller hente endnu engang fra db til slut i filen
opret_fil = now() opret_fil = replace(opret_fil,"-","") opret_fil = replace(opret_fil,":","") opret_fil = replace(opret_fil," ","") opret_fil = opret_fil&".html" 'her angiver du filnavn og sti dim fs,f set fs=Server.CreateObject("Scripting.FileSystemObject") set f=fs.CreateTextFile(server.mappath(opret_fil),true) 'hente fra db igen
f.WriteLine(hver gang du har har noget fra db her) 'slut f.close set f=nothing set fs=nothing
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.