With myCon
.ConnectionString = "provider=microsoft.jet.oledb.3.51;" & _
"persist security info=false;" & _
"data source=e:\modul\vcd.mdb;"
.Open
End With
Jika database Microsoft Access2000/XP, maka providernya
With myCon
.ConnectionString = "provider=microsoft.jet.oledb.4.0;" & _
"persist security info=false;" & _
"data source=e:\modul\vcd.mdb;"
.Open
End With
Jika database ODBC, maka providernya
With myCon
.ConnectionString = "provider=msdasql.1; DNS=dnsName; UID=userName;
PWD=userPassword;"
.Open
End With
Jika database SQL Server
With myCon
.ConnectionString = "provider=sqloledb; Data Source=serverName;" & _
"Initial Catalog=databaseName" & _
"UID=userName; PWD=userPassword;"
.Open
End With
Jika database ORACLE
With myCon
.ConnectionString = "provider=msdaora; Data Source=serverName;" & _
"UID=userName; Password=userPassword;"
.Open
End With
Download materi ini
0 comments:
Post a Comment