Erro Exception Occurred.

[Leo-Flash]

Meu problema é o seguinte.. tenho um script que conta o numero de acessos de um arquivo, porém quando envio alguns arquivos que clico para baixar ele da esse erro:

Error Type:

(0x80020009)

Exception occurred.

/download.asp, line 31

O código fonte do arquivo download.asp é esse:

<!-- #INCLUDE FILE="download_config.asp" -->

<%

Dim file, connection, rs, urlorigem , iporigem, serverorigem, navegador

tid=Now()

file=Request.QueryString("file")

If file="" Then%>

<!-- #INCLUDE FILE="download_nofile.asp" -->

<%

Else

urlorigem = Request.ServerVariables("HTTP_REFERER")

iporigem = Request.ServerVariables("REMOTE_ADDR")

serverorigem = Request.ServerVariables("LOGON_USER")

navegador = Request.ServerVariables("HTTP_USER_AGENT")

If urlorigem = "" Then

urlorigem = "veio do Navegador " & navegador

End if

Set connection=Server.Createobject("Adodb.Connection")

connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & database

Set rs = connection.Execute ("INSERT INTO origem (origem, ip, server ,data) VALUES('" & file & "','" & iporigem & "' ,'" & serverorigem & "', '" & now() & "')")

Set rs = connection.Execute("SELECT * FROM download WHERE fldURL = '" & file & "'")

If rs.EOF Then

connection.Execute("INSERT INTO download (fldURL, fldLast, fldTimes, fldStart) VALUES ('" & file & "', #" & tid & "#, 0, #" & tid & "#)")

End if

Set rs = connection.Execute("SELECT * FROM download WHERE fldURL = '" & file & "'")

times=cInt(rs("fldTIMES"))+1

Set rs = connection.Execute("UPDATE download SET fldTIMES = " & times & " Where fldURL = '" & file & "'")

Set rs = connection.Execute("UPDATE download SET fldLAST = #" & Now() & "# Where fldURL = '" & file & "'")

Response.ReDirect file

End If%>

Na linha 31 tenho isso: times=cInt(rs("fldTIMES"))+1

como devo proceder??

[Deividy]

e qual é a linha 31?

do seu código?

[Leo-Flash]

e qual é a linha 31?

do seu código?

Na linha 31 tenho isso: times=cInt(rs("fldTIMES"))+1

e o campo fldTIMES está em formato Texto

[Deividy]

esta ai o erro!

ele esta esperando um valor numerico

CInt é pra confirmar que ele vai ser um numero em forma de variavel inteiro

nesse caso ele conta o valor que vem do bando com + 1

nesse caso se ele não é um valor numerico acho o erro!!!

precisa ser!!

verifica isso