#include <IE.au3>
Local $sUrl = 'http://ruforum.mt5.com/threads/14398-pipsovka.obsuzhdenie'
Local $oForm, $oQuery, $oIE = _IECreate($sUrl, 1) ; Пытаться присоединиться к существующему окну
$oForm = _IEFormGetObjByName($oIE, 'quick_reply')
If Not IsObj($oForm) Then Exit MsgBox(4096+16, 'Ошибка!', 'Форма для быстрого ответа не обнаружена.' &@CRLF& 'Зарегистрируйтесь и повторите попытку.')
$oQuery = _IEFormElementGetObjByName($oForm, 'message')
_IEFormElementSetValue($oQuery, ClipGet())
_IEFormSubmit($oForm)
(@error) ? MsgBox(4096+16, 'Ошибка!', 'Не удалось отправить форму.') : MsgBox(4096+64, 'Отчет:', 'Форма отправлена.')