Я сделал небольшой инструмент для быстрого обновления, который распаковывает и копирует файлы с USB-накопителя на локальный компьютер, но я думаю, что теряю большую производительность из-за того, как я пытался ее решить. Я попытался вручную распаковать распаковать и скопировать их, используя WINRAR, и мне потребовалось 1 минута и 5 секунд, чтобы скопировать около 1 ГБ с флешки, в то время как мой сценарий занял около 3-4 минут. Есть ли (довольно простые) альтернативы, которые я могу использовать?
Заранее спасибо
Dim DistrictServerInputZIP As String = (VARIABLE)
Dim shObj As Object = Activator.CreateInstance(Type.GetTypeFromProgID("Shell.Application"))
Dim ZipOutput As Object = shObj.NameSpace((VARIABLE))
ZipOutput.CopyHere((ZipInput.Items), 20)
Кроме того, я хотел бы использовать индикатор выполнения, чтобы показать ход передачи файла, при этом пользователь не сможет "убить" копирование, нажав на кнопку отмены, как на панели окон по умолчанию.