Need help...how to link Visual basic & database

zed

Member
Dec 28, 2007
5,703
6
0
34
in bootsector
2nd, create a "data" range in u r work sheet

hp1py7.jpg
 

sameera15852

Member
Sep 4, 2008
1,504
132
0
Godagama, Homagama
This is source code for open access database


Dim DB As New ADODB.Connection
Dim RS As New ADODB.Recordset
If DB.State = adStateClosed Then
'Open Setup Database-----------------------------------
DB.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Databases\DB.Mdb" & ";Jet OLEDB:Database Password=spj1234"
'This cursor is on the client machine instead of the server
DB.CursorLocation = adUseClient
DB.Open
End If