Discussion :

[Smix007]

Bonjour,

Comment je peux afficher un message d'erreur lorsque la base de données n'est pas active, voici un partie de ma methode

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
Public Sub MaMethode(ByRef _info As DbInfo)
              Using db As New DBAccess(_info.PName, _info.ConString)
            With db
                .ThrowsExceptions = True
                .AutoConnect = False
                .Open()
            End With

Merci pour votre aide

[mactwist69]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public Sub AlimenteComponent(ByRef _info As DbConnectionInfo)
 
Try
 
 Using db As New DBAccess(_info.ProviderName, _info.ConnectionString)
            With db
                .ThrowsExceptions = True
                .AutoConnect = False
                .Open()
            End With
 
Catch ex As Exception
    MsgBox (ex.Message)
End Try

[Smix007]

Merci beaucoup.