<!--#INCLUDE file="forum/ayarlar.asp"-->

<table width="100%" bgcolor="#FFFFFF" bordercolor="#CCFFCC" border="0" cellspacing="0" cellpadding="1">
<% sor = "Select * from forumveri where onay=1 order  by id desc" 
efkan.Open sor,Sur,1,3
if efkan.eof or efkan.bof Then
Else
renk    =1
say     = 1
konum = 0

Do While say =< 10 And Not efkan.Eof
if renk mod 2 Then bgcolor = "" Else bgcolor = "#F4F4F4" end If 
pass=""
konularr=""&konum&""
gosterilen  =  split(konularr, ",")

If efkan("soruid")=0  Then
konu_id = efkan("id")
ElseIf  efkan("soruid")<>0  Then
konu_id = efkan("soruid")
End If 

for  i = 0 to  ubound(gosterilen)
If  konu_id =CInt(gosterilen(i)) Then pass="evet" End if
Next

konum = konum&","&konu_id

If pass="evet" Then 'xxxx
Else 
say=say+1%>
<tr bgcolor="<%=bgcolor%>" <%=onmo%>><td><%=bullet%>

<% sor = "Select * from forumveri where onay=1 and id="&konu_id&" " 
efkan1.Open sor,Sur,1,3
if efkan1.eof or efkan.bof Then
Else %>
<A HREF="?part=forum&gorev=oku&id=<%=efkan1("id")%>&cat=<%=efkan1("altgrp")%>">      
<%=kucukharf(Left(efkan1("baslik"),90))%></a>
<% End If 
efkan1.close %></td></tr>

<% renk=renk +1
End If  'xxxx 
efkan.movenext
Loop
end If
efkan.close %></table>