Ver Mensaje Individual
  #4  
Antiguo 31-01-2006
Avatar de Neftali [Germán.Estévez]
Neftali [Germán.Estévez] Neftali [Germán.Estévez] is offline
[becario]
 
Registrado: jul 2004
Ubicación: Barcelona - España
Posts: 18.293
Reputación: 10
Neftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en brutoNeftali [Germán.Estévez] Es un diamante en bruto
Yo no la veo tan descabellada dec. Necesitas sólo un lugar donde colocar las respuestas.
El programa envía atu correo:
//----------------------------------------------------
Usuario: PEPITO
NºConsulta: 1234867 (numero aleatorio o no)
Texto consulta: La consulta bla, bla, bla
//----------------------------------------------------

Tú contestas la preguna y en un directorio dejas un fichero:

//- PEPITO_1234867.txt-------------------------------
Usuario: PEPITO
NºConsulta: 1234867 (numero aleatorio o no)
Texto consulta: La consulta bla, bla, bla
Respuesta: La respuesta a la consulta es....
//----------------------------------------------------

El programa del usuario sólo debe conectarse a Internet e intentar descargar el fichero: PEPITO_1234867.txt

Código Delphi [-]
// Origen 
  SourceFile = 'http://.../respuestas/PEPITO_1234867.txt';
  // Destino
  DestFile = 'c:\temp\PEPITO_1234867.txt';
  // Probar a descargar
  if (UrlDownloadToFile(nil, PChar(SourceFile), 
      PChar(DestFile), 0, nil) = 0) then begin
    // ... Mostrar la respuesta
  end
  else begin
    // ...Todavía no hay respuesta a esa pregunta
  end;

Espero haberme explicado bien.
__________________
Germán Estévez => Web/Blog
Guía de estilo, Guía alternativa
Utiliza TAG's en tus mensajes.
Contactar con el Clubdelphi

P.D: Más tiempo dedicado a la pregunta=Mejores respuestas.
Responder Con Cita