Ver Mensaje Individual
  #2 (permalink)  
Antiguo 10/06/2002, 07:50
Avatar de TomaHawkk
TomaHawkk
 
Fecha de Ingreso: diciembre-2001
Ubicación: España
Mensajes: 422
Antigüedad: 23 años, 5 meses
Puntos: 1
Re: Se esperaba final de instrucción???

Hola!
....

Set Conna=Server.CreateObject("ADODB.Connection&q uot;)

strCon = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("postales\postales.mdb")

set rs=Server.CreateObject("ADODB.Recordset" )

if tema="" then
sqltxt="SELECT distinct tema from
postales"
else
sqltxt="SELECT * from
postales"
end if

Conna.open

rs.open sqltxt,conna
...

Espero que te sirva, Saludos.