1. Ce site utilise des cookies. En continuant à utiliser ce site, vous acceptez l'utilisation des cookies. En savoir plus.
  2. Bonjour tout le monde ! Veillez consulter la Politique de forum pour comprendre nos règles, Merci a vous !
    Rejeter la notice

WD HTTPRequête post entêtes requête

Discussion dans 'Windev' créé par mercatog, Oct 21, 2022.

  1. mercatog

    mercatog New Member

    Inscrit:
    Sept 18, 2022
    Messages:
    4
    J'aime reçus:
    0
    Bonjour
    Nouveau sur WD et ce forum, j'essaye de récupérer des données à l'aide d'une httprequête de type post

    j'ai des paramètres et des entêtes de la requête

    entêtes
    Code (Text):
    Host: www.xxxxxxxxxx
    User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:105.0) Gecko/20100101 Firefox/105.0
    Accept: text/html,application/xhtml+xml,application/xml;q=0.9,image/avif,image/webp,*/*;q=0.8
    Accept-Language: fr,fr-FR;q=0.8,en-US;q=0.5,en;q=0.3
    Accept-Encoding: gzip, deflate
    Content-Type: application/x-www-form-urlencoded
    Content-Length: 79
    Origin: http://www.xxxxxxxx
    DNT: 1
    Authorization: Digest username="login", realm="EFPP.4DB", nonce="212533099193517:c0399a2c9499840677a18eb5955e4cd1", uri="/4DCGI/ResultatRecherche_EFPP", algorithm=MD5, response="dcae2eaf1e62fa789dc12f0d2d3db9a4", qop=auth, nc=0000000e, cnonce="ad252e6e1916d0d4"
    Connection: keep-alive
    Referer: http://www.xxxxxxx
    Upgrade-Insecure-Requests: 1
    Deux paramètres:
    Code (Text):
    Annee: 2022
    Fsynt: "oro"
    Voilà où j'en suis
    HTML:

    sUser est une chaîne="toto"
    sPwd est une chaîne="titi"
    sUrl est une chaîne="http://www.xxxxxxx"
    sNomAgent est une chaîne = "Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:105.0) Gecko/20100101 Firefox/105.0"
    sContentType est une chaîne="application/x-www-form-urlencoded"

    // Paramètres Post
    sParametrePost est une chaîne
    sParametrePost = ChaîneConstruit("VannSol=%1&Bt_FSyntitique=Recherche", SAI_Année)

    sEntete est une chaîne="????"
    // Requête
    SI HTTPRequête(sUrl,sNomAgent,"",sParametrePost,sContentType,sUser,sPwd)= Vrai ALORS
      Info("Requête OK, résultat : ", ...
      HTMLVersTexte(HTTPDonneRésultat(httpRésultat)))
    SINON
      Erreur(ErreurInfo())
    FIN
     
    Merci de votre indulgence et votre pistes d'aide
     
    Tags:
  2. popoy

    popoy Well-Known Member
    MEMBRE WX

    Inscrit:
    Fev 23, 2018
    Messages:
    2,884
    J'aime reçus:
    1,532
    C'est bien.
    Quel est la question ?
    Y a-t-il un message d'erreur ?
    Qu'as tu comme résultat ?
     
    mercatog apprécie ceci.
  3. mercatog

    mercatog New Member

    Inscrit:
    Sept 18, 2022
    Messages:
    4
    J'aime reçus:
    0
    Bonjour
    Ah oui, j'ai oublié la question. je suis désolé
    Je veux intégrer les entêtes de la requête dans cette ligne
    Code (Text):
    SI HTTPRequête(sUrl,sNomAgent,"????",sParametrePost,sContentType,sUser,sPwd)= Vrai ALORS
    Sans les entêtes j'obtiens du vide

    <Entête HTTP supplémentaire> : Chaîne de caractères optionnelle
    • Entête HTTP supplémentaire à ajouter au message HTTP, // Un exemple comment les intégrer
    • Chaîne vide ("") si aucun entête HTTP ne doit être ajouté.
    Merci à vous
     
  4. popoy

    popoy Well-Known Member
    MEMBRE WX

    Inscrit:
    Fev 23, 2018
    Messages:
    2,884
    J'aime reçus:
    1,532
    Pourquoi tu ne passes pas par la variable httprequette?

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

     
    mercatog apprécie ceci.
  5. mercatog

    mercatog New Member

    Inscrit:
    Sept 18, 2022
    Messages:
    4
    J'aime reçus:
    0

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Pourquoi tu ne passes pas par la variable httprequette?

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Cliquez pour agrandir...
    Merci pour votre aide précieuse.

    Résolu

    ça pilotait bien en vba Excel et voilà sur WD. Je vais pouvoir parser le contenu la réponse pour récupérer mes données.
    Je vais creuser pour voir si WD le permet mieux que de parcourir les éléments comme en vba
     
  • Dandypunk

    Dandypunk Well-Known Member

    Inscrit:
    Nov 28, 2019
    Messages:
    550
    J'aime reçus:
    302
    Bonjour,

    Bonjour visiteur, Merci de vous Inscrire ou de vous connectez pour voir les liens!

    Je vais creuser pour voir si WD le permet mieux que de parcourir les éléments comme en vba
    Cliquez pour agrandir...
    Regarde du côté de la désérialisation
     
    mercatog apprécie ceci.
  • Partager cette page

    Chargement...