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

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 0:25

почему то когда клик проги --грузится пнг а когда мышь---гиф

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 0:28

ala-x писал(а):почему то когда клик проги --грузится пнг а когда мышь---гиф

Этот запрос идёт до запроса страницы или после?

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

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 0:31

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

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 0:35

ala-x писал(а):этот запрос идёт непосредственно во время совершения клика. Если кликнуть мышью страница открывается и работает нормально, клик проги ни на что не влияет.

В фиддлере запросы упорядочены. Он до запроса открываемой страницы или после?

Ещё раз спрашиваю. Если сначала кликнуть мышью, а потом программно открыть ту же ссылку, она откроется нормально?

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 0:41

после клика мышью - страница грузится...как только повторяю клик программой--опять ошибка

http://www.wmmail.ru/index.php?cf=pmail ... 1946796fa6
http://www.wmmail.ru/bn/01/30/06.jpg
http://wmlink.ru/counter.php?133167;uht ... 9783317496
http://u5968.65.spylog.com/cnt?cid=5968 ... 1946796fa6

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 0:48

Твоя картинка, обрати внимание:
Код: Выделить всё
Referer: http://www.wmmail.ru/index.php?cf=mail-readpmail&mid=114707
Referer: http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114708&rnd=215528b7453ff71cccf863d9aff4952e
Рандомное значение, насколько я понимаю.
Когда она всё-таки грузится? Варианты:
1. Основная страница. <готово>. Клик. Картинка. Запрашиваемая страница.
2. Основная страница. <готово>. Клик. Запрашиваемая страница. Картинка.
3. Основная страница. Картинка. <готово>. Клик. Запрашиваемая страница.
Последний раз редактировалось Qwertiy 09.01.2013 (Ср) 0:50, всего редактировалось 1 раз.

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 0:50

я выделил жирным порядок загрузки

Код: Выделить всё
http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114723&rnd=6b3079ff43cf4429dcb8631946796fa6
[b]http://www.wmmail.ru/bn/02/32/11.gif[/b]
http://wmlink.ru/counter.php?133167;uhttp%3A//www.wmmail.ru/index.php%3Fcf%3Dpmail-readm%26uid%3D1034038%26mid%3D114723%26rnd%3D6b3079ff43cf4429dcb8631946796fa6;0.7346368649234704
http://u5968.65.spylog.com/cnt?cid=596865&p=0&rn=0.21796402907726686&c=1&t=-180&j=Y&wh=1024x768&px=32&sl=1.3&r=&fr=0&pg=http%3A//www.wmmail.ru/index.php%3Fcf%3Dpmail-readm%26uid%3D1034038%26mid%3D114723%26rnd%3D6b3079ff43cf4429dcb8631946796fa6


сама картинка как я понимаю ---это и есть картинка ошибки.то есть она после загрузки страницы
Последний раз редактировалось ala-x 09.01.2013 (Ср) 0:56, всего редактировалось 2 раз(а).

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 0:52

Отключи отображение картинок в IE. Она по-прежнему запрашивается? Всё работает так же?

PS: Выделяй ссылки тегом code или icode, чтобы в них многоточия не показывались.

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 0:55

картинка не запрашивается, но ошибка таже

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 0:57

А можешь выделить все запросы, сохранить в zip-архив (saz) и выложить тут?
Лучше без картинок.

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 0:59

вот после отключения картинок
прога
Код: Выделить всё
GET http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114723&rnd=6b3079ff43cf4429dcb8631946796fa6 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=html-fload&page=fcounter 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, */*
Referer: http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114722&rnd=6b3079ff43cf4429dcb8631946796fa6
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


Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 1:04

Это разные запросы.

1. Очисти список фиддлера.
2. Проделай всё с отключенными картинками.
3. Выдели в фиддлере все запросы.
4. Щёлкни правой кнопкой, сохранить как, zip-архив.
5. Выложи тут saz-файл.

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 1:08

вот
Вложения
Рабочий стол.rar
(54.2 Кб) Скачиваний: 90

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 1:43

Запросы с 1 по 3 одинаковы. В 4м отличается только mid, причём на единицу. 5й и далее есть только для мыши.

Теперь ответы.
№1: Не вижу существенных различий.
№2: Есть различия в основном блоке, причём в ссылках. Не вижу ничего особо плохого.
№3: Ответ разный. Опять не вижу ничего плохого.
№4: Ответы совершенно разные и это странно.

Так новости:
По ссылке из iframe'а в 4м ответе писал(а):ОШИБКА!
Вы уже читали это письмо
Ты уверен, что вообще можно несколько раз открывать ссылки? Возможно они одноразовые и письма удаляются сразу после прочтения. Возможно ли дважды открыть одно письмо? Выложи такую же штуку для разных ссылок, если нельзя.

Те же файлы с декодированными ответами.zip
Чтобы с фиддлером не возиться, чтобы посмотреть.
(49.91 Кб) Скачиваний: 103

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 1:49

одно письмо нельзя читать дважды.но если оно недочитано--то можно

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 1:56

Тут что-то непонятное... Такое ощущение, что это надо открывать в Хроме и смотреть, что происходит.
Вообще, а джаваскриптом открывать не пробовал, в Хроме, например? Можно будет селениум присобачить, или даже просто userjs.

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 1:57

это письмо ещё не прочитано
Вложения
Рабочий стол.rar
(84.48 Кб) Скачиваний: 87

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 8:11

ala-x писал(а):это письмо ещё не прочитано

Смотри, корректный запрос идёт на http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114738&rnd=fea62a990c63015a56f78ddebc2e28dd, а программный - на http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114739&rnd=fea62a990c63015a56f78ddebc2e28dd. Посылка запросов фиддлером даёт такой же результат - запрос с mid 1034038 даёт ответ с ifraim'ом, а с другими - ответ об ошибке. Есть подозрение, что это отличие не случайно. Что-то на основной странице.

При программном запросе так всегда, похоже. Попробуй просто уменьшить это значение на 1 перед кликом.

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 20:22

а как мне выделить именно этот фрагмент?
Подскажите как можно выбрать программно определённое слово из строки текстбокса? К примеру в текстбоксе строка
search.php?search_id=egosearch мне нужно выбрать только выделенное жирными буквами и заменить на что нибудь другое , к примеру на 123. Или что бы каждое слово отображать в разных текстбоксах. Например text1 = http:// text2=bbc text3=vbstreets и т.д.

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 20:49

ala-x писал(а):а как мне выделить именно этот фрагмент?

Ну ты и вопросы задаёшь!
Код: Выделить всё
Public Sub Main()
  Dim Url As String, I As Integer, J As Integer, Id As Long
 
  Url = "http://www.wmmail.ru/index.php?cf=pmail-readm&uid=1034038&mid=114739&rnd=fea62a990c63015a56f78ddebc2e28dd"
 
  I = InStr(Url, "&mid=") + 5
  J = InStr(I, Url, "&")
  Id = Mid$(Url, I, J - I)
  ' Тут можно проверить количество знаков, но если первый нулём не бывает, то не надо
  Mid$(Url, I, J - I) = Id - 1
 
  MsgBox Url
End Sub

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 20:51

этот код можно и в кнопку вставить?

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 20:53

Ну вставь уж куда-нибудь.
Если не получается менять ссылку, то можно обрабатывать Navigate2, отменять переход и открывать нужную ссылку.

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 21:02

супер...сработало.Ты молодец.Бывают же головы на свете :)

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 21:03

А ты не знаешь как капчу распознавать программой?

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 21:19

ala-x писал(а):А ты не знаешь как капчу распознавать программой?

Сложно. Есть куча статей, можешь погуглить. Но всё равно сильно сомневаюсь в качестве при нормальной капче.

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 22:50

ошибка сценария интернет эксплорер. как избавиться?

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 23:15

ala-x писал(а):ошибка сценария интернет эксплорер. как избавиться?

Ну видимо там скрипт что-то не то делает... Можно попробовать обновить IE.
А ещё есть тихий режим. Попробой использовать его.

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 23:19

а код можно? если можно?

Qwertiy
Доктор VB наук
Доктор VB наук
 
Сообщения: 2753
Зарегистрирован: 26.06.2011 (Вс) 21:26

Сообщение Qwertiy » 09.01.2013 (Ср) 23:24

ala-x писал(а):а код можно? если можно?

Поиск по форуму по слову silent.
Один из результатов.

ala-x
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 143
Зарегистрирован: 16.05.2009 (Сб) 16:03

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

Сообщение ala-x » 09.01.2013 (Ср) 23:35

проблема в том что при установке silent = true зависает страничка.Что делать в таких случаях?

Пред.След.

Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Google-бот, SemrushBot и гости: 83

    TopList