Ik heb een redirect met een simpele teller erin die nu schrijft in een txt bestand. Is het mogelijk om een regel aan te geven in het bestand waardoor ik meerdere tellers in hetzelfde bestand laat schrijven.
Dank je voor de genomen moeite.
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
| <%
Set fs = CreateObject("Scripting.FileSystemObject")
Path = server.mappath("test.txt")
Set a = fs.OpenTextFile(path)
counter = CInt(a.ReadLine)
If Session("counter") = "" then
Session("counter") = counter
counter = counter + 1
a.close
Set a = fs.CreateTextFile(path, True)
a.WriteLine(counter)
End If
a.Close
Response.Redirect("http://www.tweakers.net")
%> |
Dank je voor de genomen moeite.
Life is like a box of chocolate, it makes you sick.