PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → Etats & Requêtes → problème de connexion à une bd sqlserver
problème de connexion à une bd sqlserver
Débuté par Mohamed GADER, 07 mai 2018 18:41 - 1 réponse
Membre enregistré
2 messages
Posté le 07 mai 2018 - 18:41
Bonjour,
j'ai taper le code suivant pour connecter a une bd sqlserver
NumConnexion est un entier
reqtest est une Source dede Données
NumConnexion = SQLConnecte("@bd", "user", "mdp", "type bd", "OLEDB", hOledbSQLServer)
SI NumConnexion <> 0 ALORS
// La connexion s'est bien passée
//
Info("La connexion s'est bien passée")
SINON
// La connexion a échoué : affichage d'un message explicatif
SQLInfoGene()
Erreur("La connexion à la source de données a échoué." + RC + ...
"Code erreur : " + SQL.Erreur + RC + SQL.MesErreur)
FIN
// Dans tous les cas (connexion OK ou pas)
TableAjouteLigne(TABLE_EXPRESS_T1,reqtest)
SQLDéconnecte()

résultat jusqu'à maintenant c'est bon
maintenant j'ai ajouter le code suivant (aprés SI NumConnexion <> 0)
lorsque j'exécute le code pas d'erreur mais pas de résultat dans le tableau
SI HExécuteRequêteSQL(NumConnexion,"SELECT * FROM B1") ALORS
TableAjouteLigne(TABLE_EXPRESS_T1,reqtest)
FIN


merci d'avance pour vos aides
:)
Posté le 07 mai 2018 - 21:50
Mohamed GADER a formulé la demande :
Bonjour,
j'ai taper le code suivant pour connecter a une bd sqlserver
NumConnexion est un entier
reqtest est une Source de Données
NumConnexion = SQLConnecte("@bd", "user", "mdp", "type bd", "OLEDB",
hOledbSQLServer)
SI NumConnexion <> 0 ALORS
// La connexion s'est bien passée
//
Info("La connexion s'est bien passée")
SINON
// La connexion a échoué : affichage d'un message explicatif
SQLInfoGene()
Erreur("La connexion à la source de données a échoué." + RC + ...
"Code erreur : " + SQL.Erreur + RC + SQL.MesErreur)
FIN
// Dans tous les cas (connexion OK ou pas)
TableAjouteLigne(TABLE_EXPRESS_T1,reqtest)
SQLDéconnecte()

résultat jusqu'à maintenant c'est bon
maintenant j'ai ajouter le code suivant (aprés SI NumConnexion <> 0)
lorsque j'exécute le code pas d'erreur mais pas de résultat dans le tableau
SI HExécuteRequêteSQL(NumConnexion,"SELECT * FROM B1") ALORS
TableAjouteLigne(TABLE_EXPRESS_T1,reqtest)
FIN


merci d'avance pour vos aides
:)

Reqtest est vide ce qui est logique.
Nulle part des données sont envoyées vers reqtest.
Donc il est logique de ne rien trouver dans le tableau.