hexagon logo

Auto export DXF

I didn't find anything on this topic so the question is can a dxf be automatically exported?
  • good day,

    you can call the export command with a script.
    Unfortunately the dxf export dialog comes up too, and it seems you can only remotely control this dialog with complicated windows api commands.


    ' Dim something ---------------------------
      Dim App As Object
      Set App = CreateObject("PCDLRN.Application")
      Dim Part As Object
      Set Part = App.ActivePartProgram
      Dim retVal As Boolean
    
    ' Do ---------------------------
      retVal = Part.Export("C:\Users\QS\Desktop\Test123.dxf")
      If retVal Then
        App.StatusBar = "DXF: ok"
      Else
        App.StatusBar = "DXF: fail"
      End If
     
    ' unDim something ---------------------------
      Set Part = Nothing
      Set App = Nothing
    


    therefore rather difficult to implement