<%
Set Sur = Server.CreateObject("ADODB.Connection" )
Sur.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb" )
' Yukarda mdb dosyamizin yerini belirledik ve ve baglantiyi kurduk..
Set RS = Server.CreateObject("ADODB.Recordset" )
sor = "Select * from tablo"
'Tablomuzu seciyoruz..
RS.Open sor,Sur,1,3
'Burada ise rs baglantimizi aciyoruz..
%>
Aciklamalar :
sor = "Select * from tablo" ile tablo secenegimizi seciyoruz..
Eger biz bunu
sor = "Select * from tablo order by id desc" deseydik tablomuzdaki verileri id numaralarina gore siraliycakti.. Yani.. en yeni eklenen veri en üstte yerini alacakti.. Mesala siz bir Download Arsivi olusturdunuz.. Dosyalari aldiklari hite gore siralicaksiniz.. o zman ise yine yukardaki gibi sql satirimiz soyle olacak :
sor = "Select * from tablo order by hit desc" boyle ise veriler aldiklari hite gore yukardan asagiya dogru dizilirler..
NOT :
* Veritabanimizin yolumu gosterirken
DBQ=" & Server.MapPath("database.mdb") olarak gosterdigimizde vt ile baglantisini kurdugumuz asp dosyasi ile ayni klasordedir..
DBQ=" & Server.MapPath("../database.mdb") db yolu satirimiz boyle olsaydi. Yani basina " ../ " gelseydi.. Database klasorumuz bir ust klasordedir demektir..
* Burada verilerimizi <%=RS("alan1" ) %> sekline ekrana gosteriyoruz..