| © Hotel Albergo La Casa sul Mare | Isola di Procida | Na | tel fax +39 081 896 87 99 |
<%
Response.Expires = 0
Set fs = CreateObject("Scripting.FileSystemObject")
Path = server.mappath("mdb-database\conta.txt")
Set a = fs.OpenTextFile(path)
conta = 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
%>
|