Function GetFile(path) Set FS = Server.CreateObject(\"Scripting.FileSystemObject\") Set F = FS.OpenTextFile(path) If F.AtEndOfStream = False Then GetFile = F.ReadAll End If F.Close Set FS = Nothing End Function
Kald den med GetFile(\"d:\\www\\site\\fil.ext\") så returnerer den indholdet af filen.
theartist>..som skrevet: \"..fil, der ikke ligger i en web-tilgængelig folder\"
bjarke-b> virker ikke
dudal> Der er ASP-kode i filen som skal eksekveres. Filen indeholder en tekststren, som skal bruges i et Array...måske har du et bud til dette. Evt. finde første linie i filen, og fylde array\'et med den - ku\' du lave lidt kode til det?
no_doubt>..som skrevet: \"..fil, der ikke ligger i en web-tilgængelig folder\"
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.