<% ara=PostKontrol(Request.Form("arama")) %>
<% ara1=bcevir(ara) ara2=kcevir(ara) sorgum="select * from ilan where goster=true and baslik like '%"&ara1&"%'"&" or baslik like '%"&ara2&"%'"&" or aciklama like '%"&ara1&"%' or aciklama like '%"&ara2&"%' ORDER BY fkodu DESC" rs.open sorgum,baglantim,1,3 ks=rs.recordcount %>
"<%Response.Write ara%>" İçin Toplam <%Response.Write ks%> Kayıt Bulundu.
<%if ks=0 then Response.Write "
Aradığınız Özelliklerde İlan Bulunamadı.
" else shf = Request.QueryString("shf") if shf="" then shf=1 end if rs.pagesize = 10 rs.absolutepage = shf cellcolor="#FFFFFF" sayfa = rs.pagecount%> <% for i=1 to 10 if rs.eof then exit for %> -<%=cevir(rs("baslik"))%>.html',700,400)" style="cursor:hand;" onmouseover="this.style.backgroundColor='#FFE2C6';" onmouseout="this.style.backgroundColor='#FFFFFF';">
<% if rs("ilan_resim")<>"" then %> " onerror="src = 'images/resimyuklenemedi.gif'" border="0" width="100" height="75" /> <% else %> <%end if%>
<%= rs("baslangic") %>
İlan Başlığı : <%= rs("baslik") %>
İlan Veren Kişi / Firma : <% if rs("fkodu")="" then Response.Write("Site Yöneticisi") elseif rs("fkodu")=0 then response.Write(rs("ilan_veren")) else firmabul(rs("fkodu")) end if %> [ <%= rs("il") %> ]
Telefon Numarası : <% if rs("fkodu")="" then response.Write(rs("telefon")) elseif rs("fkodu")=0 then response.Write(rs("telefon")) else firmabultel(rs("fkodu")) end if %>
Kısa Açıklama : <%=left( rs("aciklama"),150) %>...
<% rs.movenext next %>
<%sayfa_numarasi()%>
<%end if%>