Ver Mensaje Individual
  #1 (permalink)  
Antiguo 28/10/2003, 18:28
Avatar de jorel
jorel
 
Fecha de Ingreso: abril-2003
Ubicación: Monterrey, N.L.
Mensajes: 253
Antigüedad: 22 años, 1 mes
Puntos: 0
Exclamación comparar tablas y update

Hola que tal, a ver si me pueden ayudar en este problemita.

Lo que pasa es que tengo 2 tablas.

Una llamada exi1 y otra exi2

contiene campos:
codigo
nombre
precio
etc.

la tabla exi1 contiene valores que quiero acutalizar en la tabla exi2 en especial el precio. Las 2 tablas contiene los mismos campos son de igual nombre.

Si un precio cambio en la tabla exi1 quiero que este me lo actualize en la tabla exi2 si no pues que lo deje igual.

Estaba haciendo un codigo asi pero me da error, a ver si me pueden ayudar con este codigo o dar una idea por favor.


<%
Set oConn = Server.CreateObject ("ADODB.Connection")
Set RS = Server.CreateObject ("ADODB.RecordSet")
oConn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("bd.mdb")

sql = "SELECT * FROM exi1"
Rs.Open sql, oConn, 3, 1

Set RS2 = Server.CreateObject ("ADODB.RecordSet")
sql2 = "SELECT * FROM exi2"
RS2.Open sql2, oConn, 3, 1

Do While not RS.EOF
Do While not RS2.EOF
if (RS("codigo")) = (RS2("codigo")) Then
' dale un update al precio (el precio de la tabla 1 ponlo en la tabla 2)
precio = RS("precio")
sql2 = "UPDATE exi2 SET precio="&precio&" "
Set RS2=oConn.Execute(sql2)
else
RS2.MoveNext
end if
Loop
RS.MoveNext
Loop


RS2.Close
Set RS2 = nothing
RS.Close
oConn.Close
Set RS = nothing
Set oConn = nothing

Response.Write "cambios realizados"

%>


Y me da el siguiente error

Operation is not allowed when the object is closed.
/gamamusic/proyectos/compara/Default.asp, line 23


donde la linea 23 es:
Do While not RS2.EOF


Como ven alguna sugerencia donde estar el error ¡¡¡
__________________

:adios:

Jorge Santana