VPF::нажать кнопку.WWW::Mechanize::Firefox - Форум программистов

burakov

Дата 26.3.2013, 00:58 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 554
Регистрация: 28.7.2006

Репутация: нет
Всего: нет

Добрый день

подскажите можно ли при помощи WWW::Mechanize::Firefox нажать кнопку и установить в нужное положение переключатель радиобутон.
нужно установить на яндекс маркете значение в настройках "не учитывать регионы"
вот с этой странички

http://market.yandex.ru/settings.xml

пишу вот такой код

Код


my $mech = WWW::Mechanize::Firefox->new ();
$mech->agent('Mozilla/5.0 (Windows; U; Windows NT 5.1; ru; rv:1.9.2.16) Gecko/20110319 Firefox/3.6.16');
$mech -> autoclose_tab (0);    #автоматическое закрытие вкладок (если 0 то не закрывает)


        my $url = 'http://market.yandex.ru/settings.xml';

    $mech->add_header (
        'Accept' => 'text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8',
        'Accept-Language' => 'ru-ru,ru;q=0.8,en-us;q=0.5,en;q=0.3',
        'Accept-Charset' => 'windows-1251,utf-8;q=0.7,*;q=0.7',
    );
    
    my $result = $mech->get($url);    
    if ($mech -> success ()) {
    

    
    }

в хелпе написано

$mech->click_button( name => 'go' );
$mech->click_button( input => $mybutton );

но ниче его не понял. имени у моей кнпоки нету.
и кроме того крыжик радио кнопки нужно тоже установить в "не учитывать регионы"...

подскжите пожалуйста как кликнуть.?

--------------------

Нотный архив http://libnote.ru скачать ноты бесплатно

burakov

Дата 26.3.2013, 11:22 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 554
Регистрация: 28.7.2006

Репутация: нет
Всего: нет

Друзья! не бросайте меня в трудный час ! smile

Код


    my $url = 'http://market.yandex.ru/settings.xml?from=http%3A%2F%2Fmarket.yandex.ru%2F';
    my $result = $mech->get($url);    
    if ($mech -> success ()) {
        
        $mech->click ({ xpath => './/*[@id=\'settings-form\']/table/tbody/tr[2]/td[2]/table/tbody/tr[1]/td[2]/label[2]'});
        $mech->click ({ xpath => './/*[@id=\'settings-form\']/table/tbody/tr[4]/td[2]/span/input'});
    }

вот накопал, что
$mech->click

кликает вместе с xpath нормально!. но гад. кликает только по одной кнопке и замирает.
либо радиобутон значение устанавливает, либо кнопку "сохранить параметры"
а вот так вместе как мне нужно . не хочет .

кто уже делал. ? отзовитесь. очень нужно.

спасибо.

Добавлено через 9 минут и 22 секунды
ура. выкладываю код.

Код


        $mech->click (
            {    
                xpath => './/*[@id=\'settings-form\']/table/tbody/tr[2]/td[2]/table/tbody/tr[1]/td[2]/label[2]', 
                synchronize => 0,
            }
        );
        $mech->click ({ xpath => './/*[@id=\'settings-form\']/table/tbody/tr[4]/td[2]/span/input'});

параметр синхронайзе. по умолчанию 1.

--------------------

Нотный архив http://libnote.ru скачать ноты бесплатно

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: разработка для Web \| Следующая тема »