[beve]

Интересно... А такая функция работает: »

Такая функция работает правильно.

[SyDr]

Код:

Func GetSourceOrFile($URL, $SourceOrFile = "Source", $PathToDownLoad = "")
#cs ----------------------------------------------------------------------------
Внешние связи: #include <File.au3>, переменная $AllowDownLoad для немедленного завершения и цикл обработки GUI {GUIProcess()}
Получает файл или исходный текст файла в интернете. При этом обрабатывает GUI
Возвращаемое значение: Исходный текст файла или пустая строка
#ce ----------------------------------------------------------------------------
    Local $Handle
    Local $Return = ""

    If $PathToDownLoad = "" Then $PathToDownLoad = _TempFile()
    $Handle = InetGet($URL, $PathToDownLoad, 0, 1)

    While (NOT(InetGetInfo($Handle, 2))) And $AllowDownLoad
        ; Вот здесь можно вставить функцию обновления прогресса.
        GUIProcess()
    WEnd

    InetClose($Handle)

    If $SourceOrFile = "Source" Then
        $Return = FileRead($PathToDownLoad)
        FileDelete($PathToDownLoad)
    EndIf

    Return $Return
EndFunc

[Creat0R]

Sylver Dragon, Это в последней бета, на финалке оно работать не будет

[SyDr]

В предпоследней тоже будет работать

читать дальше »

3.3.1.1 (14th June, 2009) (Beta)
AutoIt:
- Added #529: Added the "NAME" property to allow direct search for .NET WinForm control names.
- Added: PixelChecksum() extra parameter to select CRC32 instead of ADLER.
- Added #984: @OSVersion now returns "WIN_XPe" for Windows XP Embedded.
- Added #938: UDPOpen() flag to allow broadcasting with 255.255.255.255. (Thanks skyteddy)

- Fixed #969: FileFindNextFile() does not set @extended if first found is a dir. (Thanks wraithdu)
- Fixed #975: Checkbox or Radio bkcolor on tab regression with Theme. (Thanks GEOSoft, jchd)
- Fixed #983: InetGet() crash with IE6.
- Fixed #1006: @MSEC returned wrong value for values < 100.
- Fixed #1010: FileRead() UTF8 with BOM files return too many chars.

- Changed #968: AutoUpdateIt updated by ProgAndy to use new Inet features.

AU3Info:
- Added: Control information now includes the .NET WinForm if available.

UDFs:
- Fixed #979: _ArrayDisplay() - just old/incorrect syntax in header comment
- Fixed #974: _WinAPI_WindowFromPoint tagPoint structure
- Fixed #1000: _GUICtrlListBox_Create result error message _WinAPI_CreateWindowEx: Cannot find window class
- Fixed #1004: _PathFull() was returning invalid results.
- Fixed #1015: _SQLite_SaveMode() renamed as _SQLite_SafeMode(). (Thanks Zedna)
- Fixed #1019: _GUICtrlListView_SetItemCut, _GUICtrlListView_SetItemFocused, _GUICtrlListView_SetItemDropHilited enabled flag not working correctly.

- Changed: Error msg with UTF8 info can be displayed on Scite console. Extra parameter in _SQLite_Startup().
- Changed: _SQLite 3.6.14.1 -> 3.6.14.2

- Removed: _StringAddThousandsSep() has been removed. Too many opinions on how the function should work means nobody is happy with it.

Я думаю, что изменить под свои нужды труда не составит. У меня к тому же есть вещи, которые не нужны (переменная для немедленного завершения и получение исходного текста).

Кстати, а если есть некоторые вопросы, которые на отдельную тему не тянут... Куда их задавать? Всё равно тему создавать?

[Creat0R]

Всё равно тему создавать? »

Да.

[sashadeg]

Интересно... А такая функция работает »

А у меня она вообще не запускается...

[Creat0R]

у меня она вообще не запускается »

Это функция, её нужно вызвать

[sashadeg]

Это функция, её нужно вызвать »

ммм... а я думал это готовая...

[zbruy]

Занятно, а я хотел по другому использовать этот скрипт, для перезвона при разрыве соединения. У меня adsl в сетевых подключениях есть автоматически созданное модемом(dsl-200, usb) соединение. Я просто сделал ярлык в автозапуск и поставил галку для перезвона при разрыве. То есть все само коненктится при включении или обрыве связи, но комп я гашу в спящий режим, и после его включения автозапуск само собой не срабатывает, ну и перезвон разрыва тоже. Идея такова, в этот скрипт

Код:

#include <Inet.au3>
$g_szVersion = "Script 1.0"
If WinExists($g_szVersion) Then Exit ; не дает запуска дубликата
AutoItWinSetTitle($g_szVersion)
While 1 = 1
If _GetIP()<>-1 Then
Sleep(5000)
Else
 RunWait(@COMSPEC ,"с\путь.....lnk")
EndIf
Wend

вбиваем возможность запуска ярлыка или нужного элемента папки сетевых поключений, проблема в том, что я не знаю как запустить ярлык, а RunWait(@COMSPEC ,"путь\....lnk") тоже не помогает

[Iska]

но комп я гашу в спящий режим, и после его включения автозапуск само собой не срабатывает, ну и перезвон разрыва тоже.

zbruy, а что мешает там же подписаться и попутно следить за рассылаемыми сообщениями о смене режима энергопотребления?