(0x800A01A8) se requiere un objeto: "

23/01/2006 - 21:30 por Boris Valladares | Informe spam
Gracias por contestar mis consultas.
hice lo que los compañeros amablemente me especificaron pero sigo con el
mismo error, marqué la línea donde me da el error.
Gracias

form name="listasdep" action= "matriz.asp" method= "post">
<select name "combo1" onchange="document.listasdep.submit();">
<option value=0></option>
<option value=1>SERV1</option>
<option value=2>SERV2</option>
</select>
<select name= "combo2">
<%
call conexion
do while not rrs.eof <-- justamente en esta línea me da el error
%>
<%nomta = RRS("tablespace_name")%>
<option value="<%=RRS("tablespace_name")%>">
<% if cuenta=1 then
SELECTED
end if
%>
</option>

<%
rrs.movenext
loop
RRs.close()
set RRS = nothing
%>
</select>
</form>
 

Leer las respuestas

#1 Matías Iacono
24/01/2006 - 01:45 | Informe spam
Desde ese punto de vista, el problema puede estar en que el recordset lo
declaras o instancias dentro de tu SUB. Como aparentemente no esta declarado
de forma global, al salir de la funcion este objeto ya no existe.

Puedes colocar algo asi:

<%
Dim RSS

sub conexion
MM_ORACLEDATABASE_STRING = "Provider=oraOLEDB.ORACLE;User
ID=XXX;Password=XXXX;Data source=XXX.XXX.XX.XX;"
set RRS = SERVER.CREATEOBJECT("ADODB.RECORDSET")
sql= "select tablespace_name from dba_tablespaces"
RRS.OPEN sql,MM_ORACLEDATABASE_STRING,3,3
end sub
%>

Saludos.

Matías Iacono
Microsoft MVP ASP/ASP.net
DCE3 v.2003 - DCE2 v.2005
Coordinador de evento Comunidad MSDN Bolivia
"Boris Valladares" escribió en
el mensaje news:
Gracias por contestar mis consultas.
hice lo que los compañeros amablemente me especificaron pero sigo con el
mismo error, marqué la línea donde me da el error.
Gracias

form name="listasdep" action= "matriz.asp" method= "post">
<select name "combo1" onchange="document.listasdep.submit();">
<option value=0></option>
<option value=1>SERV1</option>
<option value=2>SERV2</option>
</select>
<select name= "combo2">
<%
call conexion
do while not rrs.eof <-- justamente en esta línea me da el error
%>
<%nomta = RRS("tablespace_name")%>
<option value="<%=RRS("tablespace_name")%>">
<% if cuenta=1 then
SELECTED
end if
%>
</option>

<%
rrs.movenext
loop
RRs.close()
set RRS = nothing
%>
</select>
</form>



Preguntas similares