PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 2024 → Conseil pour WebService
Conseil pour WebService
Débuté par DevLogi, 05 juil. 2016 14:33 - 10 réponses
Posté le 05 juillet 2016 - 14:33
Bonjour,

Pour la première fois que j'utilise le webservice, c'est pour cela je m'oriente vers vous.

J'ai une application "Gestion commerciale" développée sous windev utilisant HFCS. je souhaite permettre une utilisation distante via internet.
Mon code contient des procédures-requêtes normaux et stockées.

Actuellement, je voudrais utiliser le webservice pour communiquer entre mon appli. sous windev et windev mobile.

Ma question est ce que je crée le webservice dans windev dans la même application pour préparer les requêtes (Update,Insert,delete et de selection)?

dans ce cas je me trouve entre 2 configurations (Exécutable Gestion commerciale et l'autre de webservice)

ET à partir de windev mobile je consomme (importer) ce websercice

Est ce que c'est comme ça je vais procéder?

Merci de m'aider je suis preneur
Membre enregistré
342 messages
Popularité : +30 (32 votes)
Posté le 05 juillet 2016 - 16:19
Bonjour

Si c'est pour faire du SQL à partir d'un WebService tu peux directement utiliser celui de PCSOFT fourni avec Windev (ou WM ou WB)
Voir SQLConnecteWS :
http://doc.pcsoft.fr/fr-FR/?1000021031
http://doc.pcsoft.fr/fr-FR/?1000021063&name=acces_une_base_donnees_via_webservice

Ça fonctionne très bien. Je l'utilise de plus en plus

--
Pascal H. http://phapps.e-monsite.com
Posté le 05 juillet 2016 - 16:31
Bonjour hPascal

Merci de votre réponse

D'abord, je vais consulter les 2 liens.
Posté le 05 juillet 2016 - 17:04
Bonjour

Est ce que on peut utiliser la fonction SQLConnecteWS : avec accès natif?
Membre enregistré
342 messages
Popularité : +30 (32 votes)
Posté le 05 juillet 2016 - 17:13
DevLogi a écrit :
Bonjour

Est ce que on peut utiliser la fonction SQLConnecteWS : avec accès natif?


Je l'utilise avec l'accès natif PostgreSQL et MySQL, ainsi qu'en OLEDB pour SQL Server. J'ai fais aussi un test avec Access et SQLite
Le seul truc c'est qu'il faut utiliser les ordres SQL... Pas de fonctions H...

--
Pascal H. http://phapps.e-monsite.com
Posté le 05 juillet 2016 - 17:18
Bonjour

Volia mon code , mais j'arrive pas à ce connecter à distance

NumConnexion est un entier
NumConnexion = SQLConnecteWS(Cnx_SERVEUR,"localhost", "admin", "WS_Base")

SI NumConnexion <> 0 ALORS
// 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 " + "NomSource" + ...
" a échoué." + RC + "Code erreur : " + ...
SQL.Erreur + RC + SQL.MesErreur)
FIN
// Dans tous les cas (connexion OK ou pas)
SQLDéconnecte()

[code:sql]
PROCEDURE Pr_InsertArticle(pCode,pArticle,Pprix)

Ok est un booléen=Faux

sResultat est une chaîne

Ok=HExécuteRequête(REQ_InsertArticle,hRequêteDéfaut,pCode,pArticle,Pprix)

SI Ok=Vrai ALORS
sResultat="<XML><Retouer><InsertArticle>Ok</InsertArticle></Retouer></XML>"
SINON
sResultat= "<XML><Retouer><InsertArticle>ERR</InsertArticle></Retouer></XML>"
FIN

tabT_reul est un tableau de chaîne

TableauSupprimeTout(tabT_reul)
TableauAjoute(tabT_reul,sResultat)

RENVOYER sResultat
[code:wl]

Merci de me donner une piste
Membre enregistré
342 messages
Popularité : +30 (32 votes)
Posté le 05 juillet 2016 - 18:32
Que contient Cnx_Serveur ?
Le premier paramètre doit être l'adresse HTTP du serveur qui héberge le WebService (sous la forme http://xxx.xxx.xxx.xxx/WDSOAPDB_WEB/)

Exemples :

eNumCnx est un entier = SQLConnecteWS("http://51.253.188.99/WDSOAPDB_WEB/", "localhost", "mon_user", "mon_password", "ma_base", "MySQL")
// ou
eNumCnx est un entier = SQLConnecteWS("http://51.253.188.99/WDSOAPDB_WEB/", "localhost", "mon_user", "mon_password", "ma_base", "POSTGRESQL")

// etc ...
// l'adresse ip ci-dessous est bidon


--
Pascal H. http://phapps.e-monsite.com
Posté le 08 juillet 2020 - 11:11
Bonjour,
as tu trouvé une solution ? moi je cherche encore
Posté le 22 mars 2021 - 11:14
hpascal a écrit :
DevLogi a écrit :
Bonjour

Est ce que on peut utiliser la fonction SQLConnecteWS : avec accès natif?

Je l'utilise avec l'accès natif PostgreSQL et MySQL, ainsi qu'en OLEDB pour SQL Server. J'ai fais aussi un test avec Access et SQLite
Le seul truc c'est qu'il faut utiliser les ordres SQL... Pas de fonctions H...

--
Pascal H. http://phapps.e-monsite.com


Hello,
je reviens sur ce vieux post, aurais tu un exmple de connexion pour Sql-server via Oledb?
je n'arrive pas à faire fonctionner mon code :)
merci
Membre enregistré
342 messages
Popularité : +30 (32 votes)
Posté le 22 mars 2021 - 15:55
Bonjour Julien

Voici un exemple de syntaxe donné sur ce forum :
https://forum.pcsoft.fr/fr-FR/pcsoft.fr.windev/197392-acces-distant-sql-server-windev-mobile-21-par-197395/read.awp

C'était en 2016 mais c'est toujours valable

--
Pascal H. http://phapps.e-monsite.com
Posté le 08 novembre 2021 - 14:32
Bonjour,

j'essaye d'utiliser la fonction SQLConnecteWS. J'ai un serveur Web local (wamp)
J'ai dans un premier temps installé le serveur réservé, puis la couche native.
Mais quand j'exécute mon code je n'arrive pas à accéder à ma base de données.

Mais je me pose la question du répertoire "WDSOAPDB_WEB" à quoi fait il référence ? et surtout ou le webservice s'installe et si on doit le déplacer de répertoire ou le positionner ?dans le www d'un serveur WAMP ?

numConnexion est un entier

numConnexion = SQLConnecteWS("http://localhost/WDSOAPDB_WEB/","localhost","root","","ma_bdd","MYSQL")

SI numConnexion <> 0 ALORS
LIB_afficheur = "La connexion a réussi !!"
ELSE
LIB_afficheur = "La connexion a échoué !!"
SQLInfoGene()
Erreur ("La connexion à la source de données externe a échoué."+ RC + "Code erreur: "+ SQL.Erreur + RC + SQL.MesErreur)
FIN


merci de vos lumières :)