Asp log 1.0 (if necessary)
with this code can be written log file from asp page
AI
AI-sammanfattning: This codebase represents a historical implementation of the logic described in the metadata. Our preservation engine analyzes the structure to provide context for modern developers.
Källkod
sub writelog(lstr1)
dim fs,fname
set fs=Server.CreateObject("Scripting.FileSystemObject")
If not (fs.FileExists("logasp.txt"))=true Then
set fname=fs.CreateTextFile("logasp.txt",true)
fname.WriteLine(lstr1)
fname.Close
else
dim f
set f=fs.OpenTextFile("logasp.txt",8,true)
f.WriteLine(lstr1)
f.Close
set f=Nothing
end if
set fname=nothing
set fs=nothing
end sub
Originalkommentarer (3)
Återställd från Wayback Machine