Вытащить ссылку...

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by AquaKlaster, 15 Aug 2009.

  1. AquaKlaster

    AquaKlaster Active Member

    Joined:
    9 Mar 2009
    Messages:
    0
    Likes Received:
    204
    Reputations:
    23
    Нужна помощь в создании программы которая будет вытаскивать прямую ссылку с 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, но если так и есть то как его вклчить подключить???
    Зарание спасибо!
     
    21 people like this.
  2. ex3me

    ex3me Member

    Joined:
    7 Jan 2009
    Messages:
    0
    Likes Received:
    63
    Reputations:
    0
    Приведи полный исходник, ибо делать с нуля не особо хочется, а иначе - хз как тебе помочь )
     
    3 people like this.
  3. AquaKlaster

    AquaKlaster Active Member

    Joined:
    9 Mar 2009
    Messages:
    0
    Likes Received:
    204
    Reputations:
    23
    ex3me, написал те в асю...
     
    6 people like this.
Loading...