Birincisinde MS SQL Server icin baglanti yapilmis, ikincisinde MS Access icin...
Yalniz bu ornekteki MS Access baglantisi acemi isi... MS Access'e baglanacagin sayfalarda su kodla baslayabilirsin:
<%
Option Explicit
const VERITABANI = "E:\veriler\veridosyam.mdb"
const KULLANICI = "admin"
const PAROLA = ""
dim cnn, rst, cmd
set cnn = server.CreateObject("ADODB.Connection")
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0" & _
";Data Source=" & VERITABANI & _
";Persist Security Info=false" & _
";User Id=" & KULLANICI & _
";Password=" & PAROLA
cnn.ConnectionTimeout = 15
cnn.CommandTimeout = 100
cnn.CursorLocation = 3
cnn.Open
set rst = server.CreateObject("ADODB.Recordset")
rst.ActiveConnection = cnn
set cmd = server.CreateObject("ADODB.Command")
cmd.ActiveConnection = cnn
%> |