VBA + loin en VBA

D'AutoCAD vers Access avec Création de tables


Dans le programme précédent, Descript2, on copie une base existante modèle et on remplit les tables ensuite.
L'exemple de ce chapître, Descript3, n'a nul besoin de base modèle, il crée lui-même la base de données, les tables et les différents champs qu'il complète ensuite.

Le but de DESCRIPT3

Descript3

Le résultat que vous obtiendrez est quasiment identique à celui obtenu par Descript2.

Ce programme ouvrira automatiquement Access, créera la base, les tables, les différents champs et les index, remplira les tables, sauvegardera le fichier sous le même nom que le dessin et dans le même répertoire puis refermera Access, le tout de manière invisible.

Grâce à l'indexation du premier champ de chaque table, vous obtiendrez automatiquement un classement par ordre alphabétique suivant ce champ.

Exactement de la même manière, vous pourrez ajouter d'autres tables pour les listes de dictionnaires, de styles de cotation, de SCU etc.

Le programme n'a pas été testé avec des versions antérieures à Access 97, mais il ne devrait y avoir aucun problème.

Une petite forme (ter)

Form
Feuille exactement identique aux feuilles UserForm1 de Descript et Descript2.
La suite de cette leçon est maintenant réservée aux Adhérents @d+ .

-----

Téléchargement Les adhérents peuvent cliquer sur l'icône pour télécharger la suite de cette page ainsi que le projet complet en VBA (44 ko).
Attention, fichier codé.

-----

NoteCAD : Utiliser des fonctions API ...


--

© 1998-2000 FASOFT - Roger Rosec Tous droits réservés.