I used a hyperlink function in one of my forms to go to other forms in Access 2000. Now we upgraded to Access2003 and the links no longer works. Here is the code of one of the links
Private Sub Label5_Click()
'Exit Main module and go to Client Reference Tables Management
Const strCompactorMDB = "C:\GAAP\FRISMClient\FRISM
ClientRef.
mdb"
Dim strCommandLine
Dim dbl_D As Double
strCommandLine = Quote(SysCmd(acSysCmdAcces
sDir) & _
"MSACCESS.EXE") & " " & Quote(strCompactorMDB) & _
" /cmd " & Quote(CurrentDb.Name)
dbl_D = Shell(strCommandLine, vbNormalFocus)
Application.Quit acQuitSaveAll ' close the current databasee
End Sub
Also, how do you do this in MS Access 2007