Тема: Нестабильно грузится AutoCAD 2012 из внешней программы на VB.NET
Здравствуйте, коллеги!
Привожу код загрузки AutoCAD:
Private Sub CallProgDWG() Dim acadApp As Autodesk.AutoCAD.Interop.AcadApplication Dim StrCommand, FullNameFileDWG, NameFileDWG As String FullNameFileDWG = mass_dwg(0) NameFileDWG = System.IO.Path.GetFileName(FullNameFileDWG) MyPrinterLISP = Replace(MyPrinter, "\", "\\") StrCommand = "(load " & Chr(34) & "plot.vlx" & Chr(34) & ") (plotexe t(list " & Chr(34) & UCase(MyPrinterLISP) & Chr(34) & " nil nil " & Chr(34) & UCase(NameFileDWG) & Chr(34) & " " & Chr(34) & MyStyle & Chr(34) & " t)) " On Error Resume Next acadApp = GetObject(, "AutoCAD.Application.18") If Err.Number > 0 Then Err.Clear() acadApp = CreateObject("AutoCAD.Application.18") If Err.Number > 0 Then MsgBox(Err.Description) Exit Sub End If End If acadApp.Visible = True acadApp.Documents.Open(FullNameFileDWG) acadApp.ActiveDocument.SendCommand(StrCommand) End Sub
Подключены следующие библиотеки:
1) C:\Program Files\Autodesk\AutoCAD Architecture 2012\acdbmgd.dll
2) C:\Program Files\Autodesk\AutoCAD Architecture 2012\acmgd.dll
3) Autodesk.AutoCAD.Interop.dll
4) Autodesk.AutoCAD.Interop.Common.dll
Почему AutoCAD 2012 грузится не стабильно?
Помогите по возможности, долго не можем найти решение?