ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
   
 
 
Опции темы Поиск в этой теме Опции просмотра

Вытащить ссылку...
  #1  
Старый 15.08.2009, 13:25
Аватар для AquaKlaster
AquaKlaster
Участник форума
Регистрация: 09.03.2009
Сообщений: 178
Провел на форуме:
1605524

Репутация: 523
Отправить сообщение для AquaKlaster с помощью ICQ
По умолчанию Вытащить ссылку...

Нужна помощь в создании программы которая будет вытаскивать прямую ссылку с letitbit.net
Вот отправляю пост запрос:
PHP код:
var postresult_1:tstringlist;
begin
 post
:=tstringlist.Create;
 
result_1:=tstringlist.Create;
 
post.Add('uid='+uid5);
 
post.Add('md5crypt'+md5crypt);
 
post.Add('cap='+edit3.Text);
 
post.Add('frameset=%D1%EA%E0%F7%E0%F2%FC+%F4%E0%E9%EB.');
 
post.Add('uid2='+uid);
 
post.Add('uid5='+uid5);
 
post.Add('uid='+uid);
 
post.Add('name='+name);
 
post.Add('pin='+pin);
 
post.Add('realuid='+realuid);
 
post.Add('realname='+realname);
 
post.Add('host='+host);
 
post.Add('ssserver='+ssserver);
 
post.Add('sssize='+sssize);
 
post.Add('optiondir='+optiondir);
 
post.Add('fix=1');
 
result_1.Text:= idhttp1.Post('http://letitbit.net/download3.php'post);
 
memo1.Text:=result_1.Text;//проверка того что получили
end
в memo1 выводится такой текст:
PHP код:
 <frameset rows="70,*" frameborder="no" border="0" framespacing="0">
  <
frame src="http://letitbit.net/tmpl/tmpl_frame_top.php?link=" name="topFrame" scrolling="No" noresize="noresize" id="topFrame" title="topFrame" />
  <
frame src="http://letitbit.net/tmpl/premium_xx.php?uid=28ed8f59310a752fe61615a5e&md5cryptaHR0cDovL3IzNS5sZXRpdGJpdC5uZXQvZG93bmxvYWQ1MC8yOGVkOGY1OTMxMGE3NTJmZTYxNjE1YTVlX3dvMDlwdnFuOGVic2t3ZDAvMTAyODIxMi8xMDBsZXNzb25zUHMucmFyfDEwMjgyMTJ8MjMzNS4yOGVkOGY1OTMxMGE3NTJmZTYxNjE1YTVlfDEwMGxlc3NvbnNQcy5yYXJ8bGV0aXRiaXQubmV0fA==&cap=9128c4&frameset=1&uid2=28ed8f59310a752fe61615a5e&uid5=2ecbe65c25e9f064832d3359b6ca2934&name=Form1&pin=&realuid=&realname=&host=&ssserver=&sssize=&optiondir=&fix=1" name="mainFrame" id="mainFrame" title="mainFrame" />
</
frameset
а вот если через браузер выводится вот такой:
PHP код:
 <frameset rows="70,*" frameborder="no" border="0" framespacing="0">
  <
frame src="http://letitbit.net/tmpl/tmpl_frame_top.php?link=http://r35.letitbit.net/download50/2335.28ed8f59310a752fe61615a5e_j3ytfo8jx15lukhp/1028212/letitbit.net/100lessonsPs.rar" name="topFrame" scrolling="No" noresize="noresize" id="topFrame" title="topFrame" />
  <
frame src="http://wawname.ru/index2.html?a_aid=2&chan=13" name="mainFrame" id="mainFrame" title="mainFrame" />
</
frameset
Как зделать что бы у мя в memo выводился исходный код такойже как и в браузере, подозреваю на JavaSkript, но если так и есть то как его вклчить подключить???
Зарание спасибо!
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Взлом E-Mail и анкет Vkontakte.ru на заказ Frost26 О Работе 25 19.11.2009 22:00
Вытащить .swf geforse Болталка 26 21.07.2009 18:29
Дайте плиз ссылку на учебник! Korotnoe Болталка 3 18.07.2009 16:38
Вставить в ссылку яваскрипт SYMBiO Болталка 5 09.07.2009 00:58
возможно ли получить ссылку на дочернее окно с помощю JavaScript ? rg25 PHP, PERL, MySQL, JavaScript 0 30.01.2006 17:41



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ