¡¡¡ayudaaaa!!! Mostrar Dos Tablas

reint · #1 (**permalink**) 31/07/2003, 21:35

Quiero que me ayuden con este problema estoy tratando de mostrar dos tablas noticias y eventos y los campos id, dichos campos deben ir del ultimo al primero es decir el ultimo sea el primero la cuestion es que no se manejar bien el sql mi script es el siguiente :

<html>
<head>
<title>pagina principal</title>
</head>
<body>
<%
'Abre la conexion con la base de datos a traves de una conexion ODBC
Set con = Server.CreateObject("ADODB.Connection")
Con.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("top/data1.mdb")&";"

'Ejecuta un sentencia SQL de consulta
strsql = "SELECT " & strTablePrefix & "datos.id_noticia " & strTablePrefix & "eventos.id_code "
strsql = strsql " FROM " & strTablePrefix & "datos " & strTablePrefix & "eventos "
strsql = strsql " ORDER BY DESC " & strTablePrefix & "datos.id_noticia " & strTablePrefix & "eventos.id_code ASC;"
Set rs = con.Execute(strsql)

'Recorre todas las filas del resultado
Do While Not result.EOF
' Muestra la fila actual
Response.Write "<a href=vernoti.asp?id_noticia=" &result.Fields("id_noticia") & ">"&result.Fields("titulo")&"</a> • " &result.Fields("titular") & ""
Response.Write "<a href=vernoti.asp?code=" &result.Fields("code") & ">"&result.Fields("fecha")&"</a> • " &result.Fields("evento") & ""
'Pasa a la siguiente fila
result.MoveNext
Loop
'Libera memoria
result.Close
Set result = Nothing
con.Close
Set con = Nothing
%>
</body>
</html>
-------------------------------------------------------------------------------
Y MI ERROR ES EL SIGUIENTE:
--------------------------------------------------------------------------------
Información técnica (para personal de soporte técnico)

Tipo de error:
Error de compilación de Microsoft VBScript (0x800A0401)
Se esperaba un final de instrucción
/misitio/TMP5atfwpaz84.asp, línea 13, columna 16
strsql = strsql " FROM " & strTablePrefix & "datos " & strTablePrefix & "eventos "
---------------^

-------------------------------------------------------------------------------

Por favor alguien ayudeme ya no puedo mas con esto. gracias y adios

DeLaVega · #2 (**permalink**) 31/07/2003, 22:27

Probá de agregar el &:

strsql = strsql & " FROM " & strTablePrefix & "datos " & strTablePrefix & "eventos "
strsql = strsql & " ORDER BY DESC " & strTablePrefix & "datos.id_noticia " & strTablePrefix & "eventos.id_code ASC;"

Saludos, suerte.

reint · #3 (**permalink**) 01/08/2003, 05:47

no me sale me da sigue error:
Tipo de error:
Error de compilación de Microsoft VBScript (0x800A03EA)
Error de sintaxis
/misitio/TMPl0leixuox.asp, línea 13, columna 9
strsql = & strsql " FROM " & strTablePrefix & "datos" & "eventos "
--------^

Teri · #4 (**permalink**) 01/08/2003, 06:52

Así no tienes que agregar el &

Sirve para unir cadenas, revisa la ayuda

lo que tienes que poner es lo que te ha dicho DeLaVega

reint · #5 (**permalink**) 01/08/2003, 07:03

ahora mi error es este:
Tipo de error:
Microsoft JET Database Engine (0x80040E14)
Error de sintaxis (falta operador) en la expresión de consulta 'datos.id_noticia eventos.id_code'.
/misitio/TMP3ed8jixyca.asp, línea 15

Teri · #6 (**permalink**) 04/08/2003, 02:50

Es un error en la consulta SQL, te faltan comas para separar los campos o algo por el estilo