Se non ho capito male devi copiare un file da una directory del tuo PC ad un'altra sempre sul tuo PC. (Perchè lo definisci upload, si tratta di una semplice copia!!).

Puoi usare l'oggetto FileSystemObject (presente nella libreria Microsoft Scripting Run-Time), e precisamente il metodo CopyFile.

Dim fso as New FileSystemObject
fso.CopyFile "c:\myDyrectory\myImg\immagine01.gif", "c:\altraDyrectory\immagine01.gif", True


Dove il valore 'True' alla fine indica un'eventuale sovrascrittura del file di destinazione qualora già presente.

NB: Se per upload intendi invece la copia del file su di un PC remoto, devi usare il Protocollo di Trasferimento File (FTP) e pertanto devi utilizzare il componente Inet (Microsoft Internet Transfer Control).

Spero di essere stato d'aiuto, fammi sapere...

Ciao!!:gren: