I am using Vista Ultimate and Visual Studio 2005. I have followed the instructions in regards to setting up the PRO_COMM_MSG_EXE environment variable and running the batch file to register the COM server (vb_api_register.bat) I think I have done everything right, but when I run the example code I get an error: pfsExceptions::XToolkitGeneralError Imports pfcls Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click runProE("C:\Program Files\proeWildfire 4.0\bin\proe.exe", "C:\") End Sub Public Sub runProE(ByVal exePath As String, ByVal workDir As String) Dim asyncConnection As IpfcAsyncConnection = Nothing Dim cAC As CCpfcAsyncConnection Dim session As IpfcBaseSession Try '====================================================================== 'First Argument : The path to the Pro/E executable along with command 'line options. -i and -g flags make Pro/ENGINEER run in non-graphic, 'non-interactive mode 'Second Argument: String path to menu and message files. '====================================================================== cAC = New CCpfcAsyncConnection asyncConnection = cAC.Start(exePath, ".") session = asyncConnection.Session '====================================================================== 'Set working directory '====================================================================== asyncConnection.Session.ChangeDirectory(workDir) '====================================================================== 'VB api process calls and other processing to be done '====================================================================== Dim descModel As IpfcModelDescriptor Dim model As IpfcModel descModel = (New CCpfcModelDescriptor).Create(EpfcModelType.EpfcMDL_PART, "partModel.prt", Nothing) model = session.RetrieveModel(descModel) Catch ex As Exception MsgBox(ex.Message.ToString + Chr(13) + ex.StackTrace.ToString) Finally '====================================================================== 'End the Pro/ENGINEER session when done '====================================================================== If Not asyncConnection Is Nothing AndAlso asyncConnection.IsRunning Then asyncConnection.End() End If End Try End Sub End Class Can somebody tell me what I am doing wrong? thanks
This thread is inactive and closed by the PTC Community Management Team. If you would like to provide a reply and re-open this thread, please notify the moderator and reference the thread. You may also use "Start a topic" button to ask a new question. Please be sure to include what version of the PTC product you are using so another community member knowledgeable about your version may be able to assist.
