De acuerdo, pues ahora lo probaré a ver si funciona,spero que si
Como funcione te planto un monumento
De acuerdo, algo ha echo, ahora mismo lo tengo de la siguiente manera:
'Ola 5
anyo5=request.querystring("anyo5")
nola5=request.querystring("nola5")
set ola5=createobject("ADODB.Recordset")
ola5.CursorType = adOpenKeyset
ola5.LockType = adLockOptimistic
sql_ola5="SELECT * from consEmpRecibidasEvolucion1 where año=" & anyo5 & " AND Nola='" & nola5 &"'"
ola5.Open sql_ola5, conn
i=1
Response.Write("<td valign='top'>Ola5<br>")
If not temporal.eof then temporal.movefirst
While Not ola5.eof
If isnull(ola5.fields("tmpnpanelista")) then
temporal.addnew
temporal.fields("npanelista") = ola5("npanelista")
temporal.fields("FaxConllamadas5") = ola5("FaxConLlamadas")
temporal.fields("FaxEspontaneo5") = ola5("FaxEspontaneo")
temporal.fields("Telefono5") = ola5("Telefono")
temporal.update
else
temporal.Find ("npanelista='" & ola5.fields("npanelista") & "'"), adSearchForward
Response.Write("Entro en el else")
temporal.fields("npanelista") = ola5("npanelista") 'Aqui es donde me da ahora el error que comento abajo, que el recordser está vacio. Alguna idea de por que??????
temporal.fields("FaxConllamadas5") = ola5("FaxConLlamadas")
temporal.fields("FaxEspontaneo5") = ola5("FaxEspontaneo")
temporal.fields("Telefono5") = ola5("Telefono")
temporal.update
end if
Response.Write (i & ". " & ola5("npanelista")&"<br>")
ola5.movenext
i = i + 1
wend
Response.Write("</td>")
Pero ahora me dice que El valor de BOF o EOF es True, o el actual registro se eliminó; la operación solicitada requiere un registro actual en la linea 175 (arriba está marcada la linea que es) Por que me dice ahora que el recordset está vacio o que ha llegado al final?????