Création base access en vb.net

Commenter

Contenu du snippet

Créer une base access en vb.net, avec clé primaire, champs auotincrémenté et multi table.
J'ai énormément pour avoir toutes les infos, il me manque encore certaines choses, notemment le champs mémo sous access, je n'ai pas trouvé l'équivalent pour ce programme.

Source / Exemple : 


Dim cat As Catalog
Dim conn As ADODB.Connection
Dim tbl As ADOX.Table

'Création de la base de données Access
'Crée la base de données dont le chemin est cheminDB
cat = New Catalog
cat.Create("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & cheminDB & ";Jet OLEDB:Engine Type=5")
cat = Nothing

'Création des tables de la base de données
'ouvrir la connexion à la base de données
conn = New Connection
conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & cheminDB)

'Ouvrir le catalogue
cat = New Catalog
cat.ActiveConnection = conn

'Création de la table Editeurs
tbl = New Table
tbl.Name = "Editeurs"
'Ajout des differentes colonnes de la table
'adVarWChar correspond au champs texte sous access, 50 est la longueur, si on ne met rien, elle est de 255
tbl.Columns.Append("id", ADOX.DataTypeEnum.adInteger)
tbl.Columns.Append("nom", ADOX.DataTypeEnum.adVarWChar, 50)
'Definition de id en cle primaire
tbl.Keys.Append("PrimaryKey", KeyTypeEnum.adKeyPrimary, "id")
'Ligne indispensable pour acceder à  la prpriété autoincrement
tbl.Columns.Item("id").ParentCatalog = cat
Mise en place de l'autoincrement sur id
tbl.Columns.Item("id").Properties("AutoIncrement").Value = True
'Création de la table
cat.Tables.Append(tbl)

'fermeture des objet
tbl = Nothing
cat = Nothing
conn.Close()
conn = Nothing

Conclusion :


Je met ce code, car je n'ai trouve aucun code en français, contenant la totalité des infos que j'avais besoin. Si vous avez des questions n'hesitez pas j'essaierai d'y repondre

A voir également

S'inscrire maintenant

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.

Du même auteur (cs_HAkki)