РЕБЯТА! Кто сможет дописать, или исправить макрос? Помогите чайнику.
SET !ERRORIGNORE YES URL GOTO=http://mine-minerals.com/ TAG POS=1 TYPE=INPUT:EMAIL FORM=NAME:NoFormName ATTR=ID:username CONTENT=[email]SET !ENCRYPTION NO TAG POS=1 TYPE=INPUT:PASSWORD FORM=NAME:NoFormName ATTR=ID:password CONTENT=пароль ONDOWNLOAD FOLDER={{!FOLDER_DATASOURCE}} FILE=captcha.png WAIT=YES TAG POS=1 TYPE=IMG ATTR=SRC:"http://mine-minerals.com/login.php?rnd=*" CONTENT=EVENT:EVENT:SAVEPICTUREAS
картинку сохраняет, но не ту которая в этот момент загружена, а при команде
TAG POS=1 TYPE=IMG ATTR=SRC:"http://mine-minerals.com/login.php?rnd=*" CONTENT=EVENT:SAVE_ELEMENT_SCREENSHOT
распознаёт с ошибками (ни один скрин не распознала верно).
Ну и дальше
TAB OPEN TAB T=2 URL GOTO=https://www.newocr.com/ TAG POS=1 TYPE=INPUT:FILE FORM=ID:form ATTR=ID:userfile CONTENT=C:\Users\мамуся\Documents\iMacros\Datasources\captcha.png TAG POS=1 TYPE=BUTTON FORM=ID:form ATTR=ID:preview TAG POS=1 TYPE=BUTTON FORM=ID:form-ocr ATTR=ID:ocr TAG POS=1 TYPE=BUTTON FORM=ID:form-ocr ATTR=ID:Copy<SP>to<SP>Clipboard TAB CLOSE TAB T=1 TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:NoFormName ATTR=NAME:login_captcha CONTENT={{!CLIPBOARD}} TAG POS=1 TYPE=BUTTON FORM=NAME:NoFormName ATTR=TXT:Войти
не вставляет скопированное значение в нужное поле
Отсутствует
boroda7455
var t0='SET !TIMEOUT_STEP 0\n', t3='SET !TIMEOUT 30\n'; var UserName='Твой емейл'; var UserPass='Твой пасс'; for(;;){ iimPlayCode('CLEAR\nTAB CLOSEALLOTHERS\nSET !TIMEOUT 30\nURL GOTO=mine-minerals.com'); if(iimPlayCode(t0+'TAG POS=1 TYPE=H1 ATTR=TXT:Авторизация')>0){ iimPlayCode(t0+'TAG POS=1 TYPE=INPUT:EMAIL FORM=NAME:NoFormName ATTR=ID:username CONTENT='+UserName); iimPlayCode(t0+'TAG POS=1 TYPE=INPUT:PASSWORD FORM=NAME:NoFormName ATTR=ID:password CONTENT='+UserPass); iimPlayCode(t3+'ONDOWNLOAD FOLDER=C:\\ FILE=cap.png WAIT=YES\nTAG POS=1 TYPE=IMG ATTR=SRC:*mine-minerals.com/login.php?rnd* CONTENT=EVENT:SAVE_ELEMENT_SCREENSHOT'); weit(3); iimPlayCode('TAB OPEN\nTAB T=2'); iimDisplay('OCR'); iimPlayCode(t3+'URL GOTO=newocr.com'); if(iimPlayCode(t0+'TAG POS=1 TYPE=H3 ATTR=TXT:About')>0){ iimPlayCode(t3+'TAG POS=1 TYPE=INPUT:FILE FORM=ID:form ATTR=ID:userfile CONTENT=C:\\cap.png'); iimPlayCode(t3+'TAG POS=1 TYPE=BUTTON FORM=ID:form ATTR=ID:preview');weit(1); iimPlayCode(t0+'TAG POS=1 TYPE=A ATTR=CLASS:search-choice-close&&DATA-OPTION-ARRAY-INDEX:78'); iimPlayCode(t3+'TAG POS=1 TYPE=BUTTON FORM=ID:form-ocr ATTR=ID:ocr');weit(1); iimPlayCode(t0+'TAG POS=1 TYPE=textarea ATTR=id:ocr-result extract=txt'); txt=iimGetExtract(); txt=txt.replace(/http\:\/\/www\.newocr\.com\//gi,"");} iimPlayCode('TAB CLOSE'); txt=txt.match(/\d+/g).join(); iimPlayCode(t0+'TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:NoFormName ATTR=NAME:login_captcha CONTENT='+txt); iimPlayCode(t3+'TAG POS=1 TYPE=BUTTON FORM=NAME:NoFormName ATTR=TXT:Войти');} if(iimPlayCode(t0+'TAG POS=1 TYPE=H1 ATTR=TXT:Мой*профиль')>0){ for(w=0; w<=99; w++){ iimPlayCode(t3+'URL GOTO=mine-minerals.com/account/newbonus'); iimPlayCode(t3+'TAG POS=1 TYPE=INPUT:SUBMIT FORM=NAME:NoFormName ATTR=NAME:bonus'); iimPlayCode(t3+'TAG POS=1 TYPE=INPUT:SUBMIT FORM=NAME:NoFormName ATTR=NAME:bonus_2'); iimPlayCode(t3+'TAG POS=1 TYPE=INPUT:SUBMIT FORM=NAME:NoFormName ATTR=NAME:bonus_3');weit(60);}}} /***-= Ожидание =-***/ function weit(s){iimDisplay('Ждем '+s+' секунд');iimPlayCode('WAIT SECONDS='+s);}
InfSub
Отредактировано PRESIDENT (06-02-2016 18:51:50)
Backend developer
PHP, JAVA, C#, Python
В личку только с серьёзными предложениями по заказу скриптов/программ.
Отсутствует
PRESIDENT
Большущее спасибо!!!!
SyntaxError: missing ) after condition, line NaN (Error code: -991)
Отсутствует
SyntaxError: missing ) after condition, line NaN (Error code: -991)
Ошибка синтаксиса.
Пятая строка снизу, исправь
iimPlayCode(t3+'TAG POS=1 TYPE=BUTTON FORM=NAME:NoFormName ATTR=TXT:Войти');} if(iimPlayCode(t0+'TAG POS=1 TYPE=H1 ATTR=TXT:Мой*профиль')>0){
Backend developer
PHP, JAVA, C#, Python
В личку только с серьёзными предложениями по заказу скриптов/программ.
Отсутствует