Recuperer les entetes mimes get/post

Commenter

Contenu du snippet

Cette petite source sert à récupérer les entêtes mimes d'une page. Pour l'utiliser correctement, il vous faut rediriger la balise "ACTION" de votre formulaire vers "http://localhost" (par ex: http://www.blabla.com/redir.asp en http://localhost).
Il vous suffit ensuite de visualiser le fichier en HTML (rien d'extraordinaire donc) et de valider le formulaire. Les entetes Mimes vont automatiquement être inscrites dans la textbox

Pour ce projet, il vous faut un socket(A renommer en Sock1), un textbox (Text1) (multiligne avec scroll), une form (Form1 ... bah oui, mais c'est pas évident pour certain apparement) et c'est tout.

Source / Exemple : 


Private Sub Form_Load()
Show
Sock1.LocalPort = 80
Sock1.Listen
End Sub

Private Sub Sock1_ConnectionRequest(ByVal requestID As Long)
If Sock1.State <> sckClosed Then Sock1.Close
Sock1.Accept requestID
End Sub

Private Sub Sock1_DataArrival(ByVal bytesTotal As Long)
Dim strData As String
Sock1.GetData strData, vbString
Text1.Text = Text1.Text + strData
Sock1.Close
End Sub

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_skyraider)