Помогите разобраться

[theal]

Уважаемые программисты! Помогите разобраться в такой ситуации.Я вхожу в аккаунт почтовика и перехожу в раздел письма. Почему при клике в Webbrowser мышкой по ссылке открывается всё правильно , срабатывает таймер отсчёта чтения письма. А вот при клике посредством testlink.click пишется ,что такого письма у данного пользователя не обнаружено.То есть ОШИБКА. В чём тут проблема и как можно её решить? Заранее спасибо.

[Qwertiy]

Что такое testlink??

[theal]

Private Sub Command11_Click()
On Error Resume Next
For Each testlink In WebBrowser1.Document.links
If InStr(1, testlink.href, "index.php?cf=pmail-readm&uid=1034038&mid=", vbTextCompare) Then
Text5 = testlink.href
testlink.click
Exit For
End If

Next testlink

End Sub

[Qwertiy]

Я это уже видел. И выдели как код.
Давай весь проект.

PS: Хакер, может свалишь последние вопросы ala-x'а и theal'а в одну тему (ну или в 2 по авторам), а то в них уже разобраться невозможно

[theal]

Код: Выделить всё

Private Sub Command1_Click()
WebBrowser1.Document.All("wmid").Value = Text1.Text
WebBrowser1.Document.All("pass").Value = Text2.Text
WebBrowser1.Document.All("subent").Click
End Sub

Private Sub Command2_Click()
For Each TestLink In WebBrowser1.Document.links
    If InStr(1, TestLink.href, "php?action=members&where=serf", vbTextCompare) Then
    Text5 = TestLink.innerText
        TestLink.Click
        Exit For
    End If
Next TestLink
End Sub

Private Sub Command3_Click()

For Each TestLink In WebBrowser1.Document.links
    If InStr(1, TestLink.href, "go.php", vbTextCompare) Then
    Text5 = TestLink.innerText
        TestLink.Click
        Exit For
    End If
Next TestLink
End Sub

Private Sub Form_Load()
WebBrowser1.RegisterAsBrowser = True
WebBrowser1.Navigate "www.web-ip.ru"
End Sub







[Qwertiy]

Давай весь проект.

[Qwertiy]

Аналог этого можешь применить для логина: Document.GetElementsByTagName("form")[0].InvokeMember("Submit")?

[ala-x]

Выдаёт ошибку..куда его надо вставить?

[Qwertiy]

Выдаёт ошибку..куда его надо вставить?

Знаешь, сложновать ответить, куда в VB6 надо совать строчку, представляющую собой помесь VB.NET и Javascript...
Для начала, замени квадратные скобки на круглые. Потом проверь имена методов.

[ala-x]

почему в скобках ноль?мне нужна авторизация при клике.тоесть не потерять сессию,чем это поможет?

[ala-x]

Код: Выделить всё

'Загружаю сайт
Private Sub Form_Load()
WebBrowser1.RegisterAsBrowser = True
WebBrowser1.Navigate "www.web-ip.ru"
End Sub


'Здесь авторизуюсь на сайте
Private Sub Command1_Click()
WebBrowser1.Document.All("wmid").Value = Text1.Text
WebBrowser1.Document.All("pass").Value = Text2.Text
WebBrowser1.Document.All("subent").Click
End Sub

'Перехожу в меню серфинга
Private Sub Command2_Click()
For Each TestLink In WebBrowser1.Document.links
    If InStr(1, TestLink.href, "php?action=members&where=serf", vbTextCompare) Then
    Text5 = TestLink.innerText
        TestLink.Click
        Exit For
    End If
Next TestLink
End Sub

'Тут открывается меню (ссылка где кликнуть и начать)---кликаю
Private Sub Command3_Click()

For Each TestLink In WebBrowser1.Document.links
    If InStr(1, TestLink.href, "go.php", vbTextCompare) Then
    Text5 = TestLink.innerText
        TestLink.Click                               ' ----и тут ошибка(сессия потеряна)
        Exit For
    End If
Next TestLink
End Sub








[Qwertiy]

мне нужна авторизация при клике.тоесть не потерять сессию,чем это поможет?

Если твоя авторизация и так успешна, то вряд ли. Если нет, то это должно успешно выполнить авторизацию.

почему в скобках ноль?

0 - индекс единственного элемента в массиве.

[ala-x]

Посмотрите пожалуйста на код. Может где то допустил ошибку? при клике на ссылку открывается окно в webbrowser2. Если просто открывать его в новом окне(без веббраузера2) естественно меняется браузер и тоже ошибка.(сайт в webbrowser1 а ссылка в IE)

[Qwertiy]

Посмотрите пожалуйста на код. Может где то допустил ошибку? при клике на ссылку открывается окно в webbrowser2. Если просто открывать его в новом окне(без веббраузера2) естественно меняется браузер и тоже ошибка.(сайт в webbrowser1 а ссылка в IE)

Вопрос из серии "а вдруг". Document_Completed происходит до клика по кнопке?

PS: Давай всё писать в одной теме.

[ala-x]

В каком смысле? Вы считаете что сессия завершается до клика?Я не уверен,потому что первое окно по прежнему в аккаунте. И по аккаунту можно перемещаться спокойно. Все другие разделы работают нормально.

[Qwertiy]

В каком смысле? Вы считаете что сессия завершается до клика?

Нет. Что документ не успел загрузиться, поэтому чего-то не хватает.

А если вместо щелчка по кнопке щёлкать мышью по ссылке, то в обоих окнах всё нормально?

ДА! Именно так

Хотя непохоже...
А что если ссылку в том же окне открывать?

[ala-x]

тоже самое..если мышью--получается.программно---нет

[Qwertiy]

Посмотри фиддлером посылаемые запросы. В чём разница?

[ala-x]

где его взять? сниффер пойдёт?

[Qwertiy]

где его взять?

Погуглить. Первая же ссылка.

сниффер пойдёт?

Не думаю.

[ala-x]

не вижу разницу в кликах.Где именно смотреть в фиддлере?

[Qwertiy]

Запущенный Фиддлер держит локальный прокси-сервер, через который проходят запросы. Там показывается посылаемый http-запрос. Сравни запросы. Они должны чем-то отличаться, иначе бы всё работало.

PS: Если с Фиддлером всё неожиданно заработало, придётся думать отдельно...

[ala-x]

програмный клик
http://www.wmmail.ru/index.php?cf=pmail ... 3197d6079c
http://wmlink.ru/counter.php?133167;uht ... 2337046323
http://u5968.65.spylog.com/cnt?cid=5968 ... 3197d6079c


клик мышью
http://www.wmmail.ru/index.php?cf=pmail ... 3197d6079c
http://www.wmmail.ru/index.php?cf=pmail ... 3197d6079c
http://www.wmmail.ru/index.php?cf=html- ... e=fcounter
http://www.wmmail.ru/index.php?cf=pmail ... mid=114690
http://counting.kmindex.ru/1.gif?uid=42 ... 3413771195
http://www.forex4you.org/?affid=e9316a2
http://wmlink.ru/counter.php?1;uhttp%3A ... 7056953135
http://account.forex4you.org/ru/stat/?a ... ex4you.org
http://u5968.65.spylog.com/cnt?cid=5968 ... 3Dfcounter
http://www.forex4you.org/
http://www.forex4you.org/themes/org_new ... ign.css?22
http://www.forex4you.org/themes/org_new ... .cookie.js
http://www.forex4you.org/themes/org_new ... /main.js?1
http://www.forex4you.org/themes/org_new ... 4.3.min.js
http://www.forex4you.org/themes/org_new ... s/error.js
http://www.forex4you.org/themes/org_new ... /common.js

[Qwertiy]

Зачем мне эта свалка ссылок. Выбери одну, кликни программно. Затем её же (возможно, после обновления страницы) мышью. Если url окажутся разными, попробуй такие действия в другом порядке. Опера, например, однажды открыв ссылку запоминает переадресацию.

Я правильно понимаю, что url'ы разные?
Вообще-то, я ожидал различия в http-заголовках запроса (смотреть на вкладке Raw).

Запрашиваемые скритты скорее всего не важны. Смотри где content-type text/html и завершившиеся ошибкой запросы, если такие есть.

[ala-x]

дело в том что это клик по одной и тойже ссылке программно получилось что открылось - 3 а мышью - вся эта куча

[ala-x]

вот с вкладки рав
программа

Код: Выделить всё

GET /index.php?cf=pmail-readm&uid=1034038&mid=114698&rnd=1b59000b4444a95a8f451a4715b147d3 HTTP/1.1
Accept: image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/msword, application/vnd.ms-excel, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*
Accept-Language: ru
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Trident/4.0)
Connection: Keep-Alive
Host: www.wmmail.ru
Cookie: wmmailru=e577fd3a5b3cdc4e3260b0cb8d24b38e; b=b; b=b


а это мышь

Код: Выделить всё

GET http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114697&rnd=1b59000b4444a95a8f451a4715b147d3 HTTP/1.1
Accept: image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/msword, application/vnd.ms-excel, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*
Accept-Language: ru
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Trident/4.0)
Connection: Keep-Alive
Host: www.wmmail.ru
Cookie: wmmailru=e577fd3a5b3cdc4e3260b0cb8d24b38e; b=b; b=b



[Qwertiy]

Url. Обращение от мыши идёт на полный адрес, а твоё на адрес относительно корня. Измени свойство href ссылки перед кликом, посмотрим что будет.
Куки одинаковые, referer в обоих случаях отсутствует.

[ala-x]

прога

Код: Выделить всё

GET http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114708&rnd=215528b7453ff71cccf863d9aff4952e HTTP/1.1
Accept: image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/msword, application/vnd.ms-excel, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*
Accept-Language: ru
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Trident/4.0)
Connection: Keep-Alive
Host: www.wmmail.ru
Cookie: wmmailru=e577fd3a5b3cdc4e3260b0cb8d24b38e; b=b; b=b



мышь

Код: Выделить всё

GET http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114708&rnd=215528b7453ff71cccf863d9aff4952e HTTP/1.1
Accept: image/gif, image/jpeg, image/pjpeg, image/pjpeg, application/x-shockwave-flash, application/msword, application/vnd.ms-excel, application/x-ms-application, application/x-ms-xbap, application/vnd.ms-xpsdocument, application/xaml+xml, */*
Accept-Language: ru
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Trident/4.0)
Connection: Keep-Alive
Host: www.wmmail.ru
Cookie: wmmailru=e577fd3a5b3cdc4e3260b0cb8d24b38e; b=b; b=b



и опять та же ошибка

[Qwertiy]

Если сначала открыть мышью, а потом программно, то что-то меняется?

[ala-x]

я тут заметил что грузится какая то картинка вот клик проги

Код: Выделить всё

GET http://www.wmmail.ru/bn/02/97/08.png HTTP/1.1
Accept: */*
Referer: http://www.wmmail.ru/index.php?cf=mail-readpmail&mid=114707
Accept-Language: ru
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Trident/4.0)
Host: www.wmmail.ru
Connection: Keep-Alive
Cookie: wmmailru=e577fd3a5b3cdc4e3260b0cb8d24b38e; b=b; b=b


а это мышь

Код: Выделить всё

[code]GET http://www.wmmail.ru/bn/01/94/15.gif HTTP/1.1
Accept: */*
Referer: http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114708&rnd=215528b7453ff71cccf863d9aff4952e
Accept-Language: ru
Accept-Encoding: gzip, deflate
User-Agent: Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; Trident/4.0)
Host: www.wmmail.ru
Connection: Keep-Alive
Cookie: wmmailru=e577fd3a5b3cdc4e3260b0cb8d24b38e; b=b; b=b

[/code]