Cómo descargar archivos de Internet

  • 1 Respuestas
  • 2669 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Desconectado ANTRAX

  • *
  • Administrator
  • Mensajes: 5672
  • Actividad:
    20%
  • Country: ar
  • Reputación 37
  • ANTRAX
  • Skype: underc0de.org
  • Twitter: @Underc0de
    • Ver Perfil
    • Underc0de
    • Email

Cómo descargar archivos de Internet

  • en: Julio 26, 2010, 04:15:10 pm
Código: Visual Basic
  1. 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

Código: Visual Basic
  1. Dim Reply As Long
  2. Reply = URLDownloadToFile(0, "http://dirección", "C:\archivo_destino", 0, 0)
  3. If Reply = 0 Then
  4.     'Descargado
  5. Else
  6.     'Error al descargar
  7. End If
« Última modificación: Mayo 12, 2014, 03:26:27 pm por Expermicid »


Desconectado _katze_

  • *
  • Underc0der
  • Mensajes: 37
  • Actividad:
    0%
  • Reputación 0
    • Ver Perfil
    • Email

Re:Cómo descargar archivos de Internet

  • en: Julio 27, 2010, 12:24:46 pm
Dim Reply As Long, direccion as string, destino as string
direccion = text1.text ' ingresamos la url completa tal cual sino podemos concatenarlas con el http:// :P
destino = text2.text ' lo ago de esta manera para no entrar en detalles con el commondialog pero supongamos q lo 'hicimos asi con el common y carga la ruta en un txt
Reply = URLDownloadToFile(0, direccion, destino, 0, 0)
If Reply = 0 Then
    'Descargado
Else
    'Error al descargar
End If


un pokito mejor esta :D mas prof

 

Como leer caracter por caracter de una cadena string

Iniciado por ANTRAX

Respuestas: 0
Vistas: 2528
Último mensaje Julio 26, 2010, 11:42:21 am
por ANTRAX
Cómo ajustar la cadena introducida a formato numérico: "#,##"

Iniciado por ANTRAX

Respuestas: 0
Vistas: 2218
Último mensaje Julio 26, 2010, 12:38:04 pm
por ANTRAX
Cómo ajustar la cadena introducida a formato de hora "00:00:00"

Iniciado por ANTRAX

Respuestas: 0
Vistas: 2580
Último mensaje Julio 26, 2010, 12:36:23 pm
por ANTRAX
Manual de como bloquear CTRL+ALT+SUP, ALT+TAB, Y OTROS con Visual Basic en WinXP

Iniciado por ANTRAX

Respuestas: 0
Vistas: 2955
Último mensaje Julio 26, 2010, 11:11:14 am
por ANTRAX
Como pasar de un texto a otro usando Enter

Iniciado por ANTRAX

Respuestas: 0
Vistas: 2467
Último mensaje Julio 26, 2010, 10:28:10 am
por ANTRAX