%session.codepage=1254%> <% Set Sur = Server.CreateObject("ADODB.Connection") Sur.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/database.mdb") '** Database ba?ant?? Set Cengelkoy = Server.CreateObject("ADODB.Recordset") sor = "Select * from haber ORDER BY id DESC" Cengelkoy.Open sor,Sur,1,3 '** Sayfalar aras?ge??kural? git = Request.QueryString("git") if git="" then git=1 end if %>
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||