есть код: Code: procedure TForm1.Button1Click(Sender: TObject); var s,ss:string; list:tstringlist; cook:tidcookiemanager; http:tidhttp; begin list:=tstringlist.Create; http:=tidhttp.Create(cook); cook:=tidcookiemanager.Create(http); http.AllowCookies:=true; http.HandleRedirects:=true; s:=http.Get('http://www.tiamochat.ru/'); delete(s,1,pos('index?sess=',s)+10); delete(s,pos('>',s)-1,maxint); list.Clear; list.Add('nick=sdfggrews'); ss:=http.Post('http://www.tiamochat.ru/send?sess='+s,list); showmessage(ss); delete(ss,1,pos('parent.User.init',s)); delete(ss,1,pos(',',ss)+2); delete(ss,pos(',',ss)-1,maxint); http.free; cook.free; list.free; end; Мы заходим на страницу парсим сессию, и переходим. Но по какой - то неизвестной причине я не могу получить страницу с которой мне нужно спарсить id для того, что бы отправить сообщение в чат. В чём проблема?
PHP: <html><head><title>Чат без регистрации - Tiamo Chat ღ</title> <meta name="keywords" content="чат без регистрации, чат, чаты, чат для подростков, русский чат, украинский чат, бесплатный чат, chat, лучший чат, общение, знакомства, хороший чат, супер чат, международный чат, чат августа, august4u, чат august4u, покупка чата, лучшие чаты, бесплатный сервис чатов, тиамо, тиамочат, tiamochat, просто чат, ЧАТ знайомств без реєстрації"> <meta name="description" content="Чат без регистрации приглашает всех, кому интересен виртуальный мир общения. Мы не навязываем пользователям какую-либо рекламу, как это делают многие аналогичные проекты."> <meta http-equiv="Content-Type" content="text/html; charset=windows-1251"> <link rel="Shortcut Icon" href="images/ico0053389931.gif"> </head> <script>document.write ("<frameset>[B]<frame src=/index?sess=f4f7a070>[/B]</frameset>")</script> <noscript><frameset><frame src="nojs.html"></frameset></noscript> <noframes> <body> <h1>СОЗДАТЬ СВОЙ ЧАТ / ПРОГРАММА ЧАТОВ</h1> www.august4u.net: интернет-сервисы от August'a, создать чат, сделать чат. Программное обеспечение, уникальные разработки, быстрый, простой, удобный и мощный движок чата, множество настроек и функций, полный контроль над чатом, защита от злоумышленников. <a href=http://www.august4u.net/><b>Интернет-Сервисы</b></a> <a href=http://www.august4u.net/>программа чата</a> <a href=http://www.august4u.net/>скрипт чата</a> <a href=http://www.august4u.net/>сервер хостинг чатов</a> <a href=http://www.august4u.net/>сделать чат</a> <a href=http://www.august4u.net/>создать чат</a> <a href=http://www.august4u.net/>аренда чата</a> </body> </noframes> </html> таким должен быть результат get'а? если да, то у меня таким кодом парсится все отлично. PHP: var s: string; ts: TStringStream; begin ts:=TStringStream.Create(''); idhttp1.Get('http://www.tiamochat.ru', ts); s:=ts.DataString; memo1.Text:=s; ts.Free; попробуй поменять useragent, или проверить ip с которого совершается запрос - возможно он в бане.
Всё правильно гет запрос нормально выполняется! Но гэт нужен только для того что бы спарсить сессию для пост запроса. Ответ на который я и не могу получить. Агента меня, по дефолту мозила 3.0 менял на оперу.
ну я понял. запусти снифер и посмотри что получает прога твоя. я же говорю, у меня выходит получить страницу кодом который я привел выше.
мне вот с этой странице код нужен 'http://www.tiamochat.ru/send?sess='+s, а не с главной. Видишь на странице которую ты получил и намёка на id нет. А прога нихера не получает. А браузер получает, вот и хз почему.