AutoCAD VB :: Extract Embedded Project Using Lisp Or VBA
Dec 21, 2011Is there is a way to extract embedded VBA project using lisp or vba?
View 4 RepliesIs there is a way to extract embedded VBA project using lisp or vba?
View 4 RepliesI have a jpg file that I must use as a background in a Dreamweaver project. There is some text embedded in it that I can't edit. I have tried using Illustrator and Photoshop but I lack experience so I'm probably missing something.
The file address is lecaff.fr/images/home_banner.jpg
I'm looking for a way to add custom data in dwf files. We currently create 3D models which get exported to dwf format so that we can share information with clients. Ideally, we'd like them to be able to click on any member and have the software provide additonal information about that part. Example, part number. It would be awesome if the client could then say double click that part and have the actual detailed part drawing open up.
The parts we are trying to reference are generated using a third party application, so they are not solids, but the information is easily accessible in LISP.
How do you extract an Export to DWG setup .txt file from a Revit project model?
View 3 Replies View RelatedI need a lisp routine that will allow me to pick a polyline and label with azimuth and distance (direction-north, clockwise) of a new WCS.
Is there any code that extract information for a new WCS?
I have a drawing that has an aerial Images inserted into it using a WMS Connection How to extract Image Name through Autolisp from this
View 5 Replies View RelatedI am trying to write a lisp file that extracts the LAYER, Z, X, Y, TEXT HEIGHT, POINT NUMBER, from the attached DXF file. Ultimately I will have the lisp insert a "POINT" at the X,Y,Z, cords, and then a "TEXT" entity at the same coordinates with the text height value and the point number string. Both entities need to be on the layer ending in "-PN". The layer name will change depending on the date. I have a third party program that creates the DXF file.
The point of the lisp file is to insert the point numbers and points into my drawing at their correct locations. For the life of me I can not make this work. I have attached the little bit of lisp I have, which unfortunately does not work properly because of it searching for the "TEXT" entry in the DXF file of which there are three per point number. I only need one. I have also attached the DXF file I have. maybe just an overall procedure that I can then code myself? I'm just not good at getting lisp to read a file and extract what I want from it.
I would like a lisp routine that can extract and export the x, y, z coordinates of all the points in a drawing into a text file so I can use the same in excel.
View 9 Replies View RelatedI’m looking to extract the second from the last directory within the dwgprefix of
"P:Projects66 Structural666-4800-00 TPA666-4815-00 Res4815 Res Figures" (i.e. 666-4815-00 Res)
This is what I have so far:
(defun c:tmp ( )
(setq P1 (getpoint "
Pick point: "))
(command "text" P1 "" ""
(strcat
(vl-filename-base
(vl-string-subst "." "\" (getvar 'dwgprefix) (vl-string-position (ascii "\") (getvar 'dwgprefix) nil T))
))))
I have text with number string. ( eg: weight 50 kg, xyz weight 362 kg)i want to extract the number values of "50" & "362" from the text string.
View 9 Replies View RelatedA quick lisp routine to extract the elevations of a selection set of 2d polylines? I have a massive "contour" file composed of 2d polylines with elevations. I need to find the min and max polyline elevation in selected areas. I can't figure out how to extract just the elevations of my selected polylines so I can quickly see the elevation values?
View 9 Replies View RelatedI've got a linetype that's part of our autocad template file and has been for so long that nobody around here even knows where the original line file is.
I need to extract the linetype out so that I can make some minor modifications. I did do a search and found a nifty lsp routine from Paul Turvill. (Here's the thread that pointed me there: [URL] ..........
I ran it and it SEEMED to work. All the linetypes in the file it created look good EXCEPT for the one I needed to extract. That one looks like this in the line file:
*TREELINE,Series of arcs used to indicate tree drip lines
A,0.0001,-0.0001,
The linetype DOES display properly in the dwg file (meaning lines drawn using it look good).
how to extract value X Y Z of point p3 p4
(defun c:test ()
(vl-load-com)
(setq actdoc (vla-get-ActiveDocument (vlax-get-acad-object)))
(setq objm (vla-get-ModelSpace actdoc))
(setq obju (vla-get-Utility actdoc))
(setq oldhigh (getvar "Highlight") oldsnap (getvar "Osmode") oldblip (getvar "BlipMode") oldecho (getvar "Cmdecho") );setq
(setvar "Highlight" 0) (setvar "Osmode" 517) (setvar "Cmdecho" 0) (setvar "Blipmode" 0)
[code]....
I have a inserted block with 4 tags for Length, Thickness, Elevation and Width.How can extract attributes tag values and draw a closed polyline + 2 internal lines, parallel to the block?
Block Name: ID_DATA
Tags: LEN, THI, ELE and WID.
Each internal line placed in a third width.
I'm dimensioning an old drawing with the real (measured) dimensions and with the drawing dimensions in brackets (using ' 1500 (<>)' to give '1500 (1505)' for example.
What I'd like is to also be able to put on the difference between the length I type in and the length in brackets - as this would let me see any really glaring errors that can't be attributed to user-error on the laser measure.So I could type in '1500 (<>) (X)' where X is the formula, and get ' 1500 (1505) (5)' back?
How to be able to run a script that could highlight any dimensions where the number is brackets and the typed number have a a difference of, say, 50.Or failing that, any way to extract all the dimension text at the end into excel so I can see the differences myself?
how to sensibly extract angular dimensions as attributes.
I can extract the attributes from a block containing angular dimensions, the attributes list angular dimensions as a field but don't actually list the number of degrees for the angular dimension.
It is the number of degrees that I am actually trying to obtain - but I cannot work out how to obtain the information
Is that possible to have a lisp to extract the Field Expression of a attribute in a block?Specifically, to extract the property VALUE (TextString) of this attribute.After to extract, I would like to put this text extracted in a different layout tab, in the same drawing. In this way, I will have a text linked to the attribute value between two layout tabs. So, when I have to change the attribute value, the text will be updated automatically.
I know that if I use the FIELD command to manually copy and paste this value it will work, but when I have a lot of attributes it becomes very laborious.
I design a small plant in Autocad 2012. For the pipes we used cylinders and boxes(for square pipe), now we need to make the bill of materials, but I don't know how to extract the data from each cylinder(radius and height) or box.
It is possible to do this?
I place a small sample from the plant. Totally I am having around 6000 elements.
How can I extract all layers in an open drawing to a notepad or txt file?
View 7 Replies View RelatedI was wondering if it was the COND statement that I would need to use to evaluate a block to confirm that two attribute tags existed and if so, if would process the block to perform an attribute extraction of both of those tags. It would ignore blocks that only had one or the other attribute tags - and only extract the attribute values if the block had BOTH of the tags present - It could be blank, but it had to exist.
For example, I want to find blocks that have the attribute tag "PART_A" and "ID" - and then create a CDF that has the value of "PART_A" in the first column and "ID" in the second column. Then it closes my CDF file.
Then, I want it to scan my drawing again for blocks that contain attribute tag "PART_B" and "ID" and then re-open that CDF file and append the values so that the values of teh attribute "PART_B" is in the first column and the values of the tag "ID" are in the second column.
I have been playing with the following code --- is there anyway to modify the code to get it to do what I need? I have already removed the part that writes the header-row....
We have stored lisp in fileserver which 30 users can access it. Now a day some users have getting the ‘failed to open project’ error after load the Lisp due to this they r also not getting most of the commands. The full rights have been given to appropriate folder which contains (Autolisp application source file, .vlx, Autocad VBA source). It has working for limited users (8-10 users).
Server OS: Windows server 2008
Note: Previously we had used windows server 2003.
I have a Project Template that is used when creating a new project. I noticed that the Tool Palette in the Project Template and the Tool Palette in the new Project are not the same. How do I get the new Projects to pull the same Tool Palettes from the Project Template?
View 2 Replies View RelatedHow can I change the way the Project Browser maps the creation of new projects?
Currently, the new project folder is created and named according to the Project Name prompt. We want the folder to be named according to the Project Number prompt...
Is it possible to assign a project number to a project file and have it fill in the project Iproerties field?
View 2 Replies View RelatedI have to set up a project in Navigator so we can get started on it but I will have to go back and change the project number when we get it.
My question is how do I change the project no so that it re paths everything and reorganizes itself numerically in Windows Explorer...or should I just create a new project in Navigator and copy the files I need into the new project?
I do not have vault installed and I am trying to add sub files to my project. As of now my project has to find many of my files and I do not want to copy and past them into my project folder as this will mess with my parts numbering system. I want only one part / assembly file per part. I assume that you can do this with the project dialog box or some other system tool I just can not seem to figure it out.
View 1 Replies View RelatedI am working on batch processes and have some files with Embedded VBA Projects. This has spread to several files now because of our work flow - open an old file, save with a new name. Attached is the dialog that is displayed when the files are opened in the editor. I would like to "extract" the embedded macros in .NET. They do not need to be there and they interupt the batch processes. I know I could un-check the "Always ask before opening projects with macros" but I would rather extract / remove them.
View 4 Replies View RelatedCan you embed a table in Mtext? So when you edit the text the tables move with the text if you're taking out paragraphs in Specs and stuff.
View 2 Replies View RelatedIs there any way you can access an AutoCAD file embedded in an IDW by using VBA?I have an IDW with about 100 sheets; it would like to control which file is embedded in each of the sheets.
The best would be to use linked files but I do not know how to make certain files visible on certain sheets.
I have an Embedded spreadsheet in a .ipt file. I want to access the data in it using iLogic, but i keep getting this error...
GoExcel: 3rd Party worksheet not found: "3rd Party:Embedding 1", Sheet: "Sheet1"
Do I need to declare the spreadsheet somehow, or is there something else I missing? This is the only code I have in the rule...
i = GoExcel.FindRow("3rd Party:Embedding 1", "Sheet1", "ID", "=", 1
I have used the command "insert object" to embed an excel sheet. I can see in the modelbar the new stage called "3rd Party", expanded I also see "Embedding 1". If I use edit I can see my excel sheet. So far good.
My next task is to create a Rule to recall cells in the sheet. I use the command CellValue (embedded) to pick my cell value. My problem is that then I close my rule-editor I got the error:
Error in rule: Rule0, in document: Box test.ipt
GoExcel: 3rd Party worksheet not found: "3rd Party:Embedding 1", Sheet: "Sheet1"
It seems like I´m not able to recall my cellvalues.Whats the difference between embedding a excelsheet as above or use the add link command i Parameters window?