HTTP.DownloadSecure

HTTP.DownloadSecure("https://www.indigorose.com/downloads/sample.zip", _TempFolder .. "\\sample.zip", MODE_BINARY, 20, 443, nil, nil, nil);

-- Check to see if the user is connected to the internet
-- Смотрим, есть ли у пользователя подключение к Интернету
connected = HTTP.TestConnection("http://www.indigorose.com", 20, 80, nil, nil);

-- If they are connected.
-- Если соединение есть.
if connected then
    -- Download a file to their temporary directory.
    -- Загружаем файл во временную директорию.
    StatusDlg.Show(MB_ICONNONE, false);
    HTTP.DownloadSecure("https://www.indigorose.com/update.exe", _TempFolder .. "\\update.exe", MODE_BINARY, 20, 443, nil, nil, nil);

    -- Get any error codes that may have been returned by the download action.
    -- Получаем коды любых ошибок, которые могут быть возвращены действием загрузки.
    error = Application.GetLastError();
    StatusDlg.Hide();

    -- If there was an error during the download, display the error message.
    -- Если во время загрузки была ошибка, показываем сообщение об ошибке.
    if error ~= 0 then
        result = Dialog.Message("Error", _tblErrorMessages[error], MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);

    -- If there was no error during the download.
    -- Если во время загрузки ошибки не было.
    else
        -- Get the CRC value of the downloaded file.
        -- Получаем CRC значение загруженного файла.
        crc_value = File.GetCRC(_TempFolder.."\\update.exe");
        -- Check to see if the CRC value matches it's expected value.
        -- Проверяем совпадает ли значение CRC с ожидаемым значением.
        if crc_value == 824907888 then

            -- Run the exectuable that was downloaded.
            -- Запускаем исполнение загруженного файла.
            File.Run(_TempFolder .. "\\update.exe", "", "", SW_SHOWNORMAL, true);

        -- The CRC value does not match. Display an error message to the user.
        -- CRC значение не совпадает. Показываем пользователю сообщение об ошибке.
        else
            result = Dialog.Message("Error", "The downloaded file is incomplete. Please try downloading again.", MB_OK, MB_ICONSTOP, MB_DEFBUTTON1);
        end
    end

-- Display a notice informing them that they are not connected.
-- Показываем пользователю сообщение об отсутствии соединения с Интернетом.
else
    Dialog.Message("Internet Error", "You are not connected to the internet. Please connect to download.");
end

-- Callback function for HTTP.DownloadSecure
-- Возвращающаяся функция для HTTP.DownloadSecure
function DownloadCallback (nDownloaded, nTotal, TransferRate, SecondLeft, SecondsLeftFormat, Message)
    -- Convert total and downloaded bytes into formatted strings
    -- Конвертируем полное и загруженное количество байтов в строковый формат
    sDownloaded = String.GetFormattedSize(nDownloaded, FMTSIZE_AUTOMATIC, true);
    sTotal = String.GetFormattedSize(nTotal, FMTSIZE_AUTOMATIC, true);

    -- Output time left, formatted.
    -- Переводим в строку оставшееся время загрузки.
    StatusDlg.SetMessage("Currently downloading file . . . Time Left: " .. SecondsLeftFormat);

    -- Output formatted sizes to user through statusdlg status text
    -- Выводим конвертированные в строки размеры пользователю через текст состояния окна statusdlg
    StatusDlg.SetStatusText("Downloaded: " .. sDownloaded .. " / " .. sTotal);

    -- Set meter position (fraction downloaded * max meter range)
    -- Устанавливаем позицию счетчика (частично загруженный размер * макс. значение счетчика)
    StatusDlg.SetMeterPos((nDownloaded / nTotal) * 65534);
end

-- Set statusdlg title and message
-- Устанавливаем заголовок и сообщение окна statusdlg
StatusDlg.SetTitle("Downloading . . . ");
StatusDlg.SetMessage("Currently downloading file . . . ");

-- Set meter range (max range = 65534)
-- Устанавливаем диапазон измерения (макс.значение = 65534)
StatusDlg.SetMeterRange(0, 65534);

-- Show the StatusDlg
-- Показываем окно StatusDlg
StatusDlg.Show(0, false);

-- Download a file from the internet to the user's computer
-- Uses DownloadCallback() as the callback function
-- Загружаем файл из интернета в компьютер пользователя
-- Используем DownloadCallback() как возвращающуюся функцию
HTTP.DownloadSecure("https://www.yourdomain.com/downloads/update.exe", _TempFolder .. "\\update.exe", MODE_BINARY, 20, 443, nil, nil, DownloadCallback);

-- Hide the StatusDlg
-- Скрываем окно StatusDlg
StatusDlg.Hide();