Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Авторизация на сайте средствами VB / 25 сообщений из 32, страница 1 из 2
  1  все
17.01.2006, 11:03
    #33486640
avtograd
avtograd
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Добрый день!!! Очень нужна Ваша помощь. Перерыл весь форум, но ответа толком найти не смог. Помогите, кто может!

Нужно средствами VB, авторизироваться на сайте www.hockeyarena.net
Пробовал варианы
1. http://login:password@hockeyarena.net/hokej.php - выдает ошибку (т.е. не принимает пароль)
2. www.hockeyarena.net/hokej.php?1=login&p=password или
www.hockeyarena.net/public_home.php?1=login&p=password
тотже результат.
Получилось сделать только через WebBrowser, но этот вариант не подходит, нужно авторизироваться автоматически. Подскажите как быть? Или этот вопрос не решается другим методом? Прошу снисхождения ко мне, я недавно занимаюсь программированием!!!

/ не всё так просто, как казалось с первого раза /
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.01.2006, 12:27
    #33486874
shady
shady
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Код: plaintext
<td class="nice" height="60" align="center" valign="middle" style="border-top: 1 dotted black;"><form name="login" method="post" action="http://www.hockeyarena.net/security_log.php" target="main">Имя: <INPUT TYPE="text" NAME="l" SIZE="12" class="nice" id="l"> Пароль: <INPUT TYPE="password" NAME="p" SIZE="12" class="nice"> <input name="submit" type="submit" value="Зайти в Вашу команду" class="button">   <a href="http://www.hockeyarena.net/public_password_recovery_form.php"><b>Забыли свой пароль?</b></a></form></td>
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.01.2006, 14:28
    #33487266
avtograd
avtograd
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Да я на эту строчку уже 20 дней смотрю, а вот как провести авторизацию, непойму. Вижу что метод Post. переменные все понятны, но не хочет авторизацию проводить с командной строки и всё тут.
Подскажите, как в нужные поля вложить логин, пароль и активизировать кнопку если пользоваться WebBrowser? Как это сделать?

/ не всё так просто, как казалось с первого раза /
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.01.2006, 16:24
    #33487655
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
VBScript.
Если открывать основной фрейм.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
    Dim objIE
    Dim frm
    
    Set objIE = CreateObject("InternetExplorer.Application")
    
    objIE.Visible =  1 
    objIE.Navigate "http://www.hockeyarena.net/public_home.php"

    While objIE.Busy
        Wscript.Sleep  200 
    Wend

    Set frm = objIE.document.forms.login

    frm.l.Value = "abcdef"
    frm.p.Value = "123456"
    frm.submit.click
    
    Set objIE = Nothing

Если открывать основную страницу.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
    Dim objIE
    Dim frm
    Dim fra
    
    Set objIE = CreateObject("InternetExplorer.Application")
    
    objIE.Visible =  1 
    objIE.Navigate "http://www.hockeyarena.net/"

    While objIE.Busy
        Wscript.Sleep  200 
    Wend

    ' Количество в миллесекундах.
    ' Ждем пока загрузятся все фреймы.
    Wscript.Sleep  7000 

    Set frm = objIE.document.frames("main").document.forms.login

    frm.l.Value = "abcdef"
    frm.p.Value = "123456"
    frm.submit.click
    
    Set objIE = Nothing
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.01.2006, 17:48
    #33487999
avtograd
avtograd
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Огромнейшее спасибо!!! Всё работает! Только один маленький нюанс, подскажите для полного счастья.
при работе открывается IE, и до авторизации и после.
objIE.Visible = 0 - скрывает окно до авторизации, но после всё равно IE открывается. Как запретить IE открываться? Спасибо за ранее!!!

/ не всё так просто, как казалось с первого раза /
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.01.2006, 08:15
    #33488506
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Что-то не понятно. Ты хочешь залогиниться не октрывая IE? Тогда какой смысл?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.01.2006, 12:43
    #33489168
avtograd
avtograd
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
авторЧто-то не понятно. Ты хочешь залогиниться не октрывая IE? Тогда какой смысл?
Чтобы скачать оттуда нужную информацию, без авторизации не позволяет, тоесть выдает текст что необходимо авторизироваться. Вот собственно для чего. Может так можно закрыть IE.Quit ?

/ не всё так просто, как казалось с первого раза /
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.01.2006, 13:10
    #33489255
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Да можно.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
    ...
    frm.l.Value = "abcdef"
    frm.p.Value = "123456"
    frm.submit.click

    Wscript.Sleep  2000 

    objIE.Quit

    Set objIE = Nothing
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.01.2006, 13:11
    #33489256
SmeL_md
SmeL_md
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
У меня подобная проблема но не такая же :)
нужно зайти на https://www.voxtext.md/SendSMS.aspx, но там выскакивает сообщение типо все очень защищенно примите сертификат. Как это пройти на VB хочу смс от туда слать ;) через прогу.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2006, 16:48
    #33492424
Kifir
Kifir
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
А у меня написно следующее: Объект не поддерживает это свойство или метод:'document.forms.login'.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.01.2006, 17:42
    #33492618
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Kifir ты открываешь эту же страницу?

Надо ждать пока не загрузится основной фрейм. Пока он не загружен - нет коллекции forms, также как и всего остального.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.01.2006, 20:08
    #33495772
Kifir
Kifir
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Может я неправильно понял. У меня на странице вообще нет фреймов, а только имеется 2 текстбокса куда надо ввести имя и пароль и кнопка подтверждения.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.01.2006, 23:54
    #33495868
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Дай ссылку на страницу.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.01.2006, 13:28
    #33496054
Kifir
Kifir
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
А вот и ссылка
http://static.dts.ru
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2006, 16:13
    #33508017
Kifir
Kifir
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
ну что подскажете мне или нет как осуществить данную задумку?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
27.01.2006, 16:17
    #33508028
Пользователь2
Пользователь2
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Твоя страница не открывается.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.02.2006, 20:17
    #33539020
Arches
Arches
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Люди, я совсем новичок. Помогите мне как работать с вот этим:

<td class="nice" height="60" align="center" valign="middle" style="border-top: 1 dotted black;">
<form name="login" method="post" action="http://www.hockeyarena.net/security_log.php" target="main">
Login: <INPUT TYPE="text" NAME="l" SIZE="12" class="nice" id="l">
Password: <INPUT TYPE="password" NAME="p" SIZE="12" class="nice">
<input name="submit" type="submit" value="Go" class="button">
<a href="http://www.hockeyarena.net/public_password_recovery_form.php">
<b>Forget your Password?</b></a></form></td> .

Скажите мне, что туда нужно вставить, чтобы только при определенном логине и пароле оно переходило на нужную ссылку.

Помогите плиззззз......
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.02.2006, 11:57
    #33539395
ВasiС
ВasiС
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
2Arches
Я тоже долго копал в этом направлении. Вот что накопал:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
Sub Command1_Click()

   Dim URL As String
   Dim Flags As Long
   Dim TargetFrame As String
   Dim PostData() As Byte
   Dim Headers As String

   URL = "http://www.hockeyarena.net/security_log.php" 
   Flags =  0 
   TargetFrame = ""

   PostData = "nick=login&password=pass"
   PostData = StrConv(PostData, vbFromUnicode)
   Headers = "Content-Type: application/x-www-form-urlencoded" & vbCrLf
   
   WebBrowser.Navigate URL, Flags, TargetFrame, PostData, Headers
   
End Sub
Не забудьте кинуть на форму контрол WebBrowser. Может кому будет полезным =) Не забудьте доработать напильником!
На будущее, есть приблуда к ослику IEWatch, которая показывает что отправляется в post на сервер!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
14.02.2006, 06:30
    #33542343
Arches
Arches
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
ВasiС2Arches
Я тоже долго копал в этом направлении. Вот что накопал:

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
Sub Command1_Click()

   Dim URL As String
   Dim Flags As Long
   Dim TargetFrame As String
   Dim PostData() As Byte
   Dim Headers As String

   URL = "http://www.hockeyarena.net/security_log.php" 
   Flags =  0 
   TargetFrame = ""

   PostData = "nick=login&password=pass"
   PostData = StrConv(PostData, vbFromUnicode)
   Headers = "Content-Type: application/x-www-form-urlencoded" & vbCrLf
   
   WebBrowser.Navigate URL, Flags, TargetFrame, PostData, Headers
   
End Sub
Не забудьте кинуть на форму контрол WebBrowser. Может кому будет полезным =) Не забудьте доработать напильником!
На будущее, есть приблуда к ослику IEWatch, которая показывает что отправляется в post на сервер!


А можешь мне по-подробнее рассказать?! Это скрипт какой-то, или что? Я просто не понимаю что с этим делать... Подскажи пожалуйсто....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.03.2006, 06:42
    #33618856
Arches
Arches
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Люди хелп!!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.05.2006, 16:04
    #33710815
BOPOHA
BOPOHA
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
2 All

У меня близкая проблема. Авторизоваться на сайте (спасибо этой теме :) ) я смог. Следующий шаг - задать параметры фильтра, чтобы получить табличку и выковырять оттуда данные. Фильтр выполнен в виде формы с несколькими select-ами. Submit выполняется по кнопке, которая описана как

Код: plaintext
1.
2.
3.
4.
<form>
...
<input type = 'submit' class="ButtonStyle" value = 'Смотреть список'>
</form>

Сама форма описана просто:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
<form>
...
<select name = 'ХХХ' class="ListStyle">
        <option value = ''> YYY </option>...
 </select>
...
<select name = 'ZZZ' class="ListStyle">
        <option value = ''> KKK </option>...
 </select>

</form>

Внутри формы есть ещё загадочный input:
Код: plaintext
<input type = 'hidden' name = 'action' value = 'BpcAdminProblemFilter'>
но для чего он нужен я ещё не до конца постиг. Остальное все понятно.

Суть в том, что я смог заполнить параметры фильтра, а как вызвать Submit - не знаю. И сама форма, и кнопка "Смотреть список" не имеют поля name.
Подскажите хотя бы направление в котором думать.

Такую задачу решаю впервые, по этому мог написАть ерунду. Так что строго не судите :)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
05.05.2006, 16:46
    #33710988
BOPOHA
BOPOHA
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
Получилось!! :)

Код: plaintext
objIE.document.forms( 2 ).Submit

Не думал, что к коллекции форм можно обращаться как к массиву...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
11.10.2006, 23:00
    #34048857
MoRDa_2006
MoRDa_2006
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
а у меня вот какой вопрос, как после получения странички контролом webbrowser сделать поиск определенного слова или выражения на етой странице?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2006, 07:46
    #34049038
orunbek
orunbek
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
мда... люди хотите хороший совет по теме? учите DHTML и объектную структуру контрола WebBrowser
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
12.10.2006, 12:14
    #34049908
BOPOHA
BOPOHA
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Авторизация на сайте средствами VB
orunbekучите DHTML и объектную структуру контрола WebBrowser
Ну, не все же в мире программеры. Просто бывает, что надо что-то запрограммировать небольшое, а как - непонятно. Вот и приходится обращиться к настоящим профи ;)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
  1  все
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Авторизация на сайте средствами VB / 25 сообщений из 32, страница 1 из 2
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 577ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2158505]:
 0ms
get settings:
 7ms
get forum list:
 15ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 113ms
get topic data:
 11ms
get forum data:
 3ms
get page messages:
 66ms
get tp. blocked users:
 2ms
others: 352ms
total:  577ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]