salut a tous, j`ai un module dans lequel j`ai une sub main qui fais la connexion a la base de donnees et puis elle me redirige vers le form principal de mon application, la connexion s`est bien passer mes apres elle m`affiche le form principal nommé index pendant une fraction de seconde puis l`application se ferme, je comprends pas pourquoi, voila mon code:
merci de m`avoir aider
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 Module Module1 Public Sub main() Dim con As New OleDb.OleDbConnection Dim ds As New DataSet Dim da As OleDb.OleDbDataAdapter Dim sql As String 'connexion a la base de donnees con.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\atelier.accdb" con.Open() MsgBox("connexion reussite") 'voici la ligne qui pose probleme index.Show() End Sub End Module![]()
Partager