15/02/2004, 11:16
|
| | | Fecha de Ingreso: septiembre-2003
Mensajes: 142
Antigüedad: 21 años, 6 meses Puntos: 0 | |
| RecordSet en blanco
Hola, necesito recoger los datos de una consulta en un RecordSet, pero éste me sale vacío después de realizar la consulta. Dejo el código que tengo hecho para ver si alguien sabe dónde está el error.
Muchas gracias.
<% @language = Jscript %>
<!-- #include FILE = "Adojavas.inc" -->
<html>
<head>
<title> Consulta de enlaces web </title>
</head>
<body bgcolor = "#00AAAA">
<%
var RET = ""
var SQL = ""
SQL = "SELECT * FROM MATERIAS ORDER BY NOMBRE_MATERIA"
miconexion = new ActiveXObject("ADODB.Connection")
miconexion.Open ("driver={Oracle ODBC driver};Server=ORCLSL;database=BDORACLE;Uid=scott; Pwd=tiger;")
Ob_rs = new ActiveXobject ("ADODB.Recordset")
Ob_rs.Open(SQL, miconexion, adOpenStatic, adLockOptimistic)
%>
<center> <h1> Realiza tus consultas </h1> </center>
<br>
<br>
<br>
<form name = "formulario">
<center> <b> Materia: </b> <select name="materia">
<option value = "Todas"> Todas </option>
<%
if ((Ob_rs.BOF == true) && (Ob_rs.EOF == true))
{
%>
<script language = "javascript">
<!--
window.alert("No existe esta búsqueda");
window.history.go(-1);
//-->
</script>
<%
}
else
While (!Ob_rs.EOF)
{
RET = RET & "<option value='" & Ob_rs("NOMBRE_MATERIA") & "'>" & Ob_rs("NOMBRE_MATERIA") & "</option>"
Ob_rs.MoveNext()
}
Response.Write(RET & "</SELECT>")
Ob_rs.Close()
miconexion.Close()
%>
</center>
</body>
</html>
__________________
-----,-----,-----,@ |