Adım 1:
connection'u şu şekilde tanımla
<%
set conn = server.createobject("adodb.connection")
conn.connectionstring = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source="&server.MapPath("data.mdb")
conn.open
%>

Adım 2:
sorgunuda klasik asp şeklinde değilde şöyle çekersen sorun çıkmaz;

<%
strSQL = "select * from table where sutun_adi like "&degisken
set rs1 = conn.execute(strSQL)

do while not rs1.eof
rs1("sutun_adi")&"<br />"
rs1.movenext
loop
%>

bir not daha: Eğer dreamweaver ile yapıyorsan ctrl+j tuşlarına bas orada title/encoding ayarına bir bak...