topic Re: Load a VB.NET dll with a Lisp routine in .NET Forum

Load a VB.NET dll with a Lisp routine

Anonymous — Mon, 19 Jun 2006 14:10:25 GMT

I am used to load my VB.NET library's with a lisp routine.

This lisp routine is added to the "Startup Suite", so it should be loaded every time I start this profile of Autocad.
When I look in the list of loaded applications, this lisp routine shows up, so it should be loaded. If this is so then the command line in it (load the VB.NET dll) is not executed.

When I add this line to the Acad.lsp the dll will be loaded, but then it will be loaded in every profile and that is not what I want.

Is there another method to just load the dll I want in the profile I have chosen ? It should happen automaticly since my users dont want to push a button to start the loading of the dll.

with kind regards,

Harold van Aarsen

Re: Load a VB.NET dll with a Lisp routine

Anonymous — Mon, 19 Jun 2006 14:45:20 GMT

How you try to load VBA.NET dll? With (command ..) function?
I've not tested that but you can try to load it with (vla-SendCommand ...) function.

Re: Load a VB.NET dll with a Lisp routine

Anonymous — Mon, 19 Jun 2006 17:07:19 GMT

I use the following line:

(command "Netload" "c:/hsb-assist/Vz_Settings/DotNet/2006/acVogelzang2006.dll")

Could you tell me something more about the val-sendcommand ?

Re: Load a VB.NET dll with a Lisp routine

Anonymous — Mon, 19 Jun 2006 18:17:09 GMT

[code]
(setvar "filedia" 0)
(vl-load-com)
(vla-sendcommand (vla-get-activedocument (vlax-get-acad-object)) "_.netload \"c:/hsb-assist/Vz_Settings/DotNet/2006/acVogelzang2006.dll\"\n")
[/code]

Re: Load a VB.NET dll with a Lisp routine

Anonymous — Tue, 20 Jun 2006 01:36:34 GMT

where have you put it?

if it is in your acaddoc.lsp it may be exicuted before the command line is
initialized so doesn't actually run. if so look at (defun s::startup) this
is run after the commandline is initilaized.

wrote in message news:5210988@discussion.autodesk.com...
I use the following line:

(command "Netload"
"c:/hsb-assist/Vz_Settings/DotNet/2006/acVogelzang2006.dll")

Could you tell me something more about the val-sendcommand ?

Re: Load a VB.NET dll with a Lisp routine

Anonymous — Tue, 20 Jun 2006 05:06:20 GMT

Could you give me an example of how to create a lisp routine with the s::startup routine so the netload wil be performed after initialization.

This because netload has to performed after initialization

Re: Load a VB.NET dll with a Lisp routine

Anonymous — Tue, 20 Jun 2006 05:16:51 GMT

is it this simple ????!

(defun s::startup ()
(command "Netload" "c:/hsb-assist/Vz_Settings/DotNet/2006/acVogelzang2006.dll")
);defun s::startup

It seems do its job just fine.

Please if somebody has other ideas please tell them here I am always in for improvement.

Re: Load a VB.NET dll with a Lisp routine

Anonymous — Tue, 20 Jun 2006 07:20:18 GMT

from the autocad help

(defun-q MYSTARTUP ( )... your startup function ... )(setq S::STARTUP
(append S::STARTUP MYSTARTUP))note this will run each time a drawing is
loaded wrote in message
news:5211693@discussion.autodesk.com...
is it this simple ????!

(defun s::startup ()
(command "Netload"
"c:/hsb-assist/Vz_Settings/DotNet/2006/acVogelzang2006.dll")
);defun s::startup

It seems do its job just fine.

Please if somebody has other ideas please tell them here I am always in for
improvement.

Re: Load a VB.NET dll with a Lisp routine

Anonymous — Tue, 20 Jun 2006 15:18:20 GMT

Harold, you do need to use the append approach shown in the documentation.
The approach you used in your post overwrites any other prior startup
functions, which could cause other customizations to fail.

Also, the append approach assumes the other developers used defun-q when
they appended to the S::Startup function, which can be a poor assumption.

<>

--
R. Robert Bell

"Mark Gardiner" wrote in message
news:5211718@discussion.autodesk.com...
from the autocad help

(defun-q MYSTARTUP ( )... your startup function ... )(setq S::STARTUP
(append S::STARTUP MYSTARTUP))note this will run each time a drawing is
loaded wrote in message
news:5211693@discussion.autodesk.com...
is it this simple ????!

(defun s::startup ()
(command "Netload"
"c:/hsb-assist/Vz_Settings/DotNet/2006/acVogelzang2006.dll")
);defun s::startup

It seems do its job just fine.

Please if somebody has other ideas please tell them here I am always in for
improvement.