<%
connString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=D:\Hps\Master\root\dbimoveis.mdb;"
connString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=D:\Hps\Master\root\db\master.mdb;"
arqdir = "e:\home\masterimoveis\dados\"
Set imovel = Server.CreateObject("ADODB.Connection")
imovel.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & arqdir & "bdalugueis.mdb;"
sql = "SELECT * FROM SIMCadImov WHERE Imov_Codigo=" & r_id
set dados = imovel.execute(sql)
%>
<%=dados("Imov_Endereco") %>
se alguem puder me ajudar, pq sou novo em asp...