Bueno, sus bolas deben estas asi de mi
http://hiapr.org/yabbfiles/Attachments/huevon.jpg
estuve toda la mañana bajando ejemplos de ftp en vb, me duele la cabeza :xD
Alguien me dice como configurar esto? (Nose si usar http:// o ftp:// , no entiendo mucho de esto)
Informacion :
Pagina - www.sapopepe.99k.org
Usuario - sapopepe_99k
Password - ******* :xD
Private Sub Form_Load()
With Inet1
.URL = "http://www.sapopepe.99k.org"
.Protocol = icFTP
.UserName = "sapopepe_99k"
.Password = "******"
.RemoteHost = "http://www.sapopepe.99k.org"
.RemotePort = 21
.Execute "http://www.sapopepe.99k.org", "/nukje/a.zip", "GET", "C:\recibido.zip"
End With
End Sub
http://foro.elhacker.net/programacion_visual_basic/subirbajar_archivos_adesde_ftp_en_vb-t302197.0.html
http://foro.elhacker.net/programacion_vb/como_puedo_descargar_un_archivo_de_internet_con_visual_basic_6-t71774.0.html
Extraido de RVB
'Propiedades para el control inet ( AccessType y URL )
With Inet1
.AccessType = icUseDefault
'Indicamos el url del archivo
.URL = ....
'Indicamos que vamos a descargar o recuperar un archivo desde una url
.Execute , "GET"
End With
End Sub
example:
http://www.recursosvisualbasic.com.ar/htm/trucos-codigofuente-visual-basic/zip/41-escribir-array-de-bytes.zip
ese era mi usuario antes de que insulte a un mod que me molestaba ;-)
With Inet1
.URL = "ftp://PAGINA.Com"
.UserName = "USUARIO"
.Password = "PASSWORD"
.Execute , "GET ARCHIVOREMOTO ARCHIVOLOCAL"
.Execute , "CLOSE" ' Cierra la conexión.
End With
funciona perfectooooo, ;)