onay sistemi tüm sitede çalışıyor ama sadece katagori.asp sayfamda çalışmıyor.
orda onaylanan da onaylanmayanda ilanları gösteriyor.
sorun ne olabilir acaba yardımcı olurmusunuz?
<!--#include file = "genelayarlar.asp"-->
<%
Set ayarlar = Server.CreateObject("Adodb.RecordSet")
sql_ayarlar = "Select * from ayarlar"
ayarlar.open sql_ayarlar,bag,1,3
%>
<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1254">
<meta name="GENERATOR" content="Microsoft FrontPage 6.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<TITLE><%=ayarlar("Siteadi")%></TITLE>
<meta http-equiv="Content-Language" content="tr">
<LINK
href="site_dosyalar/magic_ie.css" type=text/css rel=stylesheet>
</HEAD>
<BODY bgColor=#eff0ec leftMargin=0 topMargin=0 onload=preloadImages();
marginheight="0" marginwidth="0" background="images/arka.JPG">
<CENTER>
<TABLE cellSpacing=0 cellPadding=0 border=0 height="452" width="382" style="border-collapse: collapse" bordercolor="#111111">
<TBODY> <TR height=170>
<TD align=middle width="889" height=194>
<TABLE height=169 cellSpacing=0 cellPadding=0 width=751
border=0 style="border-collapse: collapse" bordercolor="#111111">
<!-- #include file="ust.asp" -->
<TR>
<TD width=889 height=137>
<div align="center">
<center>
<TABLE cellSpacing=0 cellPadding=0 width=760 border=0 height="568" style="border-collapse: collapse" bordercolor="#111111">
<TBODY>
<TR>
<!--#include file = "sol.asp"-->
<TD width=10 height="568"><IMG height=1 src="site_dosyalar/spacer.gif"
width=10></TD>
<TD vAlign=top width=566 height="568">
<TABLE height=1 cellSpacing=0 cellPadding=0 width=523 border=0>
<TBODY>
<TR>
<TD width="590" background=site_dosyalar/menu_zem.gif
height=2>
<TABLE height=39 cellSpacing=0 cellPadding=0 width="566"
border=0 style="border-collapse: collapse" bordercolor="#111111">
<TBODY>
<TR>
<TD width="8"><IMG height=39
width=1></TD>
<TD align=middle width="551" height=39>
<TABLE height=39 cellSpacing=0 cellPadding=0
width="554" border=0>
<TBODY>
<TR>
<TD align=middle width=29 height=39><IMG height=17
alt=Name src="site_dosyalar/ico_person.gif"
width=17></TD>
<TD align=left width="404"
height=39>
<p><font color="#FFFFFF"><b>Kategorideki
İlanların Listesi</b></font></TD>
<TD align=left width="121"
height=39>
</script>
<center>
</p>
</TD>
</TR></TBODY></TABLE></TD>
<TD width="7"> </TD></TR></TBODY></TABLE></TD></TR>
<TR>
<TD width=590 height=10><IMG height=3
src="site_dosyalar/spacer.gif" width=1></TD></TR>
<TR>
<TD vAlign=top width=590 height="1">
<TABLE cellSpacing=0 cellPadding=0 width=566 bgColor=#ffffff
border=0 height="1">
<TBODY>
<TR>
<TD width=1 bgColor=#d8dcd9 height="5"><IMG height=1 alt=""
src="site_dosyalar/spacer.gif" width=1></TD>
<TD align=right
background=site_dosyalar/info_main_top_bg.gif
colSpan=2 width="564" height="5"><IMG height=5 alt=""
src="site_dosyalar/info_corner_top.gif" width=5></TD></TR>
<TR>
<TD width=1 bgColor=#d8dcd9 height="1"><IMG height=1 alt=""
src="site_dosyalar/spacer.gif" width=1></TD>
<TD width=565 height="1" valign="top" align="center">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="357%" id="AutoNumber5">
<tr>
<td width="529" height="63%" valign="top" style="padding-bottom:15px; font-family:Tahoma; font-size:11px">
<div style="padding-left:20px; width:564; height:200">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="541" id="AutoNumber4" height="28">
<tr>
<td width="620" height="26" style="font-family: Tahoma; font-size: 11px">
<p align="center">
<%
Vt_Yol=Server.Mappath("dbd/db.mdb")
Set Baglantim=Server.CreateObject("Adodb.Connection")
Baglantim.Open "DBQ="& Vt_Yol & ";Driver={Microsoft Access Driver (*.mdb)}"
kategori_id = Request.QueryString("kategori_id")
Set Rs=Server.CreateObject("ADODB.Recordset")
Sor = "Select * From ilanlar where kategori_id="& kategori_id & " order by onay=1 desc"
Rs.Open sor,Baglantim,1,3
toplamlink = Rs.recordcount
topla=Rs.Recordcount
shf = Request.QueryString("shf")
if shf="" then
shf=1
end if
%> <%
kategori_id = Request.QueryString("kategori_id")
Set rs = Server.CreateObject("ADODB.Recordset")
Sor = "Select * From ilanlar where kategori_id="& kategori_id & " order by onay=1 desc"
rs.Open sor,Baglantim,1,3
islem=Request.QueryString("islem")
if islem="indir" then
call indir
end if
git = Request.QueryString("git")
if git="" then
git=1
end if
%>
<table border="0" cellpadding="0" cellspacing="0" width="538" align="center" height="25" background="file:///K:/Siteler/Emlak%20Siteleri/emlak6/emlak6/images/fon_bar01.gif">
<% if rs.eof or rs.bof then %>
<% response.write "<center><b>BU KATEGORİDE KAYITLI İLAN YOK</b></center><br><br><center><a href=javascript:history.go(-1);><< Geri</a></center>" %>
<% else %>
<tr>
<%
set Xs = server.createobject("adodb.recordset")
sql = "select * from kategori where id="& kategori_id &""
Xs.open sql, conn, 1, 3
%><td width="538" style="font-family: Tahoma; font-size: 11px">
<table border="0" cellpadding="0" cellspacing="0" background="" width="447" style="border-collapse: collapse" bordercolor="#111111">
<tr>
<td style="font-family: Tahoma; font-size: 11px" width="424"> <img border="0" src="images/caprazok.gif"><b><font size="2" color="#FF0000"> Kategori Adı :</font></b>
<span style="font-style: normal">
<font size="1" face="Verdana" color="#000000" style="font-variant: normal; font-weight: normal; font-size: 8pt; font-family: Arial"><b><font face="Arial" size="1" color="#6396C6" style="font-variant: normal; font-weight: normal; font-size: 8pt; font-family: Arial">
<%=Xs("kategori_adi")%><img border="0" src="images/ayirici.gif" width="524" height="3"></font></b></font></span></td>
<title><%=Xs("kategori_adi")%></title>
</tr>
</table>
</td>
</tr>
</table><%
Dim sayfa
sayfa = Request.QueryString("sayfa")
if sayfa = "" then
sayfa = 1
end if
rs.pagesize = 7
rs.absolutepage = sayfa
sayfa_sayisi = rs.pagecount
for i=1 to rs.pagesize
if rs.eof then exit for
%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="536" id="AutoNumber6">
<tr>
<td style="font-family: Tahoma; font-size: 11px" width="550">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="524" id="AutoNumber8" height="51" bgcolor="#FFF2DF" background="images/kategotiorta.PNG">
<tr>
<td width="102" height="117">
<p align="center">
<FONT SIZE="2" COLOR="#FF3300">
<a href="javascript:OpenImage('<%=rs("resim")%>','ik','scrollbars=no,resizable=no,width=370,height=375')" style="text-decoration: none">
<img src="<%=rs("resim")%>" width="78" height="76" border="0" ></a>
</td>
<td width="414" height="117">
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="98%" id="AutoNumber22" height="47">
<tr>
<td width="36%" height="23">
<img border="0" src="images/bullet.gif"><font size="1" face="Verdana"><b>
Tür :</b> <%=rs("baslik")%><b> </b>
</font></td>
<td width="28%" height="23">
<img border="0" src="images/bullet.gif"><font size="1" face="Verdana"><b> Yer :</b> <%=rs("yer")%></font></td>
</tr>
<tr>
<td width="50%" height="15" valign="top" colspan="2">
<img border="0" src="images/bullet.gif"><font size="1" face="Verdana"><b>
Fiyat :</b> <%=rs("fiyat")%>.<%=rs("paraturu")%></font></td>
</tr>
<tr>
<td width="100%" height="8" valign="top" colspan="2">
<img border="0" src="images/bullet.gif"><font size="1" face="Verdana"><b>
Açıklama :</b> <%=left(rs("mesaj"),80)%>.....</font><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber28">
<tr>
<td width="100%">
<p align="left">
<b>
<font face="Arial" size="1" color="#FFFFFF">
<img border="0" src="images/dot.gif"></font><font face="Verdana" color="#FFFFFF"><A
onclick="window.open('detaylar.asp?id=<%=rs("id")%>','new', 'toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no, resizable=no,copyhistory=no,width=810,height=715'); return false;"
href="detaylar.asp?id=<%=rs("id")%>" style="text-decoration: none; "><font color="#000033" size="2">Detaylar için Tıkla</font><font color="#790601" size="2"> </font>
</a></font><font color="#790601" face="Verdana" size="1"> </font></b></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</TD>
</td>
</tr>
</table>
<p>
</font><table width="526" border="0" cellspacing="0" cellpadding="0" class="yazi">
<tr><% rs.MoveNext
Next %>
<td align="center" height="10" colspan="3" style="font-family: Tahoma; font-size: 11px" width="526">
Diğer
Sayfa No : <%
for z=1 to sayfa_sayisi
if sayfa=z then
response.write z
else
response.write "<b>[<a href=""kategoriler.asp?kategori_id="& kategori_id & "&sayfa="&z&""">"&z&"</a>]</b>"
end if
next
if sayfa = "1" then
onceki = "Önceki Sayfa Yok "
else
onceki = "<< Önceki"
end if
if sayfa = rs.pagecount then
sonraki = " "
else
sonraki = "Sonraki >>"
%>
</td>
</tr>
<tr>
<td align="left" height="10" style="font-family: Tahoma; font-size: 11px" width="183">
<a href="kategoriler.asp?kategori_id=<%=kategori_id%>&sayfa=<%=sayfa - 1%>" style="text-decoration: none"> <%=onceki%></a></td>
<td align="center" height="10" style="font-family: Tahoma; font-size: 11px" width="157"> </td>
<td align="right" height="10" style="font-family: Tahoma; font-size: 11px" width="186">
<a href="kategoriler.asp?kategori_id=<%=kategori_id%>&sayfa=<%=sayfa + 1%>" style="text-decoration: none"><%=sonraki%> </a></td>
</tr>
<tr>
<td align="center" height="20" colspan="3" style="font-family: Tahoma; font-size: 11px" width="526"><address>
<span style="font-style: normal">Toplam <b><%=rs.recordcount%></b>
adet İlan var.</span></address>
<address>
<span style="font-style: normal">ve
Şuan <%=sayfa%>. Sayfadasınız toplam <%=sayfa_sayisi%> sayfa var.</span></address>
</td>
<%
rs.close
Set rs = Nothing
end if
end if %>
</table>
</td>
</tr>
</td>
</tr>
</table>
</div>
</td>
</tr>
</table>
</TD>
<TD width=1 bgColor=#d8dcd9 height="1"><IMG height=1 alt=""
src="site_dosyalar/spacer.gif" width=1></TD></TR>
<TR height=5>
<TD width=1 bgColor=#d8dcd9 height="6"><IMG height=1 alt=""
src="site_dosyalar/spacer.gif" width=1></TD>
<TD align=right
background=site_dosyalar/info_main_bottom_bg.gif
colSpan=2 width="564" height="6"><IMG height=6 alt=""
src="site_dosyalar/info_corner_bottom.gif"
width=6></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
</center>
</div>
</TD></TR>
<!-- #include file="alt.asp" -->
</BODY></HTML> 