topic Betreff: How to save a file in DXF? in .NET Forum

How to save a file in DXF?

Anonymous — Tue, 11 Oct 2011 11:26:49 GMT

Please help!

Betreff: How to save a file in DXF?

Alfred.NESWADBA — Tue, 11 Oct 2011 11:50:53 GMT

Hi,

is that what you are missing?

   <Runtime.CommandMethod("ADESK_saveAsDxf")> _
   Public Shared Sub ADESK_saveAsDxf()
      Dim tFileName As String = "C:\TEMP\myDxfFileName.DXF"
      Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.Database.DxfOut(tFileName, 6, Autodesk.AutoCAD.DatabaseServices.DwgVersion.Current)
   End Sub

- alfred -

Betreff: How to save a file in DXF?

Anonymous — Tue, 11 Oct 2011 11:58:48 GMT

I used this code:

        [CommandMethod("DrawingSaved")]
        public static void DrawingSaved()
        {
            Document acDoc = Application.DocumentManager.MdiActiveDocument;

            Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument.Database.DxfOut(acDoc.Name, 6, Autodesk.AutoCAD.DatabaseServices.DwgVersion.Current);

        }

But it's giving error: Exception was unhandles by user code

eFileAccessErr

Betreff: How to save a file in DXF?

Alfred.NESWADBA — Tue, 11 Oct 2011 12:09:32 GMT

Hi,

if you take acDoc.Name as name for your DXF-file you will recognize, that it will have included the extension ".DWG", but if you want to save it as DXF you should have DXF as extension 😉

   <Runtime.CommandMethod("ADESK_saveAsDxf")> _
   Public Shared Sub ADESK_saveAsDxf()
      Dim tAcadDoc As ApplicationServices.Document = Autodesk.AutoCAD.ApplicationServices.Application.DocumentManager.MdiActiveDocument
      Dim tFileName As String = tAcadDoc.Name
      If tFileName.ToUpper.EndsWith(".DWG") Then tFileName = Left(tAcadDoc.Name, tAcadDoc.Name.Length - 4) & ".DXF"
      tAcadDoc.Database.DxfOut(tFileName, 6, Autodesk.AutoCAD.DatabaseServices.DwgVersion.Current)
   End Sub

HTH, - alfred -

Re: How to save a file in DXF?

Anonymous — Tue, 11 Oct 2011 12:59:22 GMT

My file was already in the extension. Dxf

🙂 Since yesterday I'm puzzling over it but nothing works 😞

It worked using the command line.

acadDocument.SetVariable("FILEDIA", 0);

acadDocument.SendCommand("SAVE " + FileTxt.FullName + "\nv\n2007\n16\nyes\n");

acadDocument.SetVariable("FILEDIA", 1);

I was creating a dll just to save, so it is better not to have to create a dll.

Thank you!

Re: How to save a file in DXF?

Alfred.NESWADBA — Tue, 11 Oct 2011 13:24:10 GMT

Hi,

>> My file was already in the extension. Dxf

Ok, the more info, the better we can "debug" 😉

Well the DXFOUT-function exports the current drawing, but it is not to compare with SAVEAS, it's more like WBLOCK. And for WBLOCK you know, that if you are working on a drawing AA.DWG you cannot start WBLOCK and export some elements to AA.DWG ==> you have to take another filename.

And same situation is to use for DXFOUT, you cannot use the same name as you already have opened.

- alfred -

Re: How to save a file in DXF?

Anonymous — Tue, 11 Oct 2011 13:21:44 GMT

That must be what was wrong then.
Good to know, I'll try!