<% Set Conn = Server.CreateObject("Adodb.Connection") Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source="& Server.Mappath("../../db/news.mdb") &";" Set Rs = Server.CreateObject("Adodb.Recordset") rSQL ="select * from haberler where yayin <> 0 order by sira" Rs.Open rSQL, Conn, 1,3 for i = 1 to rs.recordcount %> " <%=rs("tarih")%> <%=rs("baslik")%> <% rs.movenext next %>     © Copyright 2006 - Şekerler Turizm & Taşımacılık Ltd. Şti. - Tüm Hakları Saklıdır. Designed by Elite Bilgisayar