<%
dim ThisIsFirst
ThisIsFirst = true
do while not kayit.eof
%> 
<ul id="slide_pager">
<li class="_<%=kayit("baslik") if ThisIsFirst then Response.Write("active")%>">
<a class="spot_item " title="<%=kayit("baslik")%>" href="/haber/kibris-harekâtindaki-gercekler-113027.htm">
<%=kayit("baslik")%>< /a></li>
</ul>
<%
if ThisIsFirst then ThisIsFirst = false
kayit.movenext
loop
baglanti.close
%>