<?xml version="1.0" encoding="UTF-8"?>
<div class="widget">
                	<h3><% 
					dil=session("lang") 
					if dil="tr" then 
					%>Duyurular<% 
					end if 
					if dil="en" then 
					%>Announcements<% 
					end if 
					if dil="fr" then 
					%>Annonces<% 
					end if 
					if dil="ru" then 
					%>Объявления<%
					end if 
					if dil="ar" then 
					%>الإعلانات<% 
					end if 
					%></h3>		
                    <ul class="menu">
                        
						<%

Response.ContentType = "text/html" 
Response.Charset = "UTF-8" 

Set kesmi=Server.CreateObject("Adodb.Recordset")
tsorma="Select * From duyurular order by sira asc "
kesmi.open tsorma,baglanti,1,3

do while not kesmi.eof %>

				<% if kesmi("dil")=dil then %><li><a title="<%=kesmi("baslik")%>" href="duyuru_.asp?id=<%=kesmi("id")%>"><%=kesmi("baslik")%></a></li><% end if %>
                
           <% 
kesmi.movenext
loop
kesmi.close
Set kesmi=Nothing
%>

				
                    </ul><br>
       <%=duyuruaciklama%>

		

                </div>