Es lo que he hecho, me di cuenta de ello ayer que podia meter ahi un update y ya está, ahora mi duda es otra: puedo evitar de alguna forma anidar los dos bucles??? Es q de la forma que está ahora, se tira muxísimo rato procesando, de exo da un time out. Por que la tabla tiene unos 8000 registros asi q imaginate, el tiempo q se tira y eso con las pruebas q yo he exo solo entra en el 2º bucle en uno de los 6 trimestres, q si lo llega a hacer en todos.....
Asi que lo dixo, puedo buscar de alguna otra manera si ese registro ya está en la tabla, sin tener q llegar a anidar los bucles?? No hay una función como la FINDFIRST en access?????
He visto por ahi un post en el que se usa lo del findfirst, es este de
aqui pero sin embargo si yo uso el findfirst me da el siguiente error:
El objeto no acepta esta propiedad o método: 'temporal.Findfirst' PORQUE???? El código es el siguiente, si alguien ve el fallo que me lo diga por favor, es muy urgente, gracias.
'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.Findfirst "npanelista = '" & ola5.fields("npanelista") & "'"
temporal.fields("npanelista") = ola5("npanelista")
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>")