Pour ceux qui peuvent être intéressés, le code suivant permet d'envoyer à partir de VB des commandes (autocad) via une liason DDE à Autocad LT.
Créer un Form avec contôle acceptant DDE
(textBox par exemple, Text1 dans le code qui suit)
La variable cmd (string) contient la commande Autocad comme saisie dans la ligne de commande d'Autocad LT
Source / Exemple :
Set obj = Text1
AppActivate "AUTOCAD LT", True
obj.LinkMode = 0
obj.LinkTopic = "AutoCAD LT.DDE|System"
obj.LinkMode = 2
obj.LinkTimeout = 500
obj.LinkExecute cmd
Conclusion :
J'ai trouvé le "Topic" dans la base registre...
Je n'ai trouvé que cette solution pour piloter Autocad LT. j'ai rien trouvé dans la doc Autocad LT sur le DDE.
Merci de me faire part de vos commentaires et astuces.
1 oct. 2009 à 10:31
j'aimerais savoir si quelqu'un pourrais m'expliquer car
je parviens à ouvrir autocad 2008.
je souhaite soit faire un coller de tout le texte directement dans autocad
ex:
point 378558.968,179006.34
point 378188.651,179309.202
point 378174.173,179327.315
point 366429.476,176386.49
point 366418.707,176390.232
point 350390.902,184772.049
point 350348.219,184820.23
point 350161.756,185483.88
point 378558.968,179006.34
point 377790.191,179407.567
point 376992.888,178768.69
point 375989.401,178733.442
point 375049.05,178507.076
J'arrrive juste a ouvrir l'api autocad .
Private Sub Bouton1_Click()
Dim MyAppID
MyAppID = Shell("C:\Program Files\AutoCAD 2008\acad.exe", 1)
application.Doevents()
End Sub
Pouvez vous m'aiguillet
merci
6 déc. 2007 à 10:32
Avez vous eu mon message?
Bonne journée
4 déc. 2007 à 17:47
contactez moi directement par message privé en cliquant mon profil, je vous ferez parvenir le fichier access, et s'il fonctionne chez vous, je le publierai sur vbfrance.
4 déc. 2007 à 16:06
Alors est ce que pour vous ça marche ?
merci
25 nov. 2007 à 07:08
chan = DDEInitiate("AutoCAD.r16.DDE", "System")
merci
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.