VB6
Ms Access
With DBSchede
.ConnectionString = "Driver=Microsoft Access Driver (*.mdb);DBQ=" & App.Path & "\db\SCHEDE.mdb"
.Open
.CursorLocation = adUseClient
End With
VB6
Ms Access
With DBSchede
.ConnectionString = "Driver=Microsoft Access Driver (*.mdb);DBQ=" & App.Path & "\db\SCHEDE.mdb"
.Open
.CursorLocation = adUseClient
End With