Transmettre des fichiers avec ServerSocket

Question

Bonjour, j'ai fait un petit serveur avec les composants ServerSocket de Delphi 6. 

Bon l&#224; j'arrive &#224; traiter les requetes HTTP du clients, quand il tape http://localhost:720/index.html (elle marche sur le port 720)
La variable RequeteRecu vaut index.htm.

J'arrive alors &#224; passer du texte au client mais pas des fichiers et je voudrai passer des images .

mon code &#224; SocketServerClientRead est : 

procedure TMyForm.SocketServerClientRead(Sender: TObject;
  Socket: TCustomWinSocket);
var
  TxtRecu, RequeteRecu, NomClient, Resultat: String;
begin
  TxtRecu := Socket.ReceiveText;
  RequeteRecu := ExtraireCommande(TxtRecu);
  NomClient := ServerSock.Socket.Connections[ServerSock.Socket.ActiveConnections-1].RemoteHost + ' (' +
               ServerSock.Socket.Connections[ServerSock.Socket.ActiveConnections-1].RemoteAddress + ')';
 
 { *** Quelle code je mets pour faire passer des fichiers binaires ***}
  Application.ProcessMessages;
  Socket.Close;
end;

Merci d'avance pour vos r&#233;ponses

Francky23012301 · Answer

Salut,

Depuis l'apparition des composants INDY, TSocket est devenu obsolète. Il est préférable (question de simplicité de codes entre autre) de ne plus les utiliser.

A+

cs_fab56 · Answer

Et si je veux utiliser tout de m&#234;me c'est composants (car bcp moins complexe) ?

Francky23012301 · Answer

Fabrice,

Deux choses :

*Transfert de fichiers par Tsocket : voir la source de Nono40

*La programmation par TSocket est bcp plus complexe si tu le fais proprement (j'insiste bien la-dessus). En effet les composants indy ont deux propriétés très importantes : pas de gestion des erreurs (tu les as pas oubliés j'espère sinon ca va planter au minimum une fois sur dix avec TSocket) et surtout l'utilisation des Streams. Les blocks (blockread ou blockwrite) sont bcp bcp bcp plus lourds. Question taille des fichiers : avec "Indy" les fichiers sont moins gros. Le seul probleme d'indy et le coté bloquant que l'on peut contourner pas le composant antifreeze.

A+

Francky23012301 · Answer

Désolé : Le seul probleme d'indy est le coté bloquant que l'on peut contourner par le composant antifreeze

Transmettre des fichiers avec ServerSocket

4 réponses

Votre réponse

Discussions similaires