- Joined
- Mar 26, 2012
- Messages
- 1,465
- Reaction score
- 131
PHP:
Private Sub btnReload_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnReload.Click
Dim patchReader() As String = File.ReadAllLines(Application.StartupPath & "\Updatelist.tmp")
For Each d In patchReader
Dim str = d
str = str.Substring(0, str.LastIndexOf(".zip", StringComparison.OrdinalIgnoreCase))
File.Delete(str)
Dim str2 = d
download = New WebClient
download.DownloadFileAsync(New Uri("http://localhost/" & str2), str2)
System.Threading.Thread.Sleep(3000)
Next
NEED IT TO FINISH ^^ LOOP TO DOWNLOAD ALL FILES BEFORE STARTING THIS NEXT ONE
PHP:
'Delete the zip files when done!
For Each t In patchReader
Dim str1 = t
Dim sc As New Shell32.Shell()
'Create directory in which you will unzip your files .
Dim output As Shell32.Folder = sc.NameSpace(Application.StartupPath)
'Declare your input zip file as folder .
Dim input As Shell32.Folder = sc.NameSpace(Application.StartupPath & "\" & str1)
'Extract the files from the zip file using the CopyHere command .
output.CopyHere(input.Items, 4)
Next
For Each d In patchReader
Dim fin = d
File.Delete(fin)
Next
End Sub
Any ideas would be greatful. Thanks guys.