Ciao ragazzi avevo inserito su di un sito un contatore visite. Il numero di visite ha superato il numero 32766. Adesso quando mi collego al sito mi dà questo errore:
Errore di run-time di Microsoft VBScript error '800a0006'
Overflow: 'CInt'
/includes/inc_header1.asp, line 6
Inserisco qui sotto il codice del contatore:
<%
Response.Expires = 0
Set fs = CreateObject("Scripting.FileSystemObject")
Path = server.mappath("cgi-bin/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
%>
Rispondi quotando
