Ver Mensaje Individual
  #2 (permalink)  
Antiguo 11/12/2009, 07:53
chuchufuentes
 
Fecha de Ingreso: mayo-2008
Mensajes: 353
Antigüedad: 16 años
Puntos: 3
De acuerdo Respuesta: Procedimiento o Función o que?

Es una funcion toma este ejemplo

en el boton que lo llamas por ejemplo enviar colocas esto

DownLoadFromURL "www.ecourierservices.com", "c:\tracking.txt"


y abajo, separado colocas la funcion que se llama DownLoadFromURL

Private Sub DownLoadFromURL(ByVal url As String, ByVal LocalPath As String)
With Inet1
.AccessType = icDirect
.Protocol = icFTP
.UserName = "ecourierservices"
.Password = "xxxxxx"
.RemoteHost = url
.Execute .url, "PUT " & LocalPath & " /www/tracking.txt"
While .StillExecuting
DoEvents
Wend
.Execute , "CLOSE"
End With
End Sub