помогите нажать кнопку пож-та

Внимание, важное сообщение: Дорогие Друзья!
В ноябре далекого 2001 года мы решили создать сайт и форум, которые смогут помочь как начинающим, так и продвинутым пользователям разобраться в операционных системах. В 2004-2006г наш проект был одним из самых крупных ИТ ресурсов в рунете, на пике нас посещало более 300 000 человек в день! Наша документация по службам Windows и автоматической установке помогла огромному количеству пользователей и сисадминов. Мы с уверенностью можем сказать, что внесли большой вклад в развитие ИТ сообщества рунета.

Но... время меняются, приоритеты тоже. И, к сожалению, пришло время сказать До встречи! После долгих дискуссий было принято решение закрыть наш проект. 1 августа форум переводится в режим Только чтение, а в начале сентября мы переведем рубильник в положение Выключен

Огромное спасибо за эти 24 года, это было незабываемое приключение. Сказать спасибо и поделиться своей историей можно в данной теме.

С уважением, ваш призрачный админ, BigMac...

помогите нажать кнопку пож-та

raeltor

Новый участник

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

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

не могу совладать с кнопкой СКАЧАТЬ этого сайта - у кого достаточно опыта помогите одолеть сию хрень! тока не качайте оттуда ничего

http://disk-space.ru/download/3a7d17...etok.txt.html/

Отправлено: 09:43, 24-04-2018

Creat0R

Must AutoIt

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

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

Код:

#include <IE.au3>

$oIE = _IECreate('http://disk-space.ru/download/3a7d173676/cvetok.txt.html/', 1, 0)
$oForm = _IEGetObjById($oIE, 'downld_form')
_IEFormSubmit($oForm)
$sUrl = _IEBodyReadText($oIE)
_IEQuit($oIE)

$sFile = @DesktopDir & '\myfile.zip'

InetGet($sUrl, $sFile)
MsgBox(0, @ScriptName, 'Download completed!' & @CRLF & @CRLF & $sFile)

Этот код скачивает файл на рабочий стол.
Чтобы видеть процесс (окошко IE), нужно заменить 0 на 1 в последнем параметре функции _IECreate.

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

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

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

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community

Это сообщение посчитали полезным следующие участники:

Iska

Отправлено: 16:28, 26-08-2018 | #2