saving multiple files from a server using inet.

[Gabriel Crowe]

i have a tricky problem that freezes my editor. first of all, here is my code.

Private Sub monkey_Click()
'set a reference to the Microsoft Internet Transfer Control then use the code below
Label4.Caption = "clicked"
    'set protocol to HTTP
    
        For parsetext = 0 To intCount - 1
        Label4.Caption = "iterating..."
           'set URL
           urlnamez = urlArray(parsetext)
           filenamez = fileArray(parsetext)
           
           
           
           Inet1.URL = Text1.Text & urlnamez
    
           ' Retrieve the HTML data into a byte array.
           b() = Inet1.OpenURL(Inet1.URL, icByteArray)
    
           ' Create a local file from the retrieved data.
           Open Text4.Text & filenamez For Binary Access Write As #5
           Put #5, , b()
           Close #5
    
    
        Next



End Sub

what it actually is supposed to do, is take 2 arrays, in this case, they are called "urlarray" and "filearray". it then takes the url from the urlarray (its full of urls, already , load the data from it into a variable, then save this data, using a filename specified, in the same location, in "filearray".

however, its simply crashes my workstation.

does anyone have any insight as to why this happens?

thanks in advance.

Gabe