G
Guest
I have an Access 97 database that is currently being used by multiple users, I have created and .mde file and a short cut to that file. I have a button on a form that I am tring to re-direct the user to another database (for data entry only) so that they do not have to remember to open up a couple of databases. The current event I created is as follows
Private Sub btnopnnewdbase_Click(
On Error GoTo Err_btnopnnewdbase_Clic
Dim stAppName As Strin
Dim stTestVal As Intege
Dim Qte: Qte = Chr(34
'Check system to see if Runtime or Full Version of Access installed - Runtime = -
stTestVal = SysCmd(acSysCmdRuntime
If stTestVal = -1 The
stAppName = Qte & "C:\Program Files\Microsoft Office\Office\MSACCESS.EXE" & Qte &
" /runtime " & Qte & "\\lexfile13\finance\PSSDDB\PSSDFD Prospecting Database.mde" & Qt
Els
stAppName = "msaccess.exe \\lexfile13\finance\PSSDDB\PSSDFD Prospecting Database.mde
End I
Call Shell(stAppName, 1
Exit_btnopnnewdbase_Click
Exit Su
Err_btnopnnewdbase_Click
MsgBox Err.Descriptio
Resume Exit_btnopnnewdbase_Clic
End Su
My first problem is that when I click on the button, I get an error that access command line used to start access contains and option that access does not recognize. When I click on OK (a couple of times) I get my second error: microsoft can not find a mdb file. The mdb file does not exist as I have created the mdb and put it in another folder
Any suggestions
Mickey
Private Sub btnopnnewdbase_Click(
On Error GoTo Err_btnopnnewdbase_Clic
Dim stAppName As Strin
Dim stTestVal As Intege
Dim Qte: Qte = Chr(34
'Check system to see if Runtime or Full Version of Access installed - Runtime = -
stTestVal = SysCmd(acSysCmdRuntime
If stTestVal = -1 The
stAppName = Qte & "C:\Program Files\Microsoft Office\Office\MSACCESS.EXE" & Qte &
" /runtime " & Qte & "\\lexfile13\finance\PSSDDB\PSSDFD Prospecting Database.mde" & Qt
Els
stAppName = "msaccess.exe \\lexfile13\finance\PSSDDB\PSSDFD Prospecting Database.mde
End I
Call Shell(stAppName, 1
Exit_btnopnnewdbase_Click
Exit Su
Err_btnopnnewdbase_Click
MsgBox Err.Descriptio
Resume Exit_btnopnnewdbase_Clic
End Su
My first problem is that when I click on the button, I get an error that access command line used to start access contains and option that access does not recognize. When I click on OK (a couple of times) I get my second error: microsoft can not find a mdb file. The mdb file does not exist as I have created the mdb and put it in another folder
Any suggestions
Mickey