si te entiendo,bueno mira te prepare este ejemplo,te baja un archvio al disco duro 10 veces vos cambiale el numero y el link al archivo y listo...solo pone un boton en el formulario...
saludos.
Código [Seleccionar]
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
Private Sub Command1_Click()
Call Descargar("http://www.planet-source-code.com/Upload_PSC/ftp/Logic_Desi2109994182008.zip")
End Sub
Private Sub Form_Load()
Command1.Caption = "Descargar Archivo"
End Sub
Sub Descargar(Url As String)
Static a As Integer
Me.MousePointer = vbHourglass
For i = 0 To 10
a = a + 1
Call URLDownloadToFile(0, Url, "c:\archivo" & a & ".rar", 0, 0)
Me.MousePointer = vbDefault
Next
End Sub
saludos.