<% Set baglan = Server.CreateObject("ADODB.Connection") baglan.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb") set rsReklam=baglan.execute("select * from reklam where catID=2 order by id desc") %> " target="_blank" title="<%=rsReklam("baslik")%>">" width="378" height="550" border="0">