Open Document Example (VBA)
This example shows how to call ISldWorks::OpenDoc6 .
'---------------------------------
'
' Preconditions: None
'
' Postconditions: Specified document is opened.
'
'---------------------------------
Option Explicit
Dim swApp As
SldWorks.SldWorks
Dim fileerror As
Long
Dim filewarning As Long
Sub main()
Set swApp = Application.SldWorks
swApp.Visible
= True
swApp.OpenDoc6
"d:\samples\hotrod.sldprt", swDocPART, swOpenDocOptions_Silent,
"", fileerror, filewarning
End Sub