Error al actualizar registro

Hola amigos, el problema que tengo es el siguiente: tengo una pagina en la
que los clientes tiene que informar el pago de una boleta, el problema que
tengo es que me tira el siguiente error y no se por que es porque esta

bien, es mas, cuando pruebo la pagina en mi servidor local funciona bien
pero cuando la subo al servidor donde tiene que estar tira este error:

Microsoft OLE DB Provider for ODBC Drivers error '80004005'
Query-based update failed because the row to update could not be found.

/servicios/boleta.asp, line 156

El servidor en cual hago las pruebas es Windows Server 2003.
estas son las lineas de codigo que utilizo para actualizar los registros

la DB
IdB=request.Form("boleta")
CodGest=Int(request.Form("codgest"))
Fecha=request.Form("fecha")
sql="select * from boletas where id_b=" & IdB
set rs=server.CreateObject("adodb.recordset")
rs.open sql, cn, 1, 2
if rs.eof then
response.Write("Código de Boleta Incorrecto.<br>Vuelva atrás y
compruebe el código.<br>")
else
if CodGest=rs("codgest_b") then
rs("est_b")="P"
rs("fechap_b")=FechaGenerica(Fecha)
rs.update
response.Write("Gracias por informar el pago de su boleta.<br>" & _
"Area de Clientes <a href=""../clientes/micuenta.asp"">clic
acá</a><br>")
InfoPago(rs("id_b"))
else
response.Write("Código de Gestión Incorrecto.<br>Vuelva atrás y
compruebe el código.<br>")
end if
end if
rs.close
set rs=nothing


Cual puede ser el error o como puedo hacer lo mismo pero de otra forma??

Saludos!
Martin