Private Sub DownloadFile(ByRef url As String, ByRef local_dir As String) My.Computer.Network.DownloadFile(url, local_dir, "", "", True, 60000, True, FileIO.UICancelOption.DoNothing) End Sub