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

Question

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&#233;es &#224; 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&#233;es dans le buffer, don&#233;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.

kanigou · Answer

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&#233;');


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&#233;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&#233;es recues');


ClientSocket1.Close;
Memo3.Lines.Add('Socket Deconnected');

-----------------------------------------------------

Voil&#224;, si quelqu'un pouvait m'aider .. :/

Merci.

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

1 réponse

Votre réponse

Discussions similaires