Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Закачка куска файла через InetGet

Ответить
Настройки темы
[решено] Закачка куска файла через InetGet

Аватара для FlatX007

Ветеран


Сообщения: 553
Благодарности: 87

Профиль | Отправить PM | Цитировать


Вобщем мне нужно начать закачку файла, например закачать 100Байт в папку ТЕМП - оборвать закачку - проверить имя файла - если совпадает - скачать заного и полностью.

Можно сделать ? ... я просто неразу незанимался этим, в голову ничё нелезет.

Отправлено: 16:00, 05-07-2009

 

Аватара для FlatX007

Ветеран


Сообщения: 553
Благодарности: 87

Профиль | Отправить PM | Цитировать


Вы меня достать решили ... в шапке всё написанно.

Sylver Dragon - да имеено так (без лишних вопросов это хорошо)

Отправлено: 20:43, 05-07-2009 | #11



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Аватара для SyDr

Старожил


Сообщения: 215
Благодарности: 62

Профиль | Отправить PM | Цитировать


Тебя мы достать не решили. Дело в том, что таким образом сформулированные запросы похожи на то, не знаю, что.

$FileFirstPath = "http://somesite.net/setup_"
$FileEndPart = ".exe"

Не проверял (не знаю где), но должно работать. Вовзращает номер.
Код: Выделить весь код
Func SearchMax($FileFirstPath, $FileEndPart, $MaxNumber = 1024)
    Local $MinNumber = 1
    Local $CurrentNumber = Floor(($MaxNumber + $MinNumber) / 2)

    While 1
    If InetGetSize($FileFirstPath & $CurrentNumber & $FileEndPart) Then
        $MinNumber = $CurrentNumber
        $CurrentNumber = Floor(($MaxNumber + $MinNumber) / 2)
    Else
        $MaxNumber = $CurrentNumber
        $CurrentNumber = Floor(($MaxNumber + $MinNumber) / 2)
    EndIf
    If $MinNumber = $maxHumber Then Return $MinNumber
    WENd
EndFunc
Это сообщение посчитали полезным следующие участники:

Отправлено: 20:58, 05-07-2009 | #12


Аватара для Creat0R

Must AutoIt


Moderator


Сообщения: 3030
Благодарности: 996

Профиль | Сайт | Отправить PM | Цитировать


FlatX007, Не вводите в заблуждение людей, в первом сообщение вообще не указано о том что проверять нужно файл в сети...

Цитата FlatX007:
проверить имя файла - если совпадает - скачать заного и полностью. »
Тут не указано с чем совпадает. Поэтому и пошли догадки.

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

Русское сообщество AutoIt | CreatoR's Lab | Opera AC Community


Отправлено: 22:37, 05-07-2009 | #13


Аватара для FlatX007

Ветеран


Сообщения: 553
Благодарности: 87

Профиль | Отправить PM | Цитировать


Ну да ладно пусть я виноватым останусь

Кстати решение Sylver Dragon`a навело меня на довольно простое решение ... щас над ним бъюсь.
Завтра опубликую што я там напридумывал.

Отправлено: 23:26, 05-07-2009 | #14


Аватара для Creat0R

Must AutoIt


Moderator


Сообщения: 3030
Благодарности: 996

Профиль | Сайт | Отправить PM | Цитировать


Цитата FlatX007:
пусть я виноватым останусь »
Тут не вопрос в том кто виноват, просто на будущее - нужно правильно излагать свою проблему.

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

Русское сообщество AutoIt | CreatoR's Lab | Opera AC Community


Отправлено: 23:36, 05-07-2009 | #15


Аватара для SyDr

Старожил


Сообщения: 215
Благодарности: 62

Профиль | Отправить PM | Цитировать


FlatX007, если то, что написал я подходит, то вряд ли у тебя получится проще.

Надеюсь, что успею сегодня увидеть твоё решение. Просто меня какое-то время здесь не будет. Хотя, наверное, периодически заходить смогу.

-------

"Что мы думаем, знаем или во что верим в конце концов не так уж и важно.
Важно лишь то, что мы делаем."
Джон Раскин


Отправлено: 11:59, 06-07-2009 | #16


Аватара для FlatX007

Ветеран


Сообщения: 553
Благодарности: 87

Профиль | Отправить PM | Цитировать


Возможно ктото... был прав что я неправильно описал проблему - вот скрипт который был мне нужен

Код: Выделить весь код
$VerIni = @ScriptDir & '\Ver.ini'
$Read_Ver_Launcher = IniRead($VerIni, "Setting","Version launcher", "0")
$Read_Ver_sXe = IniRead($VerIni, "Setting", "Version sXe", "0")
$Read_Update = IniRead($VerIni, "Setting", "Update", "0")

$File_Name = "Launcher.exe"

For $i = $Read_Update to 30 Step 1
    Sleep(100)
    $sUrl_File = "http://cstrike.****.net/update/launcher/Launcher_" & $i & ".exe"

    $sFileName = StringRegExpReplace($sUrl_File, "^.*/", "")
    $sFilePath = @TempDir & "\" & $sFileName
    InetGet($sUrl_File, $sFilePath, 1, 1)

    While @InetGetActive
        If @InetGetBytesRead > 100 Then InetGet("Abort")
    Wend

    If FileGetSize(@TempDir & "\" & $sFileName) > 0 Then ; Если размер файла больше нуля то ...
        $New_File_Ver_Launcher = $i
        ; Если индекс скаченной версии больше индекса версии в INI то даём команду на закачку
            If $New_File_Ver_Launcher > $Read_Ver_Launcher Then
                IniWrite($VerIni, "Setting", "Update", $New_File_Ver_Launcher) ; Записываем последнюю скаченную версию что бы вследущий раз с неё начать проверку
                IniWrite($VerIni, "Setting", "Version launcher", $New_File_Ver_Launcher)
                InetGet($sUrl_File, @ScriptDir & "\" & $File_Name, 1, 0)
            EndIf

        ExitLoop
    EndIf
Next
Ver.ini
Код: Выделить весь код
[Setting]
Version sXe=0
Version launcher=0
Update=0
Но потом меня осенило (снизошло прозрение) а почему бы не закачать на сервер INI файл в котором будет содержатся информация о новых обновлениях.
Кароче нужда в скрипте отпала ...

Отправлено: 19:58, 06-07-2009 | #17


Аватара для proxy

Старожил


Сообщения: 460
Благодарности: 152

Профиль | Отправить PM | Цитировать


Цитата FlatX007:
Но потом меня осенило (снизошло прозрение) а почему бы не закачать на сервер INI файл в котором будет содержатся информация о новых обновлениях.
Кароче нужда в скрипте отпала ... »
жжошь

-------
Мысли-читатель сломался, может подробней расскажите?
А где исходный код? Или мы стихи обсуждаем?! )) Настройки темы > Решено ?


Отправлено: 23:57, 06-07-2009 | #18


Аватара для Creat0R

Must AutoIt


Moderator


Сообщения: 3030
Благодарности: 996

Профиль | Сайт | Отправить PM | Цитировать


proxy, заканчивай оффтопить .

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

Русское сообщество AutoIt | CreatoR's Lab | Opera AC Community


Отправлено: 00:06, 07-07-2009 | #19



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Закачка куска файла через InetGet

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
[решено] При посл.закачке 2х файлов через InetGet на 2ом файле всегда ошибка! FlatX007 AutoIt 12 26-08-2009 10:03
Отображение прогресса закачки файла через InetGet Creat0R AutoIt 0 18-06-2009 18:24
Параллельная закачка файла Ven Программное обеспечение Windows 10 22-02-2006 17:56
[решено] Не работает закачка файлов из инета через браузер W03L Microsoft Windows 2000/XP 2 06-12-2005 06:10
Закачка файла по PHP IksSafonsky Вебмастеру 4 04-12-2003 03:30




 
Переход