VPF::Залогиниться на Ucoz - Форум программистов

Antony41

Дата 27.3.2010, 15:49 (ссылка)

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

Загрузка ...

Опытный

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

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

Уважаемые программисты, хочу автоматизировать процесс, подскажите пожалуйста, как можно залогиниться на ucoz? на других сайтах делаю с помощью Tidhttp а вот на ucoz как???

Код


<FORM id="frmLg549879"  method="post"  style="margin:0"  onsubmit="sendFrm549879();return false;" >  <!-- Вот тут собственно и проблема как в данной строке составить запрос? -->
                      <!-- Start форма входа :D -->
                      <DIV class="loginfm" >
 
<script type="text/javascript" >sendFrm549786=function(){var o=document.getElementById('frmLg549786');
var pos=_uGetOffset(document.getElementById('frmLg549786'));
document.body.insertBefore(document.getElementById('blk549786'),document.body.firstChild);
with(document.getElementById('blk549786')){style.top=(pos['top'])+'px'; style.left=(pos['left'])+'px';
style.width=o.offsetWidth+'px';style.height=o.offsetHeight+'px'; style.display='';innerHTML=
'<div align="left" style="padding:5px;"><div class="myWinLoad"></div></div>';}_uPostForm('frmLg549786',
{type:'POST',url:'/index/sub/'});}</SCRIPT>

<DT class="u-name" >
   <INPUT class="login"  value="Пользователь"  name="user"  onclick="if(this.value=='Пользователь')this.value=''"  onblur="if this.value=='')this.value='Пользователь'"  type="text" >
</DT>
<DT class="u-pass" >
   <INPUT class="pass"  name="password"  value="Пароль"  onclick="if(this.value=='Пароль')this.value=''"  onblur="if(this.value=='')this.value='Пароль'"  type="password" >
</DT>
    <INPUT name="sfSbm"  src="/images/login.png"  type="image" >
                  </DIV>
                      <!-- End by Alkapone -->
                      <INPUT type="hidden"  name="a"  value="2" >
                      <INPUT type="hidden"  name="ajax"  value="1" >
                      <INPUT type="hidden"  name="rnd"  value="879" >
                    </FORM>

Это сообщение отредактировал(а) Antony41 - 27.3.2010, 16:23

Демо

Дата 27.3.2010, 16:47 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

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

Цитата(Antony41 @ 27.3.2010, 15:49

)

onsubmit="sendFrm549879();return false;"

Так скрипт JS вытащи и посмотри, что происходит в этой функции.

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

Antony41

Дата 27.3.2010, 17:00 (ссылка)

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

Загрузка ...

Опытный

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

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

Происходит вот что:

Код


<script type="text/javascript" >sendFrm549879=function(){var o=$('#frmLg549879')[0],pos=_uGetOffset(o),o2=$('#blk549879')[0];document.body.insertBefore(o2,document.body.firstChild);$(o2).css({top:(pos['top'])+'px',left:(pos['left'])+'px',width:o.offsetWidth+'px',height:o.offsetHeight+'px',display:''}).html('<div align="left" style="padding:5px;"><div class="myWinLoad"></div></div>');_uPostForm('frmLg549879',{type:'POST',url:'/index/sub/',error:function() {$('#blk549879').html('<div align="left" style="padding:10px;"><div class="myWinLoadSF" title="Невозможно выполнить запрос, попробуйте позже"></div></div>');_uWnd.alert('<div class="myWinError">Невозможно выполнить запрос, попробуйте позже</div>','',{w:250,h:90,tm:3000,pad:'15px'});setTimeout("$('#blk549879').css('display','none');",'1500');}});}</SCRIPT>

Хм и как с этого составить запрос? надо что то типа такого наверное

Код


idHTTP.HandleRedirects:=True;
S:= idHTTP.get('http://my.ucoz.ru/index/sub/?login='+login+'&password='+pass);

Демо

Дата 27.3.2010, 18:45 (ссылка)

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

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1278
Регистрация: 3.11.2005

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

user=
password=
a=2
ajax=1
rnd=

Вроде как вот эти параметры нужно сформировать для передачи

Добавлено через 28 секунд
PS.
Причём методом POST

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

Antony41

Дата 30.3.2010, 18:23 (ссылка)

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

Загрузка ...

Опытный

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

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

Спасибо попробую

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