<%
Dim Conn
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0 ; Data Source="&Server.MapPath("../ecoms_datum/yes_datum.mdb")&""

Dim Connx
Set Connx= Server.CreateObject("ADODB.Connection")
Connx.Open "Provider=Microsoft.Jet.OLEDB.4.0 ; Data Source="&Server.MapPath("../ecoms_datum/yes_istatix.mdb")&""
%>



Admin kısmı ile bağlantı yapan sayfa bu.
Saygılarımla