Création de BDD access via code VBRésolu/Fermé

Question

Bonjour, je suis newbie en VB. Je voudrais créer une base de données de type access mais uniquement par du code VB. voici mon code :

Imports ADOX
Module test
Sub main()
'création de la base
Dim Ctl As New Catalog()
Dim tbl As New Table()
Dim Cnx_Chaine As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=""c: ew.mdb"""
Ctl.Create(Cnx_Chaine)
'création de tables
' Ouvre le catalogue.
Ctl.ActiveConnection = Cnx_Chaine
tbl.Name = "Test"
tbl.Columns.Append("Individus", "Departement", "Age" )
Ctl.Tables.Append(tbl)
End Sub
End Module

Voici l'erreur qu'il me sort sur la ligne 14 : Une exception non gérée du type 'System.Runtime.InteropServices.COMException' s'est produite dans Gestion_RRs.exe Informations supplémentaires : Les arguments sont de type incorrect, en dehors des limites autorisées ou en conflit les uns avec les autres.

morpheus81fr · Accepted Answer

J'ai trouvé grace au code de Bioman2 (http://www.vbfrance.com/codes/CREATION-DB-COMPLETE-ADOX_18831.aspx).

En revanche, je ne trouve pas comment supprimer mon post. Si un gentil modo passe par là ......

Création de BDD access via code VB

1 réponse

Discussions similaires