Counter-kode og visning adskilt!
Jeg har lavet en counter vha. asp, du én af mine hjemmesider. På en anden hjemmeside, der ikke understøtter asp, ønsker jeg at benytte counteren, dvs "linke" til den som f.eks chart.dk og bravenet.com gør det. Men hvordan kan dette lave sig gøre??Link til counteren:
www.autocarelemvig.dk/counter.asp
Jeg ville gerne have de to (eller flere) oplysninger til at stå i en lille tabel på f.eks www.aed.dk
Uddrag af koden fra counter.asp:
<body>
<%
strCount = Request.Cookies("count")
Set fs = CreateObject("Scripting.FileSystemObject")
Wfile = Server.MapPath("aspcounter.txt")
Set a = fs.OpenTextFile(Wfile)
hits = Clng(a.ReadLine)
hits = hits + 1
a.close
Set a = fs.CreateTextFile(Wfile,True)
a.WriteLine(hits)
a.Close
Wfile = Server.MapPath("aspunique.txt")
Set a = fs.OpenTextFile(Wfile)
uniq = Clng(a.ReadLine)
If strCount = "" Then
uniq = uniq + 1
a.close
Set a = fs.CreateTextFile(Wfile,True)
a.WriteLine(uniq)
a.Close
End If
Response.Write "Hits: " & hits & "<br>"
Response.Write "Unik: " & uniq & "<br>"
Response.Write "Cookie: " & strCount
Response.Cookies("count") = "12hr"
Response.Cookies("count").Expires = dateAdd("h",10,Now())
%>
</body>
