topic Re: Read text from .txt file and insert into text like a field or something in Visual LISP, AutoLISP and General Customization Forum

Read text from .txt file and insert into text like a field or something

kibitotato — Fri, 10 Mar 2023 16:11:04 GMT

Are there any way to have a txt file asociated to a proyect with multiple dwg and then use de txt file as a input of data to text field into the dwgs?

I dont know if I explained ok because my english is not a big thing... sorry about that.

love this forum.

Re: Read text from .txt file and insert into text like a field or something

ВeekeeCZ — Fri, 10 Mar 2023 16:20:46 GMT

As 'field' do you mean just MTEXT or actual FIELD that would change the content if the file changed?

Re: Read text from .txt file and insert into text like a field or something

kibitotato — Fri, 10 Mar 2023 16:22:54 GMT

the second one. Field that would change the content if the file changed

Re: Read text from .txt file and insert into text like a field or something

JTBWorld — Fri, 10 Mar 2023 16:22:58 GMT

It could be done. We have an app JTB Excel2TextField for reading from Excel so we could create something that reads from a text file too. If you are interested contact us through our website.

Re: Read text from .txt file and insert into text like a field or something

kibitotato — Fri, 10 Mar 2023 16:36:57 GMT

can´t pay so much for every lisp i want... to many desires... by the way. thanks for answering

Re: Read text from .txt file and insert into text like a field or something

john.kaulB9QW2 — Fri, 10 Mar 2023 16:49:06 GMT

why don't you use a block with ATTOUT and ATTIN (should be simple enough to automate as well).

Re: Read text from .txt file and insert into text like a field or something

kibitotato — Mon, 13 Mar 2023 12:05:34 GMT

Chat GPT made this to me- But it doesn´t work. Does it make any sense for anyone here? Thanks

(defun set-field-from-file (field-name file-path)
(setq file-content (with-open-file (file file-path :direction :input)
(loop for line = (read-line file nil)
while line
collect line)))
(setq field (tblsearch "FIELD" field-name))
(if field
(progn
(setq field-code (cdr (assoc 2 field)))
(setq field-prompts (cdr (assoc 3 field)))
(setq field-data (list (list (car field-prompts) (car file-content)))))
(setq field-code (rtos (vlax-invoke-method (vlax-ename->vla-object "acadDocumentManager")
'GetSystemVariable
(vlax-lookup-property (vlax-get (vlax-get-property (vlax-get-acad-object) 'Documents) 0)
'ActiveLayout))
2 2))
(setq field-data (list (list field-name (car file-content)))))
(command "_FIELD" "EDIT" field-code field-data ""))

Re: Read text from .txt file and insert into text like a field or something

pendean — Mon, 13 Mar 2023 12:39:30 GMT

@kibitotato ChatGPT is garbage, stop believing all the news hype about it 😉

Why don't you help us help you by sharing your TEXT file as well as a destination DWG file so we can all have a better understanding of your need and intent please?

or if you prefer using your native language, please do so here or if there is one then find your native language forum here https://forums.autodesk.com/

Re: Read text from .txt file and insert into text like a field or something

daniel_cadext — Mon, 13 Mar 2023 13:04:40 GMT

there's a textfilefield sample one of the older ARX SDKS, it works, you just need to bribe someone to compile it for you

shameless plug xlsx to field, office not required, its a trial, but it doesn't expire, but it will only evaluate the firs 20 fields

https://apps.autodesk.com/ACD/en/Detail/Index?id=4446191126131749248&appLang=en&os=Win64