ลองดู code นี้เป็นตัวอย่างนะ
Dim Xname
Xname = request.Form("name")
Set conn=Server.CreateObject("ADODB.Connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.mappath("photos.mdb")
sql = "SELECT * FROM photographs where name ='"& Xname &"'"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 1,3
if NOT(RS.EOF) Then %>