Отправляет email-рассылки с помощью сервиса Sendsay

RFpro.ru: Программирование на Java / JavaScript

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Раскрутка и оптимизация сайта в Интернете" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Ноябрь 2007   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Автор
Калашников О.А.

Статистика

3.537 подписчиков
0 за неделю
←   Все выпуски   →

RusFAQ.ru: Программирование на Java / JavaScript


Новое направление Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг

Народное голосование ПРЕМИИ РУНЕТА-2007!
Голосуем за RusFAQ.ru >>

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Java/JavaScript

Выпуск № 457
от 06.11.2007, 15:35

Администратор:Калашников О.А.
В рассылке:Подписчиков: 356, Экспертов: 25
В номере:Вопросов: 1, Ответов: 1

Вопрос № 107584: На каком языке реализовать эту задумку??? Если есть возможность помогите подсказкой! Вопрос вот в чем, как (лучше/легче/быстрее/удобнее) создать скрипт, который бы заходил на страничку (http://otvet.mail.ru/), заходил по паролю и логину,...

Вопрос № 107.584
На каком языке реализовать эту задумку???

Если есть возможность помогите подсказкой!
Вопрос вот в чем, как (лучше/легче/быстрее/удобнее) создать скрипт, который бы заходил на страничку (http://otvet.mail.ru/), заходил по паролю и логину, находил там некий элемент и кликал по
нему мышкой и т.д.? По идее он не должен быть сложным.

Нужна помощь в части того в какой среде писать такой скрипт? На
каком языке писать и как отлаживать? Ничего не знаю, но очень хочу
попробовать! Готов читать и изучать новый материал или язык
программирования, только покажите в каком направлении двигаться.
Отправлен: 31.10.2007, 22:57
Вопрос задал: Алекс Гулис (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 2)
Отвечает: HookEst
Здравствуйте, Алекс Гулис!
Пробовал в HTML Application загружать страницу в FRAME, но чего-то mail.ru не хочет авторизовывать в фрейме. Предлагаю вариант с использованием контрола WebBrowser. Сам код писал на Basic. Достаточно простой язык для таких вещей. можно все делать в Excele, специально тестировал код имено в нем, но конечно есть есть VB6, то можно и там. Пишу для Excel.
В новой книге заходим в редактор VBA
создаем форму
на нее ложим label
и WebBrowser(если на Toolbox его нет, правой кнопкой мыши на Toolbox, потом в Additional Control нужно поставить галочку напротив "Обозреватель веб страниц(Microsoft)", на Toolbox должен появиться значок земного шара)
в модуль формы пишем:

Option Explicit

Const LOGIN = "ВашЛогин"
Const PWD = "ВашПароль"
Const DOMAIN = "ВашДомен(например:mail.ru)"
Private Sub UserForm_Initialize()
Label1.Caption = "Connecting..."
WebBrowser1.Navigate "http://swa.mail.ru/cgi-bin/auth?Page=http%3A%2F%2Fotvet.mail.ru%2Fdoit%3Faction%3Ddologin%26url%3Dhttp%253A%252F%252Fotvet.mail.ru%252F&" & _
"Login=" & LOGIN & "&" & _
"Domain=" & DOMAIN & "&" & _
"Password=" & PWD
StartTimer
End Sub

Sub getRate()
If WebBrowser1.Document Is Nothing Then Exit Sub
If WebBrowser1.Document.links Is Nothing Then Exit Sub
If WebBrowser1.Document.links.Length > 24 Then
StopTimer
MsgBox "Your Rate is " & Replace(WebBrowser1.Document.links.Item(23).innerHTML, " ", " ")
WebBrowser1.Document.links.Item(23).Click
Exit Sub
End If
End Sub

потом создаем обычный модуль, в него пишем:

Option Explicit

Declare Function SetTimer Lib "user32" _
(ByVal hwnd As Long, _
ByVal nIDEvent As Long, _
ByVal uElapse As Long, _
ByVal lpTimerFunc As Long) As Long

Declare Function KillTimer Lib "user32" _
(ByVal hwnd As Long, _
ByVal nIDEvent As Long) As Long

Private tmID As Long
Private Elapsed As Long
Sub TimerProc(ByVal hwnd As Long, _
ByVal uMsg As Long, _
ByVal idEvent As Long, _
ByVal dwTime As Long)
Elapsed = Elapsed + 1
UserForm1.Label1.Caption = "Time elapsed " & Elapsed
UserForm1.getRate
End Sub

Sub StartTimer()
tmID = SetTimer(0, 0, 1000, AddressOf TimerProc)
If tmID = 0 Then
MsgBox "SetTimer Failed!", vbCritical
Exit Sub
End If
End Sub

Sub StopTimer()
KillTimer 0, tmID
End Sub

делаем форму активной и жмем F5
при открытии формы, WebBrowser логинится на сайт, чтобы не ждать полной загрузки, запускается таймер и с интервалом 1 сек проверяется наличие ссылки где указан Ваш рейтинг(она 24 по счету), если эта ссылка уже загружена, выведется сообщение с Вашим рейтингом, и ссылка кликнется автоматически.
Вообщем, появятся вопросы, пишите.
Успехов.
Ответ отправил: HookEst (статус: Студент)
Ответ отправлен: 01.11.2007, 16:50

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!
Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.

© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.61.1 от 16.10.2007 		Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru
В избранное