Detecter un projet VBA

Dans mon précédent post je vous présente mes outils sur Autocad mais j'ai encore un problème avec:

Je n'arrive pas à détecter la présence ou non d'un projet VBA en mémoire par une commande Lisp ou Autocad.

Quelqu'un peut il m'aider ?

Bonjour à toutes et tous,

Que veux-tu faire exactement ?

Le projet doit-il être chargé ?

Alt+F8 te permet de voir tous les projets chargés, non ?

Voila : j'ai des outils qui sont des macros inclus dans des projets VBA.

Ils sont lancés par des fichiers lisp qui chargent d'abord le projet contenant la macro :
(command "vbaload" "\\e-methodes\\Trace_grues\\Trace_grues.dvb")
(command "execVba" "Trace_Grues")

à la première utilisation dans une session Autocad l'utilisateur doit valider l'activation des macros, ce qui est ok pour la sécurité.

mais lors de l'utilisation suivante la première commande génère un message d'erreur car le projet est déjà chargé. C'est ce que je voudrait éviter.

NB : l'utilisation de (command "commandeAutocad") retourne NIL quelque soit le résultat de la commande autocad.

Bonjour à toutes et tous,

Ok !
Pour les projets VBA, je les charges depuis mon gabarit et je les lances ensuite depuis un bouton comme ceci :

Code:

^C^C-execvba;nomdetonprojet

J'espère avoir répondu à ton pb,...

C'est justement pour ne charger QUE les projets dont j'ai besoin au moment ou j'en ai besoin.

Re,

Quel est le pb de ma méthode ?

Aucune incidence sur la "lourdeur" du gabarit ,...

Désolé, je n'ai pas mieux,...

D'ailleurs, semble indépendant du gabarit de travail,...

De plus, je ne suis pas spécialiste de ce langage qui à disparut avec la V2010,...

Bon courage,

Bonjour,

Ta méthode est tout à fait OK par rapport à la taille du gabarit : les projets VBA ne sont pas enregistrés avec les dessins ais dans des DVB. On peut donc charger les ressources lisp et vba au démarrage d'autocad - avec le acad.lsp je crois.

Mais par contre ça prend des ressources système et ça c'est plus embêtant pour moi.
J'ai beaucoup d'outils différents et correspondant à des phases de travail spécifiques rarement faites ensemble. Par exemple tout les outils d'install servent peu en phase de rotations de banches... D'ou le choix de ne charger que par blocs en fonction des utilisations.

Sur le fond tu as toutefois raison : VBA est en disparition, je suis en train de regarder l'évolution avec ObjectArx.

Bonjour à toutes et tous,

Salut [Vous devez être inscrit et connecté pour voir ce lien]

Désolé, mais je ne sais faire mieux vu mon faible niveau en prog,...Didier, si tu passes par là,.... [Vous devez être inscrit et connecté pour voir cette image]

Salut

Pour savoir si une fonction est présente, tu peux faire en lisp

Code:

(eval 'ma_fonction)

Si tu as par exemple comme réponse

#<SUBR @0e134474 <EXRXSUBR>>

la fonction est présente

Un exemple concret pour charger une dll en lisp

Code:

(or (eval 'gc-vpthaw)
  (vl-cmdf "_.netload" (findfile "VpLayerLisp.dll"))
)

@+

Bonsoir à toutes et tous,

Et Patrick_35 qui s'inquiétait de ne trouver sa place ici,... [Vous devez être inscrit et connecté pour voir cette image]

Cette fois ci, MERCI pour ton inscription ! [Vous devez être inscrit et connecté pour voir cette image]

Salut lili

Et Patrick_35 qui s'inquiétait de ne trouver sa place
ici,... [Vous devez être inscrit et connecté pour voir cette image]

Que pour trois questions. Il faut attendre que le site décolle.

Cette fois ci, MERCI pour ton inscription ! [Vous devez être inscrit et connecté pour voir cette image]

De rien. Si ma contribution peut aider [Vous devez être inscrit et connecté pour voir cette image]

@+

Re,

De rien. Si ma contribution peut aider [Vous devez être inscrit et connecté pour voir cette image]

Et comment,... [Vous devez être inscrit et connecté pour voir cette image]

Il faut attendre que le site décolle.

C'est le temps qui nous le dira,...

@+,

Bonjour,

Et merci pour ta solution Patrick_35.

En fait j'avais implémenté ce type de solution en définissant une variable en même temps que je charge le projet => si elle existe je ne charge pas le projet.

Le problème - et avec la tienne c'est la même chose, j'ai testé, c'est que c'est défini pour un dessin, et que le projet est défini pour une session Autocad éventuellement MDI => quand on change de dessin dans la même session la variable ou fonction Lisp n'est plus définie et on tente a nouveau le chargement du projet alors qu'il n'y a pas lieu.

J'ai conscience que c'est le fait d'utiliser VBA qui pose pb et je pense qu'avec un ARX ce serait plus rigoureux, mais bon, l'historique est la !

J'ai vu que dans Autolisp il y avait une gestion d'erreur en MDI, je vais chercher par là.

Merci aussi pour ton autre réponse, je n'ai pas encore eu le temps de la tester.

A + tard !

Salut

Le problème - et avec la tienne c'est la même chose, j'ai testé, c'est
que c'est défini pour un dessin, et que le projet est défini pour une
session Autocad éventuellement MDI => quand on change de dessin dans
la même session la variable ou fonction Lisp n'est plus définie et on
tente a nouveau le chargement du projet alors qu'il n'y a pas lieu.

Je veux bien te croire quand tu dis que cela ne marche pas avec vba, mais ma solution fonctionne parfaitement avec des fonctions lisp/vlisp/arx et même dll. Donc cela me surprends quand même.
Le but est de tester si la fonction est présente.
Non --> je la charge.

@+

Bonjour,

Malheureusement lorsqu'on utilise VBA Autocad charge l'environnement d'exécution dans lequel il reconnait les macro mais il ne reconnait pas ces macros comme des commandes. Il faut utiliser execvba NomDeLaMacro.

Tant pis, j'utilise ma demi solution en attendant de passer tout ça en arx.

en attendant de passer tout ça en arx

Je ne pense que qu'un arx soit l'idéal car tu es obligé de générer un arx par version d'autocad alors qu'avec une dll, ce n'est plus le cas.

@+

Bonjour,

J'ai vu qu'il y avait aussi cette possibilité. Mais permet elle de créer des commandes externes à autocad utilisables comme avec du lisp ou un arx ?

Ca m'intéresse d'autant plus qu'effectivement les arx doivent être compilés par versions et avec une version de visual c++ différente toute les 3 version. C'est bien lourd lorsque l'on vise un groupe d'utilisateurs avec des config et versions pour le moins disparates !

Si tu avais un exemple de dll qui soit reconnue dans l'environnement autocad comme une commande ou des références de docs ce serait d'un grand secours.

Merci ... en plus, ils m'ont relâché [Vous devez être inscrit et connecté pour voir cette image]

Par exemple [Vous devez être inscrit et connecté pour voir ce lien] comme fonction lisp ou encore [Vous devez être inscrit et connecté pour voir ce lien].

De rien, comme ça, tu vas pouvoir continuer à programmer [Vous devez être inscrit et connecté pour voir cette image]

@+

Bonjour à toutes et tous,

Salut Patrick_35,

Tu as dû t'emmêler les pinceaux dans les liens pointés,...(Deux fois le même),... [Vous devez être inscrit et connecté pour voir cette image]

A voui

Je corrige [Vous devez être inscrit et connecté pour voir cette image]

ps : On ne vois pas les liens dans les messages. Ils sont justes soulignés

@+

Re,

Oui, je vais essayer de voir comment je peux faire mieux, c'est en effet pas terrible comme ça,..

@+,