Hola, quisiera saber como puedo subir y bajar un archivo a internet y colocarlo dentro de mi hosting?

Para esto puedes usar el control Internet Transfer Protocol.
Saludos

Gracias por contestar, ahora voy a investigar sobre ese control, pero si tuvieras algun ejemplo te lo agradeceria bastante

aqui te mando un pequeño ejemplo:

esto es para guardar en un archivo los datos obtenidos del metodo openurl


Dim strURL As String
Dim bData() As Byte ' Variable de datos
Dim intFile As Integer ' Variable FreeFile

' primero que todo debes configurar el control inet1 para tu red
' existen otros tipos de combinacion

Inet1.Proxy = "miNombreProxy"
Inet1.AccessType = icNamedProxy

' para un ftp

With Inet1
.URL = "ftp://ftp.algúnSitioFTP.com"
.UserName = "Juan García"
.Password = "mAuI&9$6"
.Execute ,"DIR" ' Devuelve el directorio.
.Execute ,"CLOSE" ' Cierra la conexión.
End With


'para colocar colocame.txt en el sitio
Inet1.Execute "PUT C:\colócame.txt /colócame.txt"

' para obtener un archivo y guardarlo

strURL = _
"ftp://ftp.microsoft.com/Softlib/Softlib.exe"
intFile = FreeFile() ' Establece intFile a un
' archivo no utilizado.
' El resultado del método OpenURL va a la matriz
' de bytes y ésta se guarda entonces en disco.
bData() = Inet1.OpenURL(strURL, icByteArray)
Open "C:\Temp\Softlib.exe" For Binary Access Write _
As #intFile
Put #intFile, , bData()
Close #intFile