Bonjour
Je désire créer une base de données au 1er lancement de l'appli, je test donc si l'appli existe ou pas mais le code reconnait quand l'appli n'est pas crée mais pas l'inverse
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Try
            If (("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & My.Application.Info.DirectoryPath & "\Film.accdb") Is Nothing) Then
                MsgBox("Base existante")
            Else
                MsgBox("Base inexistante")
                MsgBox("Création de la base de données : FILM", MessageBoxIcon.Information, MessageBoxButtons.OK)
                db.Create("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & My.Application.Info.DirectoryPath & "\Film.accdb")
                MsgBox("Base créer")
            End If
 
        Catch
 
        End Try
Merci