Probleme pour l'insertion de données dans un buffer

Signaler
Messages postés
6
Date d'inscription
dimanche 26 janvier 2003
Statut
Membre
Dernière intervention
31 août 2005
-
Messages postés
6
Date d'inscription
dimanche 26 janvier 2003
Statut
Membre
Dernière intervention
31 août 2005
-
Bonsoir, je debute dans les sockets et j'ai une question, je souhaite utiliser le socket pour me connecter a un proxy et envoyer des données à celui-ci (requete de page PHP)

ClientSocket1.Open;
ClientSocket1.Socket.SendBuf(buff1,1);

Mon probleme est que je n'arrive pas a mettre des données dans le buffer, donées qui erpmettrons la requete de la page PHP ... je dois mettre dans ce buffer ceci (globalement ) :

"4 1 0 0 0 Random(1,255) 0 edit1.Text 0"

Je pense que la solution est devant mes yeux, mais pas moyen de tomber dessus :/

Merci.

1 réponse

Messages postés
6
Date d'inscription
dimanche 26 janvier 2003
Statut
Membre
Dernière intervention
31 août 2005

Bon, ok j'ai reussi ce que je voualis faire ... Mais bon mon programme ne fonctionne pas ...

je veux me connecter a un proxy (facile avec le socket) puis envoyer une nouvelle demande qui lancerait un page PHP a partir de ce proxy ... Quelqu'un peut m'aider ?

----------------------------------

ClientSocket1.Open;
Memo3.Lines.Add('Socket Connected');


buff1 := PChar('1,4,1,0,0,0,253,0,'+edit1.Text+',0');
ClientSocket1.Socket.SendBuf(buff1,0);
Memo3.Lines.Add('Buffer envoyé');


ClientSocket1.Socket.SendText('GET /'page.php' HTTP/1.1 '+ #13#10+'Host: '+edit1.Text+#13#10#13#10);
ClientSocket1.Socket.SendText('Content-type: text/html');
Memo3.Lines.Add('Requete de a page PHP envoyée');


i1 := Length(buffer);
i2 := ClientSocket1.Socket.ReceiveLength;
Setlength(buffer, i1+i2);
ClientSocket1.Socket.ReceiveBuf(Buffer[i1], i2);


Setlength(buffer, 0);
Memo3.Lines.Add(string(buffer));


Memo3.Lines.Add('Données recues');


ClientSocket1.Close;
Memo3.Lines.Add('Socket Deconnected');

-----------------------------------------------------

Voilà, si quelqu'un pouvait m'aider .. :/

Merci.