error in a file lisp

[joe]

hi, in the following lisp the function in bold no longer returns the result, give me a solution please. autocad 2019

(defun cp3 ( )
(vl-load-com)
(setq ps 0.00000785)
(setq vol (vla-get-volume)vlax-ename->vla-object (car))
(setq pt (* ps vol))
(print (strcat "il peso è di kg..." (rtos pt))
(princ)
)

 

[dieva]

if the error message is "no definition function" or the corresponding in Italian
some antivirus or malware has deleted some autocad system files.
try reinstalling or repairing autocad by deactivating antivirus and similar.

 

[joe]

Nothing to do, I'll coach you
when selecting an object gives me the error, when I click empty gives me the result: "the total weight is kg 0"

 

[joe]

this I have attached is different from the previous one

 

[rpor66]

the object that selections has the volume property?

 

[joe]

is a solid

 

[dieva]

Nothing to do, I'll coach you
when selecting an object gives me the error, when I click empty gives me the result: "the total weight is kg 0"

works great . both pp and pp2
if you make a copy and paste error message Perhaps we have some more chances to understand what is the problem

 

[joe]

I inform you that the lisp and other 2 similar, worked with autocad 2017

 

[joe]

command: pp

seleziona solido: ; errore: no function definition: vlax-ename-gvla-object

 

[dieva]

command: pp

seleziona solido: ; errore: no function definition: vlax-ename-gvla-object

Okay.
you have to reinstall autocad by deactivating all antivirus, antispam, antitutto... .

vlax-ename->vla-object function is not recognized, is not available. . despite the
(vl-load-com). I don't know alternatives.

 

[joe]

but I did repair and reinstall after uninstalling the previous version 2017 and 2018

 

[joe]

how can a function of autocad be recognized as spam or virus? Is that what you mean?

 

[dieva]

how can a function of autocad be recognized as spam or virus? Is that what you mean?

Yes. is not as much function as a file or registry key. if you do a google search see that this is a very common problem.

 

[joe]

Okay. Thank you. Could you give me another solution for a lisp for steel weight calculation?

 

[joe]

so much for info: I had installed the English version 2019 and then downloaded the language pack ita. Now I have two autocad links 2019: ita and ingl. Is it normal? Can this be it?

 

[dieva]

I found an escamotage on the internet to bypass the function. I modified the pp2 command
allego file

 

[joe]

Okay.
I think it's okay.
but I try it in the morning because I finished my working time
Good evening

 

[joe]

hi dieva I'm sorry to disappoint you but it doesn't work, I tried to reinstall, but nothing neither in English nor in Italian. This lisp has always been useful to me for my job, can you not give me one more hand?
Thank you.

 

[dieva]

hi dieva I'm sorry to disappoint you but it doesn't work, I tried to reinstall, but nothing neither in English nor in Italian. This lisp has always been useful to me for my job, can you not give me one more hand?
Thank you.

ok, uploading the file lisp that I attached (pp2) in the previous message which error message appears ?

 

[joe]

Then this time I entered the right file, sorry was my mistake. Your correction works perfectly. But now you should explain to me what happened and if the correction I can apply it to other lisp that could cause problems. Meanwhile something happened even if I think visual lisp is loaded properly.