<% Set a=Server.CreateObject("ADODB.Connection") a.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("sifonik.mdb")) set b=server.createobject("adodb.recordset") %>