crayon-syntax-highlighter/util/sample/asp.txt

7 lines
194 B
Plaintext
Raw Permalink Normal View History

2019-08-30 19:30:19 +02:00
Set FS=Server.CreateObject("Scripting.FileSystemObject")
Set RS=FS.OpenTextFile(Server.MapPath("counter.txt"), 1, False)
fcount=RS.ReadLine
RS.Close
fcount=fcount+1
Set RS=Nothing
Set FS=Nothing