 |
<%if secim="firmalar" then%>
Firma Arama
<%elseif secim="urunler" then%>
Ürün Arama
<%elseif secim="ilanlar" then%>
İlan Arama
<%end if%>
|
 |
||||||||||||||||||||||||||||||
 |
<% if kayit="" then
Response.Write(" ") Response.Write(" ") else%> <%if secim="firmalar" then%> <% sorgum="Select * from firma where onay=true order by fkodu desc" Rs.Open Sorgum, Baglantim, 1, 3 if rs.eof or rs.bof then else do while not rs.eof if rs("onay")=true and rs("FKodu")=Cint(kayit) then%>
") Response.Write(" ") exit do end if end if%> <% Loop %> <% end if %> <%Rs.Close%> <%elseif secim="urunler" then%> <%if skodu<>"" then sorgum="Select * from Urun where skodu="&skodu&" order by id desc" else sorgum="Select * from Urun order by id desc" end if if askodu<>"" then sorgum="Select * from Urun where skodu like '%"&skodu&"%'" end if rs.Open Sorgum, Baglantim, 1, 3 if rs.eof or rs.bof then Response.Write(" ") Response.Write(" ") else Do While not rs.eof%> <%if rs("id")=Cint(kayit) and rs("goster")=true then%>
") Response.Write(" ") exit do end if end if%> <% Loop %> <% end if %> <%Rs.Close%> <%elseif secim="ilanlar" then%> <% sorgum="select * from ilan where goster=true order by id desc" Rs.Open Sorgum, Baglantim, 1, 3 if rs.eof or rs.bof then Response.Write(" ") Response.Write(" ") else do while not rs.eof if rs("id")=Cint(kayit) and rs("goster")=true then %>
") Response.Write(" ") exit do end if end if%> <% Loop %> <% end if %> <%Rs.Close%> <%end if end if%> |
 |
||||||||||||||||||||||||||||||
 |
 |
 |
||||||||||||||||||||||||||||||
<%end if%>