<%resim=Request.QueryString("resim")
id=Request.QueryString("id")
if resim<>"" then
%>
<% Set Baglanti3 = Server.CreateObject("ADODB.Connection")
Baglanti3.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("administrator/sw_mdb/resim.mdb")
Set Rsb = Server.CreateObject("ADODB.Recordset")
Sorgu2b = "select * from resim where rid="&id&" "
Rsb.Open Sorgu2b,Baglanti3,1,3%>