Borrar Archivos temporales de Internet

20/01/2009 - 20:02 por Sago | Informe spam
Bunas tardes bajo archivos con este codigo, pero necesito tener el archivo
mas actualizado que ponen, si la corro antes, no me baja el archivo mas
actualizado, para arreglarlo necesito borrar archivos temporales de internet
manualmente, Herramientas, Opciones de Internet, Eliminar
Archivos

Me dijo principiante, por que sigo aprendiendo gracias a este foro he
aprendido mas en este foro que en todos los libros que he comprado ( son
varios).

Espero que me pudas ayudar (otra vez) por favor, debi haber estudiado para
esto, solo me queda aprender por mi cuenta.

Te expongo el codigo.

Private Declare Function URLDownloadToFile Lib "urlmon" Alias
"URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal
szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

Dim strArchivo As String



Sub Bajar_Archivos_Intenet()
Application.Cursor = xlWait '[o = xlIBeam o = xlNorthwestArrow]
Application.StatusBar = "Espere un momento Bajando Vectores..."
Application.ScreenUpdating = False
strArchivo = Format(Date, "yyyymmdd")
'URLDownloadToFile 0,
"http://IVANZAENS:ZAENSIVAN@www.precios.com.mx/pip-files/OtrosArchivos/ivansaenz/" & "PGN01_VD" & strArchivo & "_2.zip", "c:\PERSONALIZADO.zip", 0, 0



Application.Cursor = xlDefault
Application.ScreenUpdating = True
Application.StatusBar = False
End Sub

Muchas gracias.

Saludos.

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
21/01/2009 - 01:29 | Informe spam
hola, !

... bajo archivos con este codigo, pero necesito tener el archivo mas actualizado que ponen
si la corro antes, no me baja el archivo mas actualizado
para arreglarlo necesito borrar archivos temporales de internet manualmente
Herramientas, Opciones de Internet, Eliminar Archivos



prueba adaptando de la siguiente pagina el ejemplo para descargar archivos de internet...
"omitiendo" el pase por la cache del explorador de internet...

URLDownloadToFile: Fast, Simple and Transparent File Downloads Bypassing the IE Cache
http://vbnet.mvps.org/code/internet...ocache.htm

saludos,
hector.
Respuesta Responder a este mensaje
#2 Sago
22/01/2009 - 17:39 | Informe spam
Muchas Gracias Hector miguel, voy a probarlo.


Saludos desde D.F.

"Héctor Miguel" wrote:

hola, !

> ... bajo archivos con este codigo, pero necesito tener el archivo mas actualizado que ponen
> si la corro antes, no me baja el archivo mas actualizado
> para arreglarlo necesito borrar archivos temporales de internet manualmente
> Herramientas, Opciones de Internet, Eliminar Archivos

prueba adaptando de la siguiente pagina el ejemplo para descargar archivos de internet...
"omitiendo" el pase por la cache del explorador de internet...

URLDownloadToFile: Fast, Simple and Transparent File Downloads Bypassing the IE Cache
http://vbnet.mvps.org/code/internet...ocache.htm

saludos,
hector.



Respuesta Responder a este mensaje
#3 De_Corando.
23/01/2009 - 01:43 | Informe spam
Buenas Noches, Sago

Para eliminar archivos temporales de la computadora a diario prueba lo
siguiente:
Control Panel,
Opciones de Internet, pestana de GENERAL
Historia
Dias a Guardar Paginas en Historia 0 Dias

Ademas puedes poner la opcion
Control Panel,
Opciones de Internet, pestana de AVANZADOS
Seguridad
y buscar y marcar o seleccionar la opcion
Borrar Carpeta de Archivos Temporales de Internet al cerrar


Envia Dudas y Comentarios.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida