Iniciar sesiónCerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta
LWP » Foros » Access » Microsoft Internet transfer control

Access - Microsoft Internet transfer control

Volver
Nuevo Tema
<<>>
 
Vista:

Microsoft Internet transfer control

Publicado por ivan (63 intervenciones) el 07/04/2004 12:00:46
Hola,

Estoy trabajando con Microsoft Internet transfer control, en visual basic con el método execute se bajan y suben ficheros, pero en Access VBA no se como va puesto que el método execute no funciona.
Alguien me puede ayudar, es urgente

Gracias de antemano
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Alejandro

Microsoft Internet transfer control

Publicado por Alejandro (4142 intervenciones) el 05/05/2023 00:27:39
En Access VBA, puedes utilizar la función URLDownloadToFile para descargar archivos desde una URL a una ruta de archivo local, y la función URLUploadToFile para cargar archivos desde una ruta de archivo local a una URL. Ambas funciones requieren que agregues una referencia a "Microsoft WinHTTP Services, version 5.1" en tu proyecto.

Aquí hay un ejemplo de cómo utilizar URLDownloadToFile para descargar un archivo:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
Public 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
 
Sub DescargarArchivo()
    Dim URL As String
    Dim RutaLocal As String
    Dim Resultado As Long
 
    URL = "https://www.ejemplo.com/archivo.txt"
    RutaLocal = "C:\Archivos\archivo.txt"
 
    Resultado = URLDownloadToFile(0, URL, RutaLocal, 0, 0)
 
    If Resultado = 0 Then
        MsgBox "Archivo descargado exitosamente."
    Else
        MsgBox "Error al descargar archivo."
    End If
End Sub

Ten en cuenta que URLDownloadToFile requiere que el archivo exista en la URL especificada y tenga permisos para ser descargado.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar