Open External Files

[Aarong]

I am attempting to open a Visio file from a command button on my form, referencing a field on the same form. I can get the app to open, but not the file. Any hints?

 

[parry]

Hi ya, you need to include both path to visio and file. example:-

Private Sub Command41_Click()
On Error GoTo Err_Command41_Click

Dim stAppName As String

stAppName = "C:Program FilesVisiovisio32.exe H:userdataDoubleDebit.vsd"
Call Shell(stAppName, 1)

Exit_Command41_Click:
Exit Sub

Err_Command41_Click:
MsgBox Err.Description
Resume Exit_Command41_Click

End Sub

 

[Aarong]

That works until you insert a field name. I am trying to pull floor plans for businesses in the database. Each business has an individual drawing file. When I click the command button, I would like to pull the file based on the business record that is active. The field is [Business].FloorPlan and the path is c:Program FilesVisioDrawings.
Thanks