PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → Reports & Queries → problème de connexion à une bd sqlserver
problème de connexion à une bd sqlserver
Started by Mohamed GADER, May, 07 2018 6:41 PM - 1 reply
Registered member
2 messages
Posted on May, 07 2018 - 6:41 PM
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
:)
Posted on May, 07 2018 - 9:50 PM
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.