Soyez le premier à donner votre avis sur cette source.
Snippet vu 23 511 fois - Téléchargée 58 fois
' Variable Dim appAccess As Access.Application ' Là ou ailleur Private Sub Command1_Click() ' Création de l'objet Set appAccess = CreateObject("Access.Application.9") ' Création de la base de données appAccess.NewCurrentDatabase "C:\NouvelleDB.mdb" End Sub
Pour l'autoincrement (ou numéroauto en français) :
http://www.vbfrance.com/code.aspx?ID=43441
Il y a aussi un bout de code pour créer des tables, mais après faut se pencher sur le SQL Access, car je n'ai pas fait compliqué, pas de clef externe, de contraintes dans tout les sens etc.
si tu sais... n'hésite pas.... je suis tout ouïe...
@+ Sator2
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.