<%
Set baglanti = Server.CreateObject("Adodb.Connection")
baglanti.open "Provider=Microsoft.Jet.Oledb.4.0; Data Source=" & server.MapPath ("../data/genel.mdb")

set rsAyarlar = Server.CreateObject("Adodb.Recordset")
rsAyarlar.open "Select * form Ayarlar",baglanti,1,3

response.write (rsAyarlar("siteadi"))
%>