<%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
%>
SAMSUN TİCARET BORSASI - SAMSUN EXCHANGE OF COMMERCE
