Ver Mensaje Individual
  #1  
Antiguo 16-11-2012
Gerson12 Gerson12 is offline
Miembro
NULL
 
Registrado: abr 2012
Ubicación: Peru-Lima
Posts: 138
Reputación: 13
Gerson12 Va por buen camino
Problema al envio del texto a una web

hola amigos bueno les vengo a consultar una duda que tengo la cual estoy usando indy ,para enviar unos datos a una web pero al enviar me sale una imagen y me gustaria me ayuden porfavor practicamente estoy usando este codigo
Código Delphi [-]
uses
  {
    Indy Components

    Unidades necesarias para utilizar las clases
    implicadas en la tarea que nos ocupa.
  }
  IdHTTP, IdMultipartFormData;

{
  Evento "Click" de un supuesto botón "btnPost" que
  utilizamos a modo de ejemplo para realizar la tarea.
}
procedure TfrmPrincipal.btnPostClick(Sender: TObject);
var
  idHttp: TIdHTTP;
  datosPost: TIdMultiPartFormDataStream;
begin
  {
    Creamos una instancia de la clase TIdMultiPartFormDataStream
    que nos sirve para determinar luego los distintos pares
    "claves=valor" de que se compone un supuesto "Post HTTP"
  }
  datosPost := TIdMultiPartFormDataStream.Create;
  try
    {
      Como puede verse añadir pares "clave=valor" no resulta
      nada complicado. Pueden añadirse tantas como sean precisas.
    }
    datosPost.AddFormField('NombreCampo1', 'ValorCampo1');
    datosPost.AddFormField('NombreCampo2', 'ValorCampo2');
    //datosPost.AddFormField('NombreCampo3', 'ValorCampo3');

    {
      Instanciamos un objeto de la clase "TIdHttp"
    }
    idHttp := TIdHTTP.Create(Self);
    try
      {
        Y en la siguiente línea se lleva a cabo el "Post HTTP"
        y además se obtiene su respuesta, que viene dada por el
        propio método "Post" de la clase "TIdHttp".
      }
      mRespuestaPost.Text := idHttp.Post('http://www.url.com/', datosPost);

    finally
      idHttp.Free;
    end;
  finally
    datosPost.Free;
  end;
end;
pero al mandar la imformacion a ala web me sale asi una imagen como esta

Bueno espero me puedan ayudar con este problema que tengo tiempo

GRacias por su tiempo amigos
__________________
Gracias a todos por apoyarme ^^
Responder Con Cita