############# Pag conta.asp ##############
<%
Response.Expires = 0
Set fs = CreateObject("Scripting.FileSystemObject")
Path = server.mappath("../public/conta.txt")
Set a = fs.OpenTextFile(path)
conta = CInt(a.ReadLine)

If Session("conta")="" then
Session("conta") = conta
conta = conta + 1
a.close
Set a = fs.CreateTextFile(path, True)
a.WriteLine(conta)
End If

a.Close
Response.Write("n=" & "Visitatore N." & conta)
%>

###################################
Crei un campo di testo dinamico e gli assegni come nome di variabile n