HTTPRequest() & Php &JSON

Partagez votre expérience de PureBasic avec les autres utilisateurs.
Avatar de l’utilisateur
Fig
Messages : 1176
Inscription : jeu. 14/oct./2004 19:48

Re: HTTPRequest() & Php &JSON

Message par Fig »

Code : Tout sélectionner

Buffer = PeekS(*Buffer,-1,#PB_UTF8)
Petite correction pour l'unicode.
Super pratique ce code, merci Falsam !!
Il y a deux méthodes pour écrire des programmes sans erreurs. Mais il n’y a que la troisième qui marche.
Version de PB : 6.00LTS - 64 bits
Avatar de l’utilisateur
JohnJohnsonSHERMAN
Messages : 648
Inscription : dim. 13/déc./2015 11:05
Localisation : Allez, cherche...
Contact :

Re: HTTPRequest() & Php &JSON

Message par JohnJohnsonSHERMAN »

Mais c'est tout à fait de type cool ca :P Ca voudrait dire que je pourrais m'en servir pour exécuter des scripts php sur un serveur local, et donc possiblement pouvoir implémenter une sorte de gestion du PHP sur mon serveur :)
Merci falsam ;)
"Le bug se situe entre la chaise et le clavier"
Votre expert national en bogage et segfaults.

CPU : AMD A8 Quad core - RAM 8Gb - HDD 2To
  • Windows 10 x64 - PB 5.61 x64
  • Linux Ubuntu 16.04 LTS x64 (dual boot) - PB pas encore réinstallé
Avatar de l’utilisateur
Fig
Messages : 1176
Inscription : jeu. 14/oct./2004 19:48

Re: HTTPRequest() & Php &JSON

Message par Fig »

Code : Tout sélectionner

;Send data
IncludeFile "HTTPRequest.pbi"

Global User.s, Say.s, DataSend.s

;My data
User = "falsam"
Say  = "Je teste la fonction HTTPRequest"

;Format data
;A URL$ may Not contain certain characters such as: tab, space, accent letter etc., 
DataSend + "&user=" + URLEncoder(User) + "&say=" + URLEncoder(Say)

;Send data
If HTTPRequest("s242132022.onlinehome.fr", "/racal/", 80, "usersay0.php", "POST", DataSend) = ""
  MessageRequester("Information","Information ajouté")
EndIf
Je n'arrive pas à faire marcher ce code... Sans vouloir abuser, est ce que tu pourrais regarder du coté de ton serveur si tout est ok ?
Le lien que tu donne pour vérifier ne fonctionne pas ou ta bdd ne se met pas à jour...

Code : Tout sélectionner

"Faile\td to connect to MySQL: Access denied for user 'dbo382419105'@'212.227..' (using password: YES)"
Dernière modification par Fig le lun. 29/mai/2017 15:45, modifié 1 fois.
Il y a deux méthodes pour écrire des programmes sans erreurs. Mais il n’y a que la troisième qui marche.
Version de PB : 6.00LTS - 64 bits
Avatar de l’utilisateur
falsam
Messages : 7244
Inscription : dim. 22/août/2010 15:24
Localisation : IDF (Yvelines)
Contact :

Re: HTTPRequest() & Php &JSON

Message par falsam »

Access denied for user 'dbo382419105'@'212.227.66.226' (using password: YES)"
Le message est clair. C'est réparé. :oops:

j'ai aussi modifié l'include.

Code : Tout sélectionner

Buffer = PeekS(*Buffer)
est remplacé par

Code : Tout sélectionner

Buffer = PeekS(*Buffer, -1, #PB_UTF8 | #PB_ByteLength)
Configuration : Windows 11 Famille 64-bit - PB 6.03 x64 - AMD Ryzen 7 - 16 GO RAM
Vidéo NVIDIA GeForce GTX 1650 Ti - Résolution 1920x1080 - Mise à l'échelle 125%
Avatar de l’utilisateur
falsam
Messages : 7244
Inscription : dim. 22/août/2010 15:24
Localisation : IDF (Yvelines)
Contact :

Re: HTTPRequest() & Php &JSON

Message par falsam »

Trois ans après la création de HTTPRequest() le constat est que cette fonction ne sert plus à rien.

La fonction native ReceiveHTTPMemory() donne le même résultat.

@Fig: Le code que tu cherches à tester devient :

Code : Tout sélectionner

;Send data

Global User.s, Say.s, DataSend.s

;My data
User = "falsam"
Say  = "Fig tu peux oublier HTTPRequest au profit de ReceiveHTTPMemory()"

;Format data
DataSend + "&user=" + URLEncoder(User) + "&say=" + URLEncoder(Say)

InitNetwork()

*Buffer = ReceiveHTTPMemory("s242132022.onlinehome.fr/racal/usersay0.php?" + DataSend)

If *Buffer
Else
  Debug "Failed"
EndIf
Résultat http://s242132022.onlinehome.fr/racal/usersayresult.php
Configuration : Windows 11 Famille 64-bit - PB 6.03 x64 - AMD Ryzen 7 - 16 GO RAM
Vidéo NVIDIA GeForce GTX 1650 Ti - Résolution 1920x1080 - Mise à l'échelle 125%
Avatar de l’utilisateur
Fig
Messages : 1176
Inscription : jeu. 14/oct./2004 19:48

Re: HTTPRequest() & Php &JSON

Message par Fig »

Merci Falsam... Je suis vraiment une piache ...
Heureusement, avec des petits exemples très simple on peut faire presque tout.
Voyons si j'accède à ta bdd maintenant... Puis à la mienne... :wink:
Il y a deux méthodes pour écrire des programmes sans erreurs. Mais il n’y a que la troisième qui marche.
Version de PB : 6.00LTS - 64 bits
Avatar de l’utilisateur
falsam
Messages : 7244
Inscription : dim. 22/août/2010 15:24
Localisation : IDF (Yvelines)
Contact :

Re: HTTPRequest() & Php &JSON

Message par falsam »

La fonction HTTPRequest() étant maintenant native avec la future version de PureBasic (5.70) je pense qu'il est temps de supprimer ce sujet que j'avais initié en 2014 afin d'éviter toute confusion future.

Etes vous d'accord sur le principe ?

Oui : 2 <-> Non : 0
Configuration : Windows 11 Famille 64-bit - PB 6.03 x64 - AMD Ryzen 7 - 16 GO RAM
Vidéo NVIDIA GeForce GTX 1650 Ti - Résolution 1920x1080 - Mise à l'échelle 125%
Marc56
Messages : 2147
Inscription : sam. 08/févr./2014 15:19

Re: HTTPRequest() & Php &JSON

Message par Marc56 »

falsam a écrit :La fonction HTTPRequest() étant maintenant native avec la future version de PureBasic (5.70) je pense qu'il est temps de supprimer ce sujet que j'avais initié en 2014 afin d'éviter toute confusion future.

Etes vous d'accord sur le principe ?
Oui, mais attendre la version finale et la mise à jour de la doc. Les paramètres peuvent peut-être changer ? J'ai par exemple suggéré sur le forum us de changer #PB_HTTP_ErrorCode par #PB_HTTP_StatusCode puisqu'un serveur web retourne toujours un message, même si ce n'est pas un message d'erreur.

:)
Avatar de l’utilisateur
Ar-S
Messages : 9476
Inscription : dim. 09/oct./2005 16:51
Contact :

Re: HTTPRequest() & Php &JSON

Message par Ar-S »

Je suis aussi d'avis d'attendre la version final de la 5.70
En attendant les exemples 5.70 que tu as posté sont déjà les bienvenus ;)
~~~~Règles du forum ~~~~
⋅.˳˳.⋅ॱ˙˙ॱ⋅.˳Ar-S ˳.⋅ॱ˙˙ॱ⋅.˳˳.⋅
W11x64 PB 6.x
Section HORS SUJET : ICI
LDV MULTIMEDIA : Dépannage informatique & mes Logiciels PB
UPLOAD D'IMAGES : Uploader des images de vos logiciels
Répondre