Probleme de connection
Fermé
kekule
-
17 août 2018 à 13:52
Reivax962 Messages postés 3672 Date d'inscription jeudi 16 juin 2005 Statut Membre Dernière intervention 11 février 2021 - 17 août 2018 à 15:55
Reivax962 Messages postés 3672 Date d'inscription jeudi 16 juin 2005 Statut Membre Dernière intervention 11 février 2021 - 17 août 2018 à 15:55
A voir également:
- Probleme de connection
- Gmail connection - Guide
- Hotmail connection - Guide
- Facebook connection - Guide
- Probleme de connection - Guide
- Connection chromecast - Guide
2 réponses
Reivax962
Messages postés
3672
Date d'inscription
jeudi 16 juin 2005
Statut
Membre
Dernière intervention
11 février 2021
1 011
17 août 2018 à 14:23
17 août 2018 à 14:23
Bonjour,
Il faudrait nous montrer ton code (bien formaté dans des balises < code >, s'il te plaît) pour que l'on puisse te donner une réponse qui soit adaptée.
Xavier
Il faudrait nous montrer ton code (bien formaté dans des balises < code >, s'il te plaît) pour que l'on puisse te donner une réponse qui soit adaptée.
Xavier
CE CODE EST DANS MON MODULE PRINCIPAL
ET VOICI LE CONTENU DE LA FONCTION TesterConnection()
EDIT : Ajout des balises de code, merci d'y penser la prochaine fois !
mais quand j'execute il me creer un bug lorsque la (SqlClientConnecte.sConnectionString) qui contient le chemin d'acces
n'est pas le bon.
If Not TesterConnection() Then Dim CON As New FrmConnexion SplashScreenManager.CloseForm() Application.Run(CON) m_CheminIni = chaine SqlClientConnecte.sConnectionString = m_CheminIni : ChaineConn = m_CheminIni End If
ET VOICI LE CONTENU DE LA FONCTION TesterConnection()
Public Function TesterConnection() As Boolean Dim bResultat As Boolean Dim oSqlConnection As New System.Data.SqlClient.SqlConnection bResultat = True Try If Not (oSqlConnection Is Nothing) Then If oSqlConnection.State = System.Data.ConnectionState.Closed Then oSqlConnection.ConnectionString = SqlClientConnecte.sConnectionString oSqlConnection.Open() oSqlConnection.Close() Else bResultat = False End If Else bResultat = False End If Catch ex As Exception bResultat = False 'Throw ex End Try Return bResultat End Function
EDIT : Ajout des balises de code, merci d'y penser la prochaine fois !
mais quand j'execute il me creer un bug lorsque la (SqlClientConnecte.sConnectionString) qui contient le chemin d'acces
n'est pas le bon.
Reivax962
Messages postés
3672
Date d'inscription
jeudi 16 juin 2005
Statut
Membre
Dernière intervention
11 février 2021
1 011
17 août 2018 à 15:55
17 août 2018 à 15:55
Tu dis que tu obtiens une exception, mais il faut en dire plus...
Quel est le message de l'exception ? Sur quelle ligne est-elle levée ?
Quel est le message de l'exception ? Sur quelle ligne est-elle levée ?