Extract info to txt

GRONDIF01NG9V8 — Wed, 15 May 2024 14:02:01 GMT

Hello

I have a LSP who extract information from block call "NUM", yellow number in dwg . I need to put TAB or ; in each information extract for parcing that information in SQL.

information extract was give by nu.txt

Re: Extract info to txt

paullimapa — Wed, 15 May 2024 17:53:56 GMT

Three problems:

1. you cannot use any TAB codes but only the spacebar inside the NU.txt file

2. you also need to include these lines on the top of NU.txt:

C:DELIM { C:QUOTE ^

3. Change this line: NUMERO N006000 to this NUMERO C007000 then it'll extract out as a separate column

Also for testing, your Cable.lsp is missing a function CHOIX in this line:

(SETQ A (CHOIX "\nSELECTIONNEZ LE NUMÉRO DU FICHIER: "))

To make it run I replaced it with this:

(SETQ A (car(entsel "\nSELECTIONNEZ LE NUMÉRO DU FICHIER: ")))

Also for my testing I replaced the following lines:

; (SETQ D "G:\\DESSIN\\APPLACCESS\\GCBL\\") ; (SETQ F "G:\\DESSIN\\APPLACCESS\\GCBL\\NU.TXT")

With these:

(setq D (getvar"dwgprefix")) (setq F (strcat D "NU.TXT"))

With the above changes I run Cable.lsp & attached is NUM.txt

You should be able to open this text file in Excel with the proper columns formatted:

Also attached is modified NU.txt to properly extract the block attributes

Re: Extract info to txt

GRONDIF01NG9V8 — Wed, 15 May 2024 18:07:43 GMT

thanks

Re: Extract info to txt

paullimapa — Wed, 15 May 2024 18:19:21 GMT

glad to have helped...cheers!!!

topic Re: Extract info to txt in Visual LISP, AutoLISP and General Customization Forum

Extract info to txt

Re: Extract info to txt

Re: Extract info to txt

Re: Extract info to txt