<% Set gkn3 = Server.CreateObject("ADODB.Recordset") sor3 = "Select * from haber where onay=1 order by id desc" gkn3.Open sor3,Sur,1,3 %> <% i=1 do while i < 11 and not gkn3.eof %>
<%=gkn3("tarih")%> - "><%=gkn3("haberbaslik")%><% gkn3.movenext i=i+1 Loop %>