iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

knizhkin · №1

iMacros for FireFox - общие вопросы, обсуждение возможностей (Часть 1)

Правила оформления сообщений в данном топике:
Адрес сайта и страницы, на которой возникла проблема, размещается в тегах [spoiler][noindex]http://адрес_сайта/название_страницы[/noindex][/spoiler]

Для размещения кода, используйте тег "Code" внутри тега "Spoiler" - [spoiler][code]ваш код[/code][/spoiler]
или выложите на сайт «Pastebin».
При размещении объемных материалов, используйте тег "Spoiler" - [spoiler]ваш текст[/spoiler]
или выложите на сайт «Pastebin».
Размещать изображения в открытом виде. Для размещения скриншотов и других изображений, используйте тег "Spoiler" - [spoiler][img]http://ссылка_на_изображение[/img][/spoiler]
.

«Можно ответить на любой вопрос, если вопрос задан правильно.»
Платон

«Не каждый вопрос заслуживает ответа.»
Сайрус

zello · №127

sosedus пишет

Есть текстовое поле, описание товара. В начало нужно добавить одну строчку.
Я так понимаю надо извлечь текстовое поле потом добавить к нему текст и вставить его на место. У меня не получается.

правильно понимаешь

скрытый текст

Выделить код

Код:

'Для наглядности с URL  сделал 
SET !VAR1 .com
SET !VAR2 http://google
ADD !VAR2 {{!VAR1}}
URL GOTO={{!VAR2}}

Добавлено 26-01-2012 13:13:47

null28 пишет

Выдаёт ошибку SyntaxError

Пытаешься использовать Синтаксис Visual Basic Script в Джава скрипте

В том примере же указано, что это Visual Basic Script

пробуй так :

скрытый текст

Выделить код

Код:

var myObj = JSON.parse( iimGetLastExtract(1) );
alert(myObj[1]);

Отредактировано zello (26-01-2012 13:30:27)

null28 · №128

Попробовал вот так:

Выделить код

Код:

var mac;
//var JSON;
var retcode;
var s_n = "\n";
mac = "CODE:SET !REPLAYSPEED MEDIUM"+s_n;
mac += "URL GOTO=http://sitename.ru/forum/profile.php?mode=register"+s_n;
mac += "TAG POS=1 TYPE=A ATTR=TXT:Я<SP>согласен<SP>с<SP>этими<SP>условиями<SP>и<SP>мне<SP>13<SP>лет<SP>или<SP>больше"+s_n;
mac += "TAG POS=1 TYPE=INPUT:TEXT FORM=ACTION:profile.php ATTR=NAME:username CONTENT=имя"+s_n;
mac += "TAG POS=1 TYPE=INPUT:TEXT FORM=ACTION:profile.php ATTR=NAME:email CONTENT=ygjyjg@rambler.ru"+s_n;
mac += "TAG POS=1 TYPE=INPUT:PASSWORD FORM=ACTION:profile.php ATTR=NAME:new_password CONTENT=йцукен"+s_n;
mac += "TAG POS=1 TYPE=INPUT:PASSWORD FORM=ACTION:profile.php ATTR=NAME:password_confirm CONTENT=йцукен"+s_n;
mac +="TAG POS=1 TYPE=SPAN ATTR=TXT:Нап* EXTRACT=TXT"+s_n;
retcode = iimPlay(mac);
function second_passed() {
var que = mac.parse( iimGetLastExtract(1) );
alert(que[1]);
}
setTimeout(second_passed, 15000)

Не выскакивает окошко. А JSON в примере за что отвечает?

zello · №129

null28 пишет

А JSON в примере за что отвечает?

JSON (англ. JavaScript Object Notation) — текстовый формат обмена данными, основанный на JavaScript и обычно используемый именно с этим языком....
Wiki

_http://ru.wikipedia.org/wiki/JSON
_https://developer.mozilla.org/en/Using_JSON_in_Firefox

null28 · №130

Вот когда, например, делаю var que = JSON.parse("[1,2,3]"); окошко с результатом вылазит
А если пишу var que = JSON.parse(iimGetLastExtract(1)); то ничего не происхоит... Как правильно туда iimGetLastExtract(1) засунуть?

upd: В той статье кстати написано - Name change: Please use iimGetExtract instead. See API enhancements for details.
Попробовал заменить на iimGetExtract, но всё равно ничего

Отредактировано null28 (27-01-2012 22:55:37)

svliller2007 · №131

Здравствуйте, подскажите.
Мне нужно при каждым заходом на сайт менять User Agent.
Вот часть моего скрипта:

скрытый текст

Выделить код

Код:

'Sample code A

set iim1= CreateObject ("imacros")
For m = 1 to 5
    iret = iim1.iimInit()
    iret = iim1.iimPlay("macro1")
iret = iim1.iimInit ("-useragent ""AAAAAAAAAAAAAAAAAAAAAAAA"" ")

Где АААААААААА - замена User Agent. Нужно чтоб при каждым заходом вместо "ААААААААААА" вставлялся "ББББББББББББ", потом "ВВВВВВВВВВ"... с текстового файла.
Просто не знаю как вставлять текст из файла в vbs. Извините, простой макрос мне не подходит. Спасибо.

zello · №132

svliller2007 пишет

Здравствуйте, подскажите.Мне нужно при каждым заходом на сайт менять User Agent.Вот часть моего скрипта:'Sample code Aset iim1= CreateObject ("imacros")For m = 1 to 5 iret = iim1.iimInit() iret = iim1.iimPlay("macro1")iret = iim1.iimInit ("-useragent ""AAAAAAAAAAAAAAAAAAAAAAAA"" ")Где АААААААААА - замена User Agent. Нужно чтоб при каждым заходом вместо "ААААААААААА" вставлялся "ББББББББББББ", потом "ВВВВВВВВВВ"... с текстового файла.Просто не знаю как вставлять текст из файла в vbs. Извините, простой макрос мне не подходит. Спасибо.

Так не пойдет ? :

скрытый текст

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Dim objFileSystem, objInputFile, iim1
Dim strInputFile, inputData

Const OPEN_FILE_FOR_READING = 1

strOutputFile = "01.txt"

''''''''''''''''''''''''''''''''''''''''''' Файл находится в одной директории со скриптом

Set objFileSystem = CreateObject("Scripting.fileSystemObject")
Set objInputFile = objFileSystem.OpenTextFile(strOutputFile, _
OPEN_FILE_FOR_READING)

''''''''''''''''''''''''''''''''''''''''''читаeм файл в массив inputData

inputData = Split(objInputFile.ReadAll, vbNewline)
set iim1= CreateObject ("imacros")
For m = 1 to 5
iret = iim1.iimInit()
iret = iim1.iimPlay("macro1")
iret = iim1.iimInit ("-useragent " & inputData(m) & " ")

objInputFile.Close
Set objFileSystem = Nothing

WScript.Quit(0)

'формат файла 01.тхт:
'AAAAAAAAAAAAAAA
'BBBBBBBBBBBBBBB
'CCCCCCCCCCCCC
'DDDDDDDDDDDDD

Отредактировано zello (28-01-2012 18:49:30)

null28 · №133

А как всё-таки правильно в JSON.parse() поместить iimGetLastExtract() ?

svliller2007 · №134

Спасибо. Только он не меняет User agent.
Создал 01.txt возле скрипта, порядок:

скрытый текст

Выделить код

Код:

'AAAAAAAAAAAAAAA
'BBBBBBBBBBBBBBB
'CCCCCCCCCCCCC
'DDDDDDDDDDDDD

Сам скрипт:

Dim objFileSystem, objInputFile, iim1
Dim strInputFile, inputData

Const OPEN_FILE_FOR_READING = 1

strOutputFile = "01.txt"


Set objFileSystem = CreateObject("Scripting.fileSystemObject")
Set objInputFile = objFileSystem.OpenTextFile(strOutputFile, _
  OPEN_FILE_FOR_READING)

inputData = Split(objInputFile.ReadAll, vbNewline)
set iim1= CreateObject ("imacros")
For m = 1 to 5
    iret = iim1.iimInit()
    iret = iim1.iimPlay("macro1")
iret = iim1.iimInit ("-useragent " & inputData(m) & " ")

Dim MyMacroCode
MyMacroCode = "CODE:"
MyMacroCode = MyMacroCode+"CLEAR" + vbNewLine
MyMacroCode = MyMacroCode+"http://www.iopus.com/imacros/demo/v5/user-agent.htm" + vbNewLine
MyMacroCode = MyMacroCode+"WAIT SECONDS=#DOWNLOADCOMPLETE#" + vbNewLine
MyMacroCode = MyMacroCode+"WAIT SECONDS=5" + vbNewLine
MyMacroCode = MyMacroCode+"CLEAR" + vbNewLine

  
'Run the first macro
iret = iim1.iimPlay(MyMacroCode)

    iret = iim1.iimExit()
Next

Этот скрипт закрывает окно программы, открывает и начинает наново. Но Юзер агент не меняется на "АААААААААА" "ВВВВВВВВВВ"...

zello · №135

svliller2007 пишет

Спасибо. Только он не меняет User agent.
Создал 01.txt возле скрипта, порядок:
Этот скрипт закрывает окно программы, открывает и начинает наново. Но Юзер агент не меняется на "АААААААААА" "ВВВВВВВВВВ"...

К сожалению я не могу проверить iOpus у меня нет? а так не работает.....
Но этот код рабочий на 100% Дальше копать надо в сторону iim.iimInit() Наверно
Вот кусок работает :

скрытый текст

Выделить код

Код:

'Формат файла 01.тхт
'Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.1.4322) 
'Mozilla/4.0 (compatible; MSIE 7.0b; Windows NT 6.0) 
'Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.8b4) Gecko/20050908 Firefox/1.4
'Opera/8.51 (Windows NT 5.1; U; en)
'Mozilla/4.0 (compatible; MSIE 4.01; Windows CE; PPC; 240x320
'Nokia6230/2.0+(04.43)+Profile/MIDP-2.0+Configuration/CLDC-1.1+UP.Link/6.3.0.0.0
'Googlebot/2.1 (+http://www.google.com/bot.html)
'Mozilla/5.0 (compatible; Yahoo! Slurp;http://help.yahoo.com/help/us/ysearch/slurp)
'_________________________________________________________________________
Dim objFileSystem, objInputFile, iim1
Dim strInputFile, inputData, m 

Const OPEN_FILE_FOR_READING = 1

strOutputFile = "01.txt"


Set objFileSystem = CreateObject("Scripting.fileSystemObject")
Set objInputFile = objFileSystem.OpenTextFile(strOutputFile, _
  OPEN_FILE_FOR_READING)

inputData = Split(objInputFile.ReadAll, vbNewline)

For m = 1 to 5
 
WScript.Echo inputData(m)

Next

zello · №136

null28 пишет

А как всё-таки правильно в JSON.parse() поместить iimGetLastExtract() ?

Не понятно по обрывкам кода Что вы пытаетесь сделать

vov41k · №137

Как сделать так что бы при выполнении скрипта, слева не отображалась панель плагина iMacros?

zello · №138

vov41k пишет

Как сделать так что бы при выполнении скрипта, слева не отображалась панель плагина iMacros?

Нажать F8

null28 · №139

zello пишет

Не понятно по обрывкам кода Что вы пытаетесь сделать

Ну передать джаваскрипу извлечённый текст. Весь код я там выше писал:

Выделить код

Код:

var mac;
var retcode;
var s_n = "\n";
mac = "CODE:SET !REPLAYSPEED MEDIUM"+s_n;
mac += "URL GOTO=http://sitename.ru/forum/profile.php?mode=register"+s_n;
mac += "TAG POS=1 TYPE=A ATTR=TXT:Я<SP>согласен<SP>с<SP>этими<SP>условиями<SP>и<SP>мне<SP>13<SP>лет<SP>или<SP>больше"+s_n;
mac += "TAG POS=1 TYPE=INPUT:TEXT FORM=ACTION:profile.php ATTR=NAME:username CONTENT=имя"+s_n;
mac += "TAG POS=1 TYPE=INPUT:TEXT FORM=ACTION:profile.php ATTR=NAME:email CONTENT=ygjyjg@rambler.ru"+s_n;
mac += "TAG POS=1 TYPE=INPUT:PASSWORD FORM=ACTION:profile.php ATTR=NAME:new_password CONTENT=123"+s_n;
mac += "TAG POS=1 TYPE=INPUT:PASSWORD FORM=ACTION:profile.php ATTR=NAME:password_confirm CONTENT=123"+s_n;
mac +="TAG POS=1 TYPE=SPAN ATTR=TXT:Нап* EXTRACT=TXT"+s_n;
retcode = iimPlay(mac);
function second_passed() {
var que = JSON.parse(iimGetLastExtract(0));
alert(que[0]);
}
setTimeout(second_passed, 15000

Отредактировано null28 (29-01-2012 23:48:31)

zello · №140

null28 пишет

zello пишет
Не понятно по обрывкам кода Что вы пытаетесь сделать
Ну передать джаваскрипу извлечённый текст. Весь код я там выше писал:

Выделить код

Код:

var mac;
var retcode;
var s_n = "\n";
var w;
mac = "CODE:SET !EXTRACT_TEST_POPUP NO"+s_n;
mac += "URL GOTO=http://forum.mozilla-russia.org/viewtopic.php?id=18806&p=6"+s_n;
mac += "TAG POS=1 TYPE=DIV ATTR=class:incqbox EXTRACT=TXT"+s_n;
retcode = iimPlay(mac);
w = iimGetLastExtract(1);
   alert(w);

null28 · №141

Во! Наконец-то получилось! Я в самом начале даже почти так же пытался... Похоже всё дело было в строчке CODE:SET !EXTRACT_TEST_POPUP NO

zello · №142

null28 пишет

Во! Наконец-то получилось! Я в самом начале даже почти так же пытался... Похоже всё дело было в строчке CODE:SET !EXTRACT_TEST_POPUP NO

НЕТ НЕ ПРАВИЛЬНО!
!EXTRACT_TEST_POPUP NO нужен для других целей
просто забыл стереть
такой код тоже работает :

скрытый текст

var mac;
//var JSON;
var retcode;
var s_n = "\n";
var w;
var i;
//mac = "CODE:SET !EXTRACT_TEST_POPUP NO"+s_n;
mac = "CODE:URL GOTO=http://forum.mozilla-russia.org/viewtopic.php?id=18806&p=6"+s_n;
mac += "WAIT SECONDS=3"+s_n;
mac += "TAG POS=1 TYPE=DIV ATTR=class:incqbox EXTRACT=TXT"+s_n;
retcode = iimPlay(mac);
w = iimGetLastExtract(1);
alert(w);

vov41k · №143

zello пишет

vov41k пишет
Как сделать так что бы при выполнении скрипта, слева не отображалась панель плагина iMacros?
Нажать F8

Как в скрипте это прописать?

У меня просто скрипт перезагружается раз в час - и все это время панель iMacros отображается.
Нужно что бы нее не было видно.

Как в начале скрипта эмулировать нажатие на F8?

Выделить код

Код:

VERSION BUILD=7401110 RECORDER=FX
TAB T=1
URL GOTO=ССЫЛКА НА САЙТ
WAIT SECONDS=2
CLICK X=236 Y=127
WAIT SECONDS=2
CLICK X=354 Y=214
WAIT SECONDS=3600 // обновление через ЧАС
URL GOTO=imacros://run/?m=56465467.iim

Отредактировано vov41k (30-01-2012 15:34:17)

zello · №144

vov41k пишет

zello пишет
vov41k пишет
Как сделать так что бы при выполнении скрипта, слева не отображалась панель плагина iMacros?
Нажать F8
Как в скрипте это прописать?

Так не подходит ?

Выделить код

Код:

Option Explicit
Dim WshShell,macr,start,i
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
macr="CODE:"
macr=macr+"URL GOTO=http://site.com/"+vbNewLine
macr=macr+"WAIT SECONDS=2"+vbNewLine
macr=macr+"CLICK X=236 Y=127"+vbNewLine
macr=macr+"WAIT SECONDS=2"+vbNewLine
macr=macr+"CLICK X=354 Y=214"+vbNewLine
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
set WshShell=WScript.CreateObject("Wscript.Shell")
Dim wmiObj, proCollection, scrShell
Set wmiObj = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set proCollection = wmiObj.ExecQuery("Select * from Win32_Process Where Name = 'firefox.exe'")
If proCollection.Count = 0 Then
WshShell.Run "Firefox"
WScript.sleep 2000
WshShell.SendKeys "{F8}"
End If
'выполняется  1000 часов
i = 1
Do while i< 1100
If i > 1000 Then 
Exit Do
End if

start = iim1.iimInit()
start = iim1.iimPlay(macr)
'Заснул на час 
WScript.sleep 3600000  
i=i+1
Loop

зы:Firefox Должен быть не запущен

Отредактировано zello (31-01-2012 00:02:05)

caxapok2012 · №145

Ребята подскажите можно сделать так чтоб по окончании всей записи, макросы начинали воспроизводить снача автоматически, а не каждый раз нажимать кнопку ВОСПРОИЗВЕСТИ? если можно то подскажите плиз как? зарание спасибо

marat24 · №146

Ребята подскажите как настроить что имакрос выполнял двойной клик (double click). Один клик все гуд а вот с двумя не получается , может кто то сталкивался с такой ситуацией и подскажет как это можно сделать.

zello · №147

caxapok2012 пишет

Ребята подскажите можно сделать так чтоб по окончании всей записи, макросы начинали воспроизводить снача автоматически, а не каждый раз нажимать кнопку ВОСПРОИЗВЕСТИ? если можно то подскажите плиз как? зарание спасибо

кнопка" Воспр. (Цикл)"

Oron · №148

C firefox 10.0.2 несовместимо? И в обход установить никак нельзя?

Klaid · №149

Мужики, подскажите как в iMacros сделать вставку текста из файла.
Например:
... идет макрос,
дальше обращается к файлу,
вставляет из него текст в определенное поле....

Что-то типа:
VERSION BUILD=7401110 RECORDER=FX
SET !DATASOURCE file.txt
TAB T=1
TAG POS=1 TYPE=A ATTR=TXT:Написать<SP>сообщение
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:NoFormName ATTR=ID:im-textarea CONTENT={{name}}
TAG POS=1 TYPE=DIV ATTR=ID:sendMesseng

в каком формате записывать данные в file.txt чтобы они вводились в поле CONTENT={{name}}
или может сделать в файле csv, тогда как?

zello · №150

Klaid пишет

Мужики, подскажите как в iMacros сделать вставку текста из файла.
Например:
... идет макрос,
дальше обращается к файлу,
вставляет из него текст в определенное поле....
Что-то типа:
VERSION BUILD=7401110 RECORDER=FX
SET !DATASOURCE file.txt
TAB T=1
TAG POS=1 TYPE=A ATTR=TXT:Написать<SP>сообщение
TAG POS=1 TYPE=INPUT:TEXT FORM=NAME:NoFormName ATTR=ID:im-textarea CONTENT={{name}}
TAG POS=1 TYPE=DIV ATTR=ID:sendMesseng
в каком формате записывать данные в file.txt чтобы они вводились в поле CONTENT={{name}}
или может сделать в файле csv, тогда как?

Файл keys.csv
В данном примере данные записаны 1 строка 1 значеие

скрытый текст

CMDLINE !DATASOURCE keys.csv
SET !DATASOURCE_COLUMNS 1
SET !LOOP 129
SET !DATASOURCE_LINE {{!LOOP}}
SET !ERRORIGNORE YES
SET !ERRORCONTINUE YES
TAB T=1
URL GOTO=http://site.com
WAIT SECONDS=25
TAG POS=1 TYPE=TEXTAREA ATTR=* CONTENT={{!COL1}}
.....................................................

Klaid · №151

zello

zello пишет

Файл keys.csv В данном примере данные записаны 1 строка 1 значеие

на пальцах не понимаю, можно пример записи данных в файл csv?

Отредактировано Klaid (07-03-2012 00:07:00)

Полезная информация

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Код:

Код:

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Код:

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Код:

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Код:

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Код:

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Код:

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Код:

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Код:

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Код:

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Re: iMacros for Firefox - общие вопросы, обсуждение возможностей (Часть 1)

Board footer