Shelldocument

[CJ]

Please can anyone help, the instuction below used to work in '97 but 2003
does not like it at all????

Private Sub Doc_Name_DblClick(Cancel As Integer)
Dim retval

ShellDocument (Forms![Staff]!staff_docs.Form!Doc_Path)
'retval = Shell("C:\Program Files\WordView\WORDVIEW.EXE " &
Forms![Staff]!staff_docs.Form!Doc_Path, 1)
End Sub

 

[CJ]

It's OK now, I have sorted it now, thank you