Ayuda Please!!! Tengo un problema que la verdad no se como resolver... de hecho he buscado aqui en el foro algun problema similar pero tampoco pude encontrar la solucion...el problema es el siguiente:
Al intentar abrir una pagina asp me marca el siguiente error:
ADODB.Recordset error '800a0e79'
Operation is not allowed when the object is open.
/AplicarPagos.asp, line 32
si vi que aqui en el foro tratan este tema pero no me ayudo mucho ... el codigo de la pag. es el siguiente:
<%
Response.Expires = 0
Response.ExpiresAbsolute = Now() - 1
Response.AddHeader "pragma","no-cache"
Response.Buffer = true
Response.AddHeader "cache-control","private"
Response.CacheControl = "no-cache"
Pol = Request.Form("Pol")
idp = Request.Form("idp")
ida = Request.Form("ida")
set cna=Server.CreateObject("ADODB.Connection")
set cne=Server.CreateObject("ADODB.Connection")
set rs1=Server.CreateObject("ADODB.Recordset")
set rs2=Server.CreateObject("ADODB.Recordset")
set rs3=Server.CreateObject("ADODB.Recordset")
set rs4=Server.CreateObject("ADODB.Recordset")
strcn = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/CGI-BIN/ASEGURADORAII.mdb")
cna.Open strcn
strcn = "DRIVER={Microsoft Excel Driver (*.xls)};DBQ=" & Server.MapPath("/CGI-BIN/" & Pol & ".xls")
cne.Open strcn
SQL = "SELECT * FROM ACTIVOS;"
rs1.Open SQL,cne,3,3
Do While Not rs1.EOF
if Rfc <> rs1("RFC") then
SQL = "SELECT RFC,PRIMA_QUINCENAL,FBAJA FROM TITULARES WHERE POLIZA = '" & Pol & "' AND RFC = '" & rs1("RFC") & "';"
rs2.Open SQL,cna,3,3
esta ultima linea es la linea 32 donde segun esta el error...
alguien puede decirme que esta pasando???.........
por que eh revisado todo el codigo y creo yo que no tiene problemas...
lo que intento hacer es lo siguiente: estoy creando dos conecciones , una para abrir una BD de Access y otra para abrir un archivo de Excel.. lo que quiero hacer es pasar informacion del archivo de Excel a la Base... esto implica que voy a hacer multiples inserciones y actualizaciones.... ahora no se si tenga que ver que lo este haciendo con ADO y a lo mejor me convenga mas hacerlo con instrucciones SQL directas utilizando INSERT Y UPDATE...
Bueno amigos espero me puedan ayudar.....
