Topic: DWG separate

[tmac]

hello，every master
 
  I have a probelm,for some days.there are many drawings frame in one dwg file,like  this
 
 
20160822102426.png
 
now, the problem is how can i separate every drawing by frame and save it independent DWG files。
 
the function maybe like this :http://through-the-interface.typepad.com/through_the_interface/2010/03/marchs-plugin-of-the-month-live-on-autodesk-labs-batch-publish-for-autocad.html
if you1will do it ,the c# code will be better.
 
thanks......

[tmac]

oh，come on ,somebody heip me

[ChrisCarlson]

I can't see anything...

can you be more descriptive??

[tmac]

http://forums.autodesk.com/t5/net/dwg-separate/m-p/6513577/highlight/false#M49863v


this is the same question,i asked.

do you catch on me？

[ChrisCarlson]

Code - Auto/Visual Lisp: [Select]

1. ;;;
2. ;;;    LayoutsToDwgs.lsp
3. ;;;    Created 2000-03-27
4.  
5. ;;; By Jimmy Bergmark
6. ;;; Copyright (C) 1997-2012 JTB World, All Rights Reserved
7. ;;; Website: www.jtbworld.com
8. ;;; E-mail: info@jtbworld.com
9. ;;;
10. ;;; 2003-12-12 Sets UCS to world in model space
11. ;;;            to avoid problem with wblock
12. ;;; 2011-06-06 Excludes empty layouts
13. ;;; 2012-06-01 Handle Map prompt with WBLOCK
14. ;;;             Include AutoCAD Map information in the export? [Yes/No] <Y>:
15. ;;; 2013-03-04 Added _ on some commands to internationalize it
16. ;;;
17. ;;;    For AutoCAD 2000, 2000i, 2002, 2004, 2005,
18. ;;;    2006, 2007, 2008, 2009, 2011, 2012, 2013 and newer
19. ;;;
20. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
21. ;;;   Creates separate drawings of all layouts.
22. ;;;   The new drawings are saved to the current drawings path
23. ;;;   and overwrites existing drawings.
24. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
25. (defun c:LayoutsToDwgs (/ errexit undox olderr oldcmdecho fn path
26.                           msg msg2 fileprefix i j)
27.  
28.   (defun errexit (s)
29.     (princ "\nError:  ")
30.     (princ s)
31.     (restore)
32.   )
33.  
34.   (defun undox ()
35.     (command "._undo" "_E")
36.     (setvar "cmdecho" oldcmdecho)
37.     (setq *error* olderr)
38.     (princ)
39.   )
40.  
41.   (setq olderr  *error*
42.         restore undox
43.         *error* errexit
44.   )
45.   (setq oldcmdecho (getvar "cmdecho"))
46.   (setvar "cmdecho" 0)
47.   (defun DelAllLayouts (Keeper / TabName)
48.     (vlax-for Layout
49.                      (vla-get-Layouts
50.                        (vla-get-activedocument (vlax-get-acad-object))
51.                      )
52.       (if
53.         (and
54.           (/= (setq TabName (strcase (vla-get-name layout))) "MODEL")
55.           (/= TabName (strcase Keeper))
56.         )
57.          (vla-delete layout)
58.       )
59.     )
60.   )
61.  
62.   (vl-load-com)
63.   (setq msg "" msg2 "" i 0 j 0)
64.   (command "._undo" "_BE")
65.   (setq fileprefix (getstring "Enter filename prefix: "))
66.   (foreach lay (layoutlist)
67.     (if (and (/= lay "Model") (> (vla-get-count (vla-get-block (vla-Item (vla-get-Layouts (vla-get-activedocument (vlax-get-acad-object))) lay))) 1))
68.       (progn
69.         (command "_.undo" "_M")
70.         (DelAllLayouts lay)
71.         (setvar "tilemode" 1)
72.         (command "_.ucs" "_w")
73.         (setvar "tilemode" 0)
74.         (setq path (getvar "DWGPREFIX"))
75.         (setq fn (strcat path fileprefix lay ".dwg"))
76.         (if (findfile fn)
77.           (progn
78.             (command "_.-wblock" fn "_Y")
79.             (if (equal 1 (logand 1 (getvar "cmdactive")))
80.               (progn
81.                 (setq i (1+ i) msg (strcat msg "\n" fn))
82.                 (command "*")
83.               )
84.               (setq j (1+ j) msg2 (strcat msg2 "\n" fn))
85.             )
86.           )
87.           (progn
88.             (command "_.-wblock" fn "*")
89.             (setq i (1+ i)  msg (strcat msg "\n" fn))
90.           )
91.         )
92.         (if (equal 1 (logand 1 (getvar "cmdactive")))
93.           (command "_N")
94.         )
95.         (command "_.undo" "_B")
96.       )
97.     )
98.   )
99.   (if (/= msg "")
100.     (progn
101.       (if (= i 1)
102.         (prompt "\nFollowing drawing was created:")
103.         (prompt "\nFollowing drawings were created:")
104.       )
105.       (prompt msg)
106.     )
107.   )
108.   (if (/= msg2 "")
109.     (progn
110.       (if (= j 1)
111.         (prompt "\nFollowing drawing was NOT created:")
112.         (prompt "\nFollowing drawings were NOT created:")
113.       )
114.       (prompt msg2)
115.     )
116.   )
117.   (command "._undo" "_E")
118.   (textscr)
119.   (restore)
120.   (princ)
121. )
122. (princ)

I know you are asking for .NET but give this a whirl? It's pretty old but rock solid

[tmac]

oh,bro,

my function is there are some drawings in one dwg file,maybe like batch plot tool

[dgorsman]

Want fries with that?

More seriously, the intention of this board is to help people write code, not do it all for them.  You'll get farther if you post what code you've had and point to the parts where you're hitting a roadblock.  If you have no code, if you cannot write code, then I'd recommend finding someone to hire (and no, that's not me).

[tmac]

lol

bro,i was wrote for some days,

now i can identify the drawing frame，

i mean you can show the important code,not all.

at last,if you like.

so,am i wrong???

[n.yuan]

Before you take pains to write code to solve the issue, or spend money to hire someone to do it, you may want to ask the one who create this drawing: is AutoCAD used correctly to generate the drawing? If the drawing is generated correctly, it is likely you do not need write any code to to batch plotting, for example, each frame could be on its own layout, and "Publish" command could be used to plot selected layout or all layout at one shot. writing code against badly created drawing is the last thing you want to do.

[Jeff H]

Before you take pains to write code to solve the issue, or spend money to hire someone to do it, you may want to ask the one who create this drawing: is AutoCAD used correctly to generate the drawing? If the drawing is generated correctly, it is likely you do not need write any code to to batch plotting, for example, each frame could be on its own layout, and "Publish" command could be used to plot selected layout or all layout at one shot. writing code against badly created drawing is the last thing you want to do.

Great point!
I am guilty of doing that and it never ends well.

[dgorsman]

Before you take pains to write code to solve the issue, or spend money to hire someone to do it, you may want to ask the one who create this drawing: is AutoCAD used correctly to generate the drawing? If the drawing is generated correctly, it is likely you do not need write any code to to batch plotting, for example, each frame could be on its own layout, and "Publish" command could be used to plot selected layout or all layout at one shot. writing code against badly created drawing is the last thing you want to do.

Great point!
I am guilty of doing that and it never ends well.

Hmmm.  As I read it that was "...LIKE batch plot tool..." to describe the operation, rather than specifically requesting that.

[tmac]

at last，I solved it,by myself.thanks everybody

[ChrisCarlson]

This thread is worthless if you don't share your solution