<%@LANGUAGE="VBSCRIPT" CODEPAGE="1254"%>
<%
Response.Buffer = True
Set baglanti = Server.CreateObject("ADODB.Connection")
'baglanti.open "driver={SQL Server};server=;uid=;pwd=;database="
baglanti.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("asddd/erolll###.mdb")