Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Вытащить ссылку... (https://forum.antichat.xyz/showthread.php?t=135118)

AquaKlaster 15.08.2009 13:25

Вытащить ссылку...
 
Нужна помощь в создании программы которая будет вытаскивать прямую ссылку с 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, но если так и есть то как его вклчить подключить???
Зарание спасибо!

ex3me 15.08.2009 15:21

Приведи полный исходник, ибо делать с нуля не особо хочется, а иначе - хз как тебе помочь )

AquaKlaster 15.08.2009 16:16

ex3me, написал те в асю...


Время: 02:45