Comunicacion de Parte de Viajeros a la Guardia Civil (España)

[Casimiro Noteví]

Empezado por Javierus

En absoluto; más bien me refiero a que a proporcionar esta información le veo un sentido útil, un control que me parece necesario en la sociedad actual. Igual que se controla quién pasa la frontera, quién vuela en aviones, quién compra pesticidas, quién compra armas, etc

Dudo que un criminal/terrorista/etc. viaje en avión porque lo detectarían. Tampoco se alojará en un hotel con sus datos reales, eso es fácil. La frontera es casi inexistente en Europa, como bien sabes seguro. Tampoco va a comprar armas en una armería española.
O sea, que a los únicos que controlan es a la gente que no necesitan controlar.

[Javierus]

Como te dije, discrepamos totalmente. Tú tienes tu verdad, yo tengo la mía

Con fronteras, me refería a las de fuera de la comunidad europea; dentro de la UE no existen fronteras

[Casimiro Noteví]

Pues sí, ideas distintas por lo que veo

[muli]

Después de hacer la consulta a la guardia civil me responden (por si a alguien le interesa).
(La URL a la que debe hacer el envio de fichero es: https://

usuario[email protected]/hospederias/servlet/ControlRecepcionFichero


El envio del fichero se realizará teniendo en cuenta los siguientes parámetros:
ENCTYPE="multipart/form-data"
METHOD="POST"
type="file"
name="fichero")

El contenido del fichero y las posiciones de los datos, se recoge en el BOE número 180 de Martes 29 de julio de 2003, en la página 29470. Si alguien no puede acceder a la información, que me contacte por privado y le mando un escaneo.
Empezaremos a currar......

Gracias. Saludos.

[Casimiro Noteví]

Ok, y aquí está el BOE.

[cocute]

Empezado por Casimiro Notevi

Dudo que un criminal/terrorista/etc. viaje en avión porque lo detectarían. Tampoco se alojará en un hotel con sus datos reales, eso es fácil. La frontera es casi inexistente en Europa, como bien sabes seguro. Tampoco va a comprar armas en una armería española.
O sea, que a los únicos que controlan es a la gente que no necesitan controlar.

pero si no solicitases esos datos les harías la vida mucho más fácil a todos los maleantes.

[Casimiro Noteví]

Empezado por cocute

pero si no solicitases esos datos les harías la vida mucho más fácil a todos los maleantes.

Entonces, todos somos culpables, maleantes, criminales, terroristas, asesinos, ladrones, etc... hasta que se demuestre lo contrario.

[cocute]

Empezado por Casimiro Notevi

Entonces, todos somos culpables, maleantes, criminales, terroristas, asesinos, ladrones, etc... hasta que se demuestre lo contrario.

es como que digas para qué ponen detectores de robo en productos de tiendas y supermercados si no somos todos ladrones, o para que nos hacen control de alcoholemia a los que no hemos bebido.....

[Casimiro Noteví]

Empezado por cocute

es como que digas para qué ponen detectores de robo en productos de tiendas y supermercados si no somos todos ladrones, o para que nos hacen control de alcoholemia a los que no hemos bebido.....

Para nada, los detectores que dices controlan los productos, no a las personas.

[muli]

Bueno, creo que nos estamos desviando un poco del asunto, se trata de enviar un fichero a una URL, las opiniones de cada uno acerca de la seguridad de los negocios,cosas, productos, personas, etc, pues eso, son opiniones y seguramente habrá tantas opiniones distintas como usuarios hay en el foro, pero lo que seguro solo hay una sola respuesta es la forma del envio de la información y el fichero, por lo que si os parece bien nos centramos en Delphi (que aparte de ser una empresa relacionada con el mundo del automovil) es el entorno de programación del que todos los usuarios de este foro estamos profundamente enamorados.

Un Saludo a todos.

[Casimiro Noteví]

Empezado por muli

Bueno, creo que nos estamos desviando un poco del asunto, se trata de enviar un fichero a una URL, las opiniones de cada uno acerca de la seguridad de los negocios,cosas, productos, personas, etc, pues eso, son opiniones y seguramente habrá tantas opiniones distintas como usuarios hay en el foro, pero lo que seguro solo hay una sola respuesta es la forma del envio de la información y el fichero, por lo que si os parece bien nos centramos en Delphi (que aparte de ser una empresa relacionada con el mundo del automovil) es el entorno de programación del que todos los usuarios de este foro estamos profundamente enamorados.
Un Saludo a todos.

Tenemos por costumbre hablar de todo
Por cierto, la empresa de componentes para vehículos Delphi no tiene nada que ver con nuestro Delphi.

[muli]

No he encontrado mucha información en internet acerca del componente idhttp de las indy (la pagina de las indy está abierta pero intentas descargar manuales y fallan todos los enlaces). Estoy preparando el envio y estoy algo atascado, hago lo siguiente:

Código Delphi [-]
uses
    IdMultipartFormData;

procedure TForm1.Button1Click(Sender: TObject);
var
  data: TIdMultiPartFormDataStream;
begin
    data := TIdMultiPartFormDataStream.Create;
    try
      data.AddFormField('usuario', 'admin');
      data.AddFormField('password', 'myPass');
      Memo1.Lines.Text := IdHTTP1.Post(la url que indico, data);
    finally
      data.Free;
    end;
end;

La url que me han proporcionado es:
"https://usuario':'[email protected]/hospederias/servlet/ControlRecepcionFichero" por lo que deduzco que no yo no debería de poner el usuario y la contraseña en la variable data, sino en la URL.

Pero como le añado el fichero que he creado pues creo que es la propiedad name no? , el type, el enctype como los indico, por que el metodo supongo que va de la forma indicada (supongo que solo podrían ir POST o GET),

Gracias a todos por vuestra ayuda.

[Neftali [Germán.Estévez]]

Empezado por muli

Pero como le añado el fichero que he creado pues creo que es la propiedad name no?

Esta clase TIdMultipartFormDataStream tiene el método Addfile.

Aquí tienes un hilo que habla sobre el tema, aunque si buscas en los foros, seguro que encontrarás más:
https://www.clubdelphi.com/foros/showthread.php?t=50768

[muli]

Estoy probando esto:

Código Delphi [-]
    Data := TIdMultiPartFormDataStream.Create;
    Usuario:= Variable String donde capturo el nombre de usuario
    Contrasinal:=Variable String donde capturo el valor de la contraseña
    Data.AddFile('file',Carpeta+'\'+NombreFichero,'multipart/form-data');   // Añado el fichero en Data
    URLGC:='https://'+Usuario+':'+Contrasinal+'@hospederias.guardiacivil.es/hospederias/servlet/ControlRecepcionFichero'; // URL montada como las indicaciones del G.C.
    Memo1.Lines.Clear;
    Memo2.Lines.Clear;
    Memo1.Lines.Add(URLGC);   //Enseño la url para verificar que está bien montada.
    idHttp1.Request.Method:='POST';
    Memo2.Lines.Text :=idHTTP1.Post(URLGC,Data);
    Data.Free;

Y luego esto:

Código Delphi [-]
    Data := TIdMultiPartFormDataStream.Create;
    Usuario:=Datos.QueryEmpresa.FieldByName('Usuario').AsString;
    Contrasinal:=Datos.QueryEmpresa.FieldByName('Contrasinal').AsString;
    Data.AddFormField('Usuario',Usuario);
    Data.AddFormField('Password',Contrasinal);
    Data.AddFile('file',Carpeta+'\'+NombreFichero,'multipart/form-data');
    URLGC:='https://hospederias.guardiacivil.es/hospederias/servlet/ControlRecepcionFichero';  No tiene sentido poner el usuario  y la contraseña, supongo
    Memo1.Lines.Clear;  
    Memo2.Lines.Clear;
    Memo1.Lines.Add(URLGC);
    idHttp1.Request.Method:='POST';                       // Esto da igual que lo ponga o no, el resultado es el mismo.
    Memo2.Lines.Text :=idHTTP1.Post(URLGC,Data);
    Data.Free;

Alguna luz que me ilumine en mi camino, no consigo que se envie el fichero.

Saludos

[Neftali [Germán.Estévez]]

Pero no veo por ningún sitio el POST.

Código Delphi [-]
...
IdHTTP1.Post(URLGC, data);
...

Revisa este código de [dec]

[pepe_baile]

Hola buenas tardes,
quizas sea un poco tarde, pero en mi empresa tenemos una dll hecha por nosotros en la que entra el código mzr que lleva el dni o los pasaportes en una variable y salen ya los diferentes campos, nombre, apellido, fecha nacimiento, en otras variables.
Además también tenemos otra dll para crear el fichero de texto oficial que luego se envía a la policia o guardia civil.
Están hechas en C++.

Si alguien le puedo ayudar que lo diga,

saludos.

[muli]

Hombre, pues si que parece interesante esas dll, puedes indicar si las venden y su precio en caso de venderlas, y en caso de cederlas gratuitamente estaría bien colgarlas en el FTP del club o publicar el enlace de la descarga.

Saludos.

[pepe_baile]

Hola,
espero poder colocar aquí el código para todo el mundo, no se muy bien como,
pero lo hacemos
saludos

[Casimiro Noteví]

Empezado por pepe_baile

Hola,
espero poder colocar aquí el código para todo el mundo, no se muy bien como,
pero lo hacemos
saludos

Aquí: http://terawiki.clubdelphi.com/
También tienes unas instrucciones para que sea luego bien accesible.