<%
'Veritabanına bağlanıyoruz.
set conn=server.createobject(
"adodb.connection"
)
conn.open=
"DRIVER={Microsoft Access Driver (*.mdb)};DBQ="
& server.mappath (
"db/database.mdb"
'Şimdi Kayıt nesnemizi oluşturuyoruz.
Set
rs=server.createobject(
"adodb.recordset"
'şimdi sql ile sorgu oluşturuyoruz.
sql=
"select * from tablo where kayit_tarih desc"
'şimdi kayıt nesnemiz olan rs ile tabloyu açtırıyoruz
rs.open sql,conn,1,3
%>
' Şimdi ise sql sorgusu ile aldığımız kayıtların sadece 10 tanesini gösterecek bir döngü yaratıyoruz
for i=1 to 10
<%= rs(
"kayit_tarih"
)%> <%= rs(
"kayit"
)%>
<% rs.movenext %>
<% next %>