Hola Amigos:
deseo hacer una consulta a una tabla de una base de datos, obtener un dato de ella y despues conectarme a otra tabla de la misma base de datos y obtener otros datos.
Estoy trabajando en el siguiente código, pero me da el siguiente error:
Agradeceré me puedan dar una opinión de lo que falla.
Tipo de error:
Microsoft JET Database Engine (0x80040E14)
Error de sintaxis (falta operador) en la expresión de consulta '
[email protected]'.
/perfil.asp, línea 17
perfil.asp
Código:
<!--#include file="comunes.asp"-->
<%
Dim oConn, rs, SQL
Conectar
Registro rs
SQL = "SELECT * FROM mensajes WHERE idmensaje=" & Request.QueryString("idmensaje") & ""
rs.Open SQL, oConn
cuantos=rs.recordcount
Correo=rs.Fields("Email")
Autor=rs.Fields("Autor")
LimpiarRS (rs)
LimpiarConexion
Dim rs2
Conectar
Registro rs
SQL = "SELECT * FROM resultados WHERE Email=" & Correo & ";"
rs.Open SQL, oConn
%>
La línea 17 es: rs.Open SQL, oConn
La página comunes.asp contiene
Código:
<%
Sub Conectar
' Conecta a bd
set oConn=Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("db\midatabase.mdb")
End Sub
'================================================================================================
Sub Registro (id)
' Crea un recordset
set id=Server.CreateObject("ADODB.Recordset")
End Sub
'================================================================================================
Sub LimpiarConexion
oConn.Close
set oConn=nothing
End Sub
'================================================================================================
Sub LimpiarRS (rs)
rs.Close
set rs=nothing
End Sub
%>
Desde ya muchas gracias
