StrYol = "dbyolu"
Set baglanti = Server.CreateObject("Adodb.Connection")
cobaglanti.Open "Provider=Microsoft.Jet.Oledb.4.0;Data Source = " & Server.MapPath(""&Stryol&"")

birde böyle denermisiniz