Création de base de donnée access en code

Commenter

Contenu du snippet

J'est cherché comment crée une base de données access dans un programme en vu l'exporter sans base
Pourquoi me diriez vous ???? eh ben comme ca lol

Apres quelque recherche j'ai trouve sur un site

il faut rajouter une reference dans votre projet

Aller dans Ajouter reference dans projet puis dans COM et ajouter Microsoft ADO Ext. 2.7 for DDL and Security

voila la suite en dessous en code

Source / Exemple : 


Public Function CreateAccessDatabase(ByVal DatabaseFullPath As String) As Boolean
        Dim bAns As Boolean
        Dim cat As New ADOX.Catalog()
        Try
            'Make sure the folder
            'provided in the path exists. If file name w/o path 
            'is  specified,  the database will be created in your
            'application folder.

            Dim sCreateString As String
            sCreateString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DatabaseFullPath
            cat.Create(sCreateString)

            bAns = True

        Catch Excep As System.Runtime.InteropServices.COMException
            bAns = False
            'do whatever else you need to do here, log, 
            'msgbox etc.
        Finally
            cat = Nothing
        End Try
        Return bAns
    End Function

Conclusion :


Voile je dit bien que ce code n'est pas de moi mais il m'a ete tres utile comme peut etre a d'autre aussi

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 (dionysos6868)