Puedes hacer algo como esto:
Código:
<%
Dim filtroASP
filtroASP = "1"
if (Request.Form("text") <> "") then Recordset1__MMColParam = Request.Form("text")
%>
<%
set Recordset1 = Server.CreateObject("ADODB.Recordset")
Recordset1.ActiveConnection = filtroASP
Recordset1.Source = "SELECT * FROM tabla WHERE campo = '" + Replace(Recordset1__MMColParam, "'", "''") + "'"
Recordset1.CursorType = 0
Recordset1.CursorLocation = 2
Recordset1.LockType = 3
Recordset1.Open()
Recordset1_numRows = 0
%>
saludos y suerte
<img src="http://www.efrance.fr/masterASP/firma.jpg" width="465" height="79" border="0" usemap="#URL">
<map name="URL">
<area shape="rect" coords="270,48,347,61" href="http://www.efrance.fr/masterasp" target="_blank">
</map>