Los Foros de ASPTutor.com
Home | Perfil | Registrarse | Temas Activos | Miembros | Buscar | FAQ
Usuario:
Password:
 Todos los Foros
 ADO
 Consulta sencilla. No encuentro en que fallo
 Foro Bloqueado  Tema Bloqueado


Autor Temas
negacd
Starting Member

Argentina
43 Posts
Mensajes - 04 Sep 2002 :  14:58:35  Ver Perfil  Enviar Email  Visit negacd's Homepage
Amigos, tengo un error en una página de consulta sencilla y no me doy cuenta que es lo que estoy haciendo mal. Debe ser una pavada y yo no lo veo.
Les agradecería, al que sabe que me diga en donde está el error y como lo soluciono.
Les paso los dos archivos que uso, para que lo analizen.

------------ fconsu.htm --------------
<html>

<head>

<title>Formulario para consulta sencilla</title>
</head>

<body>

<h3 align="center">Ejemplo de consulta sencilla</h3>
<p>&nbsp;</p>
<form method="POST" action="consultasencilla.asp">
<table border="1" width="100%">
<tr>
<td width="16%">Interprete:</td>
<td width="84%"><input type="text" name="Interprete" size="55"></td>
</tr>
<tr>
<td width="16%"><input type="submit" value="Enviar" name="B1"></td>
<td width="84%"><input type="reset" value="Restablecer" name="B2"></td>
</tr>
</table>
</form>
</html>


------------ consultasencilla.htm --------------
<%
Option Explicit
Response.Expires = -1000
%>
<html>
<head>
<title>Ejemplo de consulta sencilla</title>
</head><body bgcolor="#808000">
<div align="center">
<center>
<table border="1" width="62%" bgcolor="#008000">
<tr>
<td width="100%">
<p align="center"><font color="#FFFFFF">Resultados de su consulta</font></td>
</tr>
</table>
</center>
</div>
<%ctitulo=request.form("Interprete")
<%
Dim oConn
Dim oRS
Dim sSQL
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db\Database.mdb"))
sSQL = "SELECT Interprete, Album, AD, EN, GU, NP FROM Audio"
Set oRS = oConn.Execute(sSQL)
%>
<%if oRS.eof then%>
<h3 align="center">
<font color="#FF0000">No hay datos que coincidan con su petición </font></h3>
<%else%>
<table border="0" width="100%">
<tr>
<th width="33%" valign="middle" align="center" bgcolor="#008080">
<font color="#000000">Interprete</font></th>
<th width="33%" valign="middle" align="center" bgcolor="#008080">
<font color="#000000">Album</font></th>
</tr>
<%do while not oRS.eof%>
<tr>
<td width="33%" valign="middle" align="center" bgcolor="#FFFFFF">
<font color="#000000"><%=rs("Interprete")%></font></td>
<td width="33%" valign="middle" align="center" bgcolor="#FFFFFF">
<font color="#000000"><%=rs("Album")%></font></td>
</tr>
<%oRS.movenext
loop
end if%>
</table>
<p>&nbsp;</p>

oConn.Close
Set oRS = Nothing
Set oConn = Nothing


<p align="center"><a href="fconsu.htm">Otra vez</a></p>
</body></html>

Alexis_m20
Senior Member

Chile
1021 Posts
Posted - 04 Sep 2002 :  17:29:19  Ver perfil  Enviar e-mail  Visit Alexis_m20's Homepage
Podria ser el Rs("Albun") y el Rs("Interpretet") y Cambiar Ambos Rs por el Recordset que estas ocupando que seria Ors

Alexis Mejias
Programador En Computación
alexis.mejias@abtech.cl
http://www.abtech.clInicio Pagina

   
 Foro Bloqueado  Tema Bloqueado
Ir a:
Los Foros de ASPTutor.com Los Foros de ASPTutor.com
Ir al principio de la Página

 Imprimir Tema
 

Descargas de manuales¦ Ejemplos de código ¦ Artículos mas visitados ¦ Envía tu articulo ¦ Foros ¦
  Libro de visitas ¦Crea un enlace con ASPTutor 
 

    © 2001-Hasta hoy  Pedro Rufo Martín  contactar