Otra de InetGet
Publicado: 30 Dic 2013, 18:12
Hola chic@s:
¿Cómo va todo? Yo un poco desconectado de Autoit (y del foro), pero me acuerdo de vosotros con frecuencia.
He tenido que volver a usar un programa que hice en su momento, pero parece que no me funcina ahora el InetGet.
Quiero obtener Ficha Catastral de un inmueble, cuya URL es con este formato (pongo ejemplo de un inmueble de la conocida Plaza Puerta del Sol)
https://www1.sedecatastro.gob.es/Cartog ... px?refcat=0345701VK4704E0001KJ
Siendo lo que va detrás de refcat la referencia catastral de la que deseo descargar su ficha (un pdf).
Bien, si pongo esa URL en el navegador, sin ningún problema se descarga la ficha.
Pero si hago código en Autoit, no consigo que descargue el archivo. ¿Puede ser por el https?
A ver si alguien me dice en qué tontería estoy fallando. También probé con UDF de http, pero no consigo nada.
Saludos y ¡Feliz Año!
¿Cómo va todo? Yo un poco desconectado de Autoit (y del foro), pero me acuerdo de vosotros con frecuencia.
He tenido que volver a usar un programa que hice en su momento, pero parece que no me funcina ahora el InetGet.
Quiero obtener Ficha Catastral de un inmueble, cuya URL es con este formato (pongo ejemplo de un inmueble de la conocida Plaza Puerta del Sol)
https://www1.sedecatastro.gob.es/Cartog ... px?refcat=0345701VK4704E0001KJ
Siendo lo que va detrás de refcat la referencia catastral de la que deseo descargar su ficha (un pdf).
Bien, si pongo esa URL en el navegador, sin ningún problema se descarga la ficha.
Pero si hago código en Autoit, no consigo que descargue el archivo. ¿Puede ser por el https?
A ver si alguien me dice en qué tontería estoy fallando. También probé con UDF de http, pero no consigo nada.
Saludos y ¡Feliz Año!
Código: Seleccionar todo
; Puerta del Sol
$ref="0345701VK4704E0001KJ"
$URLCatastro = "https://www1.sedecatastro.gob.es/Cartografia/ImprimirCroquisyDatos.aspx?refcat="& $ref
$Carpeta = "D:\"
ConsoleWrite($URLCatastro & @CRLF)
ConsoleWrite($Carpeta & "\" & $ref & ".pdf" & @CRLF)
$hDownload = InetGet($URLCatastro, $Carpeta & "\IC_" & $ref & ".pdf")