Bonjour à tous.
Je tente de créer une DataBase Access avec le provider OleDd

Voici le code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Imports System.Data.OleDb
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
Const CONNECTION_STRING As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=;"
 
        Dim strOledb As String = "CREATE DATABASE HowToDemo"
 
        Dim Maconnection As New OleDbConnection(CONNECTION_STRING)
 
        Dim cmd As New OleDbCommand(strOledb, Maconnection)
 
        Try
            Maconnection.Open()
            cmd.ExecuteNonQuery()
            Maconnection.Close()
        Catch Exc As OleDbException
            MessageBox.Show(Exc.ToString, "Exception Error!", MessageBoxButtons.OK, MessageBoxIcon.Error)
        End Try
    End Sub
Cela plante sur Maconnection.Open!!
Si j'ai bien compris (en regardant des exemples), il faut ouvrir la connection sur aucune base, puis exécuter CREATE.
Pourtant ma CONNECTION_STRING parrait bonne!!

Solution?

Merci

Toubib