Imports ZwSoft.ZwCAD.Runtime
Imports ZwSoft.ZwCAD.EditorInput
Imports ZwSoft.ZwCAD.ApplicationServices
Public Class ZwApps
<CommandMethod("OpenFile")> _
Public Sub OpenFile()
Dim process As Process
Dim ZcED As Editor = Application.DocumentManager.MdiActiveDocument.Editor
Dim filePath As String = "c:/ZWCAD_Tools_Help.pdf"
Try
process = process.Start(filePath)
Catch ee As System.Exception
ZcED.WriteMessage("Error:" & ee.ToString() + vbLf)
End Try
End Sub
End Class
Imports ZwSoft.ZwCAD.EditorInput
Imports ZwSoft.ZwCAD.ApplicationServices
Public Class ZwApps
<CommandMethod("OpenFile")> _
Public Sub OpenFile()
Dim process As Process
Dim ZcED As Editor = Application.DocumentManager.MdiActiveDocument.Editor
Dim filePath As String = "c:/ZWCAD_Tools_Help.pdf"
Try
process = process.Start(filePath)
Catch ee As System.Exception
ZcED.WriteMessage("Error:" & ee.ToString() + vbLf)
End Try
End Sub
End Class