Please help VB6 msaccess database sharing in Mapped Drive

Hi to all expert,

Patulong naman..

Shared ko po ang msaccess database gamit ang mapdrive, para makaconnect ang ibang pc gamit ang exe ko. Kaso ito lumalabas na error pagmarami na kami nakaka share sa database:

the database has been placed in a state by user 'admin' on machine 'XXX' that prevents it from being opened or locked

ito po ang code ko

Private Declare Function GetSystemMetrics Lib "user32" (ByVal Index As Long) As Long
Public rpb As New ADODB.Connection
Public jcc As New ADODB.Connection
Dim Location As String
Dim repLocation As String

Public Sub getConnected()
Dim ConnectionString, SQL As String

'On Error GoTo Err
'CONNECT DATABASE
Location = ReadINI("DATABASE", "DatabasePath", "TIMEKEEP.mdb")
Set rpb = New ADODB.Connection
rpb.CursorLocation = adUseClient
rpb.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Location & ";Persist Security Info=False;Jet OLEDBatabase Password=PassKo"
rpb.Open

rpb.Open- po ako may error?

Please help me naman to solve this..
Thanks