Hejsan Kan nogen gennemskue hvorfår dette ikke virker: <% pgm = request.querystring("pgm") P = Request.ServerVariables("appl_physical_path") & "asp\" & pgm response.write("<br>" & P & "<br>" ) Set fso = CreateObject("Scripting.FileSystemObject") set f = fso.OpenTextFile("c:\test2.txt", 1, true) t = "" do while not f.eof t = t & f.ReadLine loop response.write(t) f.close set f = nothing set fso = nothing %> Fejlen der kommer er: Der opstod en Microsoft VBScript-kørselsfejl (0x800A01B6) Objektet understøtter ikke denne egenskab eller metode: 'eof' /Glo.asp, line 10
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Som læser alle linier i filen, så vil dit script se således ud: <% pgm = request.querystring("pgm") P = Request.ServerVariables("appl_physical_path") & "asp\" & pgm response.write("<br>" & P & "<br>" ) Set fso = CreateObject("Scripting.FileSystemObject") set f = fso.OpenTextFile("c:\test2.txt", 1, true) t = f.readall response.write(t) f.close set f = nothing set fso = nothing %>
Ja det havde da en virkning. Men hvad jeg ikke skrev er at indholdet af filen er vb-script kode - et asp program. Hvad gør jeg for at få linierne i programmet ud i browseren som ren tekst og ikke som det sker nu, at asp-koden forsøges fortolket.
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.