>Форум Mozilla Россия
   http://forum.mozilla-russia.org/index.php
>Архив тем
   http://forum.mozilla-russia.org/viewforum.php?id=17
>Помогите с кодом Imacros парсер одноклассники Visual Basic
   http://forum.mozilla-russia.org/viewtopic.php?id=70879

nikita1989 > 11-11-2016 16:16:18

Добрый день! Устал искать в гугле. Может тут кто разбирается .
В общем суть такая пишу парсер для сайта одноклассники мобильная версия на  Visual Basic
И застрял на коде


Сейчас код все работает прекрасно, но сохраняет ссылку в ListBox1 такого типа   

скрытый текст
Войдите или зарегистрируйтесь, чтобы увидеть скрытый текст.


А мне надо чтобы в ListBox1  сохранял только айди анкеты 551089889142

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

Выделить код

Код:

iret = iim1.iimPlayCode("TAG POS={{wer}} TYPE=a ATTR=class:clickarea EXTRACT=HREF")

            If iim1.iimGetLastExtract(1) = "#EANF#" Then '=> ЕСЛИ условие верно, ТОГДА 
               Тут что то делаем
            Else  ЕСЛИ условие не верно, ТОГДА  сохраняем ссылку на профиль в ListBox1
                ListBox1.Items.Add(iim1.iimGetLastExtract(1))
            End If


Кто поможет маленько отблагодарю . Закину 50 р на телефон

Есть рабочий код который сохраняет  только айди анкеты ,но он только на iim

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

Выделить код

Код:

TAG POS={{!LOOP}} TYPE=A ATTR=class:clickarea EXTRACT=HREF
SET !EXTRACT EVAL("'{{!EXTRACT}}'.match(/[\d]+/).pop()")
SAVEAS TYPE=EXTRACT FOLDER=* FILE=url_anket.txt


Может знаете как его сделать для Visual Basic чтобы он сохранял айдишки в ListBox1

код публикуется в тегах code внутри спойлера
ссылки публикуются в тегах noindex внутри спойлера

InfSub

EverythingForYou > 11-11-2016 16:21:05

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

Выделить код

Код:

iimGetLastExtract(1).match(/\d+/);


код публикуется в тегах code внутри спойлера

InfSub

nikita1989 > 11-11-2016 16:28:56

EverythingForYou
Сделал я так

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

Выделить код

Код:

ListBox1.Items.Add(iim1.iimGetLastExtract(1).match(/\d+/);)


Но просит для /  какое выражение (((((

код публикуется в тегах code внутри спойлера

InfSub

EverythingForYou > 11-11-2016 17:00:54

уберите этот знак ';'

nikita1989 > 11-11-2016 17:06:44
EverythingForYou пишет

уберите этот знак ';'

Все такая же проблема
удалено, читаем правила размещения скриншотов на форуме
замечание

InfSub

InfSub > 12-11-2016 00:09:34

nikita1989, EverythingForYou
вы божий дар, с яичницей-то не путайте... в VB, регулярные выражения, записываются иначе чем js, о чем вам парсер и сообщает

nikita1989 > 12-11-2016 13:12:01

InfSub
А вы такое выражение можете подсказать?

InfSub > 12-11-2016 21:15:56

nikita1989
Гугл по "virtual basic регулярные выражения"

InfSub > 19-02-2017 12:19:58

Тема перенесена из форума «iMacros» в форум «Архив тем».