Discussion :

[marion782]

Bonjour,

Je cherche à envoyer des données avec la méthode post vers une adresse, sans créer de formulaire.
J'ai trouvé quelque chose qui je pense correspond à ce que je veux faire mais en VB .net alors que j'ai un projet VB. Est ce possible de faire la même chose en VB?
Merci d'avance

Voici ce que j'ai trouvé en VB.Net

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
' Set the 'Method' property of the 'Webrequest' to 'POST'.
myHttpWebRequest.Method = "POST"
 
Console.WriteLine(ControlChars.Cr + "Please enter the data to be posted to the (http://www.contoso.com/codesnippets/next.asp) Uri :")
' Create a new string object to POST data to the Url.
Dim inputData As String = Console.ReadLine()
Dim postData As String = "firstone" + ChrW(61) + inputData
Dim encoding As New ASCIIEncoding()
Dim byte1 As Byte() = encoding.GetBytes(postData)
' Set the content type of the data being posted.
myHttpWebRequest.ContentType = "application/x-www-form-urlencoded"
' Set the content length of the string being posted.
myHttpWebRequest.ContentLength = byte1.Length
Dim newStream As Stream = myHttpWebRequest.GetRequestStream()
newStream.Write(byte1, 0, byte1.Length)
Console.WriteLine("The value of 'ContentLength' property after sending the data is {0}", myHttpWebRequest.ContentLength)
newStream.Close()

[marion782]

Personne pour une petite idée? Personne n'a jamais envoyé de variables en post sans formulaire? :-(
Je suis preneuse de toute info
Merci d'avance!

[OhMonBato]

Question bête : c'est quoi envoyer des variables en post ?

Question plus que bête, j'ai honte mais je veux pas mourir idiot (enfin pas trop), vous êtes plusieurs à parler de formulaires sur ce forum, vous parlez bien de feuilles toute bete ou c'est autre chose ?

[Vld44]

Comment déclares-tu le "myHttpWebRequest" ?
A partir de son type tu peux chercher s'il existe en VB.

Je pense que oui, car j'utilise un truc semblable en javascript pour attaquer mes pages php en direct et l'objet utilisé est xmlHttpRequest, qui est un Activex.

[marion782]

Il est possible que je n'utilise pas les bons termes,
quand je parle de variables en post et de formulaire, je pense à un formulaire classique que l'on peut faire en html, dans lequel on a des balises "input"... dans lesquels on peut placer des infos. Dans un <form> on précise la méthode par laquelle on va transmettre les informations : métode GET ou méthode POST. (en Get les infos passent dans l'url).
Mon objectif est de simuler un tel formulaire dans lequel on enverrait des info avec la métode post. Je pensais donc construire ce flux... mais je ne sais pas comment!
Voilà, j'espère que cela a répondu à tes questions

myHttpWebRequest est une instance de HttpWebRequest, que je n'ai pas trouvé en VB...

[Vld44]

pour VB, il faut ajouter la référence à Microsoft XML 2.6 (msxml2.dll)
et instancier comme suit :

Dim myHttpWebRequest As MSXML2.XMLHTTP

Voilà, a+

[marion782]

Merci, c'est cool!
Il y a un endroit ou on peut trouver ça facilement?
Car je pense que j'ai encore le même problème avec New ASCIIEncoding() qui doit être une fonction VB.net, on peut trouver ça quelque part en VB6? ou l'équivalent?
Merci d'avance

[Vld44]

Ben j'ai tapé "HttpWebRequest" dans google.

[ProgElecT]

qu'appelez vous formulaire ?

[Vld44]

il s'agit de formulaires html :

<form></form>

[ProgElecT]

Merci Vld44, entre formulaire, page, feuille ... je m'y perd des fois.

Puis je proposer sa

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Option Explicit
'nécéssite d'activer la référence Microsoft Internet Controls
Dim IEs As InternetExplorer
 
Private Sub Form_Load()
Dim Msg$
Msg$ = "marion782"
Msg$ = "http://www.developpez.net/forums/search.php?do=" _
 & "process&showposts=0&starteronly=1&exactname=1&searchuser=" & Msg$
Set IEs = New InternetExplorer
IEs.navigate Msg$
Do While IEs.readyState <> READYSTATE_COMPLETE
 DoEvents
Loop
IEs.Visible = True
'IEs.Quit
End Sub

Ce qui est contenu dans Msg$, correspont à Method = "POST" ?

[marion782]

Vld44,
Tu dois être plus chanceux que moi car j'ai aussi testé mon ami google avant de poser la question!

ProgElecT,
Je pense que ce que le message Msg$ va être envoyé avec la méthode GET car il se trouve dans l'url...

[marion782]

J'ai fait plusieurs essais mais rien, je n'y arrive pas! peut être suis je sur une mauvaise piste...
Donc je renouvelle ma demande, quelqu'un a t il déjà réalisé en VB6 l'envoi de données avec la métode POST (comme si on cliquait sur le bouton Submit d'un formulaire)?
Un grand merci d'avance

[Vld44]

ok précise, tu as une erreur ? Ca ne plante pas mais ça ne fait pas ce que tu veux ?

Un pti bout de code concis pourrait aider.

a+

[ProgElecT]

recherche dans ce forum "HTMLDocument", dans la premiere page des posts trouvés, tu trouveras exatement la solution à ton probleme.

[marion782]

je pense avoir trouvé la solution :
la fonction WebBrowser.Navigate qui peut prendre en paramètre les données à envoyer en post

Merci pour vos différentes participations

[DarkVader]

Exemple avec HttpSendRequest