(0x800A01A8) se requiere un objeto: "

23/01/2006 - 19:46 por Boris Valladares | Informe spam

Que tal grupo buena tarde, soy nuevo en esto de asp con VBScript,
esto tratrando de hacer listas dependientes para seleccionar información de
ORACLE, pero me da el siguiente error:

(0x800A01A8) se requiere un objeto: "

este es el código

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>
<option value=3>SERV3<option>
<option value=1>SERV4</option>
</select>
<select name= "combo2">
<%
call conexion
do while not rrs.eof
%>
<%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>

<%
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
%>

Siga el debate

3 respuestas

Tengo una respuesta

Preguntas similare

(0x800A01A8) se requiere un objeto: "

Leer las respuestas

#1 Dani Castillo

23/01/2006 - 19:53 | Informe spam

debes crear la conexion, el openrecordset recibe no una cadena de conexion,
sino un objeto, algo como

Set Conn = Server.CreateObject("ADODB.Connection")
MM_ORACLEDATABASE_STRING = "Provider=oraO."
Conn.Open MM_ORACLEDATABASE_STRING
set RRS = SERVER.CREATEOBJECT("ADODB.RECORDSET")
sql= "select tablespace_name from dba_tablespaces"
RRS.OPEN sql,Conn,3,3

recuerda cerrar y asignar a nothing la conexion cuando termine, despues de
cerrar el recordset
conn.close
set conn=nothing

"Boris Valladares" escribió en
el mensaje news:

Que tal grupo buena tarde, soy nuevo en esto de asp con VBScript,
esto tratrando de hacer listas dependientes para seleccionar información
de
ORACLE, pero me da el siguiente error:

(0x800A01A8) se requiere un objeto: "

este es el código

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>
<option value=3>SERV3<option>
<option value=1>SERV4</option>
</select>
<select name= "combo2">
<%
call conexion
do while not rrs.eof
%>
<%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>

<%
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
%>

Responder a este mensaje

#2 Dani Castillo

23/01/2006 - 19:55 | Informe spam

se me olvidaba :)
solo un consejillo, otra vez cuando pongas un error intenta reducir al
minimo el codigo que entregas y marcar visualmente en que linea te da el
error, nos sirve de ayuda a los demas para trazar el problema :-)

"Boris Valladares" escribió en
el mensaje news:

Que tal grupo buena tarde, soy nuevo en esto de asp con VBScript,
esto tratrando de hacer listas dependientes para seleccionar información
de
ORACLE, pero me da el siguiente error:

(0x800A01A8) se requiere un objeto: "

este es el código

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>
<option value=3>SERV3<option>
<option value=1>SERV4</option>
</select>
<select name= "combo2">
<%
call conexion
do while not rrs.eof
%>
<%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>

<%
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
%>

Responder a este mensaje

#3 Matías Iacono

23/01/2006 - 23:56 | Informe spam

Donde veo un error es en tu SELECTED, ya que tienes que colocarlo como
texto, y en tu caso hace creerle al compilador que es un metodo.

<option value="<%=RRS("tablespace_name")%>">
<% if cuenta=1 then %>
SELECTED
<% end if
%>

Una forma de solucionarlo.

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:

Que tal grupo buena tarde, soy nuevo en esto de asp con VBScript,
esto tratrando de hacer listas dependientes para seleccionar información
de
ORACLE, pero me da el siguiente error:

(0x800A01A8) se requiere un objeto: "

este es el código

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>
<option value=3>SERV3<option>
<option value=1>SERV4</option>
</select>
<select name= "combo2">
<%
call conexion
do while not rrs.eof
%>
<%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>

<%
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
%>

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida