Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Cambio de ruta en archivos

18/08/2009 - 21:18 por Sago | Informe spam
Ayuda Hacer una pregunta
Espero me puedan ayudar por favor ,una vez mas, anteriormente tenia una macro
que me bajaba archivos de internet con password y contraseña y me los
descargaba en una ruta especifica, de un tiempo a la fecha ya no funciona y
hable al sitio para que me ayudaran, pero me dijeron que por seguridad ya
habia cambiado.

anteriormente me los bajaba con este 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()
strArchivo = Format(Date, "yyyymmdd")

URLDownloadToFile 0,
"http://USUARIO:PASWORD@www.precios.com.mx/pip-files//VectorConsar/" & "24" &
strArchivo & "CONSAR.zip", "F:\VECTORES\24" & strArchivo & "Consar.zip", 0, 0

End Sub

lo poco que pude investigar es que ahora lo ponen en esta ruta:

URLDownloadToFile 0,
"http://USUARIO:CONTRASEÑA@www.precios.com.mx/aspnet/archivos/detalle.aspx?ruta=/VectorConsar/"
& "24" & strArchivo & "CONSAR.zip", "F:\VECTORES\24" & strArchivo &
"Consar.zip", 0, 0

Pero no me baja nada solo el archivo vacio, espero me puedan ayudar ya que
para mi operación es muy importante.

Saludos.
email Siga el debateRespuesta 3 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 Héctor Miguel
19/08/2009 - 05:32 | Informe spam
hola, !

hay ciertos "detalles" que no se desprenden de tu consulta, pero...
revisa la siguiente conversacion: -> http://tinyurl.com/4h2mxj
incluye una sugerencia para primero loggear con: user=... password=... y continuar con: action=Login
y despues abrir la pagina o seccion que necesitas ;)

la otra alternativa (ya que "los del sitio" no dieron la suficiente informacion...)
es que continues bajando los archivos de la forma "tradicional"
(o sea, entrando normal al sitio y descargando desde donde corresponda)

si cualquier duda (o informacion adicional)... comentas ?
saludos,
hector.

__ OP __
... tenia una macro que me bajaba archivos de internet con password y contrasena y me los descargaba en una ruta especifica
de un tiempo a la fecha ya no funciona y hable al sitio para que me ayudaran, pero me dijeron que por seguridad ya habia cambiado.
anteriormente me los bajaba con este 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()
strArchivo = Format(Date, "yyyymmdd")
URLDownloadToFile 0, "http://USUARIO:/pip-files//VectorConsar/" & "24" & strArchivo & "CONSAR.zip", "F:\VECTORES\24" & strArchivo & "Consar.zip", 0, 0

End Sub

lo poco que pude investigar es que ahora lo ponen en esta ruta:
URLDownloadToFile 0, "http://USUARIO:CONTRASEà‘/aspnet/archivos/detalle.aspx?ruta=/VectorConsar/" & "24" & strArchivo & "CONSAR.zip", "F:\VECTORES\24" & strArchivo & "Consar.zip", 0, 0

Pero no me baja nada solo el archivo vacio, espero me puedan ayudar ya que para mi operacion es muy importante.

Preguntas similares

 

Busqueda sugerida :