Point til tpiil

Her er dine point!

Han hjalp med en counter, og hvis i vil have koden må i bare skrive... Koden : counter.txt:
1
counter.asp:
<%
Set fs = CreateObject(\"Scripting.FileSystemObject\")
FileName = Server.MapPath(\"counter.txt\")
Set ReadFile = fs.OpenTextFile(FileName, 1, False)
Text = ReadFile.ReadLine
Count = Text+1
Set WriteFile = fs.OpenTextFile(FileName, 2, True)
WriteFile.WriteLine(Count)
WriteFile.Close
ReadFile.Close
Set fs = Nothing
%>