Tienes que hacer un formulario que llame a un asp que sería como esto:
En lugar de lo que he puesto en rojo, pones tu insturcción, tipo:
sqltxt="Select * from tutabla where campo='"&campo&"' and campo2= '"&campo2&"'"
habiendo declarado antes:
'eliminamos las posibles comillas de la entrada
'para evitar la introducción de sentencias SQL
campo=replace(request.form("campo"),"'","")
campo2=replace(request.form("campo2"),"'","")
código del asp:
'Creamos las variables para guardar los datos
Dim conexion,tabla
'Creamos la conexion a la BD
Set conexion=Server.CreateObject("adodb.connection")
'Abrimos la conexión con el driver de access (No es necesario hacer DSN)
conexion.Open"driver={Microsoft Access Driver (*.mdb)}; ; DBQ="+server.mappath ("nombre-de-la-base.mdb")
'Le decimos que abra la tabla que queremos usar para la base
Set tabla=Server.CreateObject("adodb.recordset")
'hacer la selección de la tabla ordenándola por fecha descendente ssql = "SELECT * FROM tabla ORDER BY fecha desc;" 'aquí abre la tabla ordenándola
Tabla.Open ssql,Conexion
<table border="0" width="280">
'Hasta que la tabla no acabe
do while not tabla.eof
'El response.write se usa para escribir código dentro del ASP
'(Todo lo que escribamos no puede llevar comillas)
'(El principio del response se define abriendo comillas y para cerrarlo cerrando las
'comillas)
response.write "<tr><td valign=top align=left><font face=Arial size=1 color=#000000><u>De</u>: <b><a href=mailto:" & tabla ("mail") & ">" & tabla ("nombre") & "</a></b></font></td></tr>"
response.write "<tr><td valign=top align=left><font face=Arial size=1 color=#000000><u>Mensaje</u>:<br><b>" & tabla ("comentario") & "</b></font></td></tr>"
'Nos vamos al registro siguiente de la tabla
tabla.movenext
'Hacemos el loop
loop
'Cerramos la tabla de HTML
response.write "</table>"
'Cerramos la tabla de la base de datos
tabla.close
'Cerramos la conexión a la BD
conexion.close
espero que te sirva
