отправляет только валидные данные на гейт какбэ педоклассники не очень актуальные, но может кому пригодится. архив 81,8 КБ http://depositfiles.com/files/8kpj4eb8w http://letitbit.net/download/35828.357546bebb3f0ea6940538130/BOAgent.zip.html билдер - 85,5 КБ готовый фейк - 67,0 КБ
без исходников. отправляет запросы только педоклассникам и вашему хосту. была трабла с кодировкой в чекбоксе на Win7, ссылки в первом посте обновлены.
а почему Фейк? у меня короче не заводитса прога, Wrong protocol or connection state for the requested transaction or request. я типа такую хочу написать в делфи, но у меня с post параметрами не получается, ктонить разберается?
походу всё наламывал палёный контрол винсока. ссылки в первом посте обновлены. попробуйте кто-нибудь. суть не столько в этом фейке, сколько в работоспособности контрола.
параметры передаю через idhttp в Делфи вот так: procedure TForm1.Button3Click(Sender: TObject); var lStream : TStream; postdata : tstrings; begin postdata := tstringlist.Create; postdata.Add('action=requestConv'); postdata.Add('friendId='+contacts.Cells[8,1]); //сдесь таблица где стоят ID Друзей postdata.Add('refId=msg_list_3_116'); //этот msg_list ещё не знаю как добыть, тут вот в ручную задаю http1.Request.Accept := '*/*'; http1.Request.AcceptEncoding := 'gzip, deflate'; http1.Request.AcceptLanguage := 'de-DE'; http1.Request.CacheControl := 'no-cache'; http1.Request.Connection := 'Keep-Alive'; http1.Request.ContentLength := 86; http1.Request.ContentType := 'application/x-www-form-urlencoded'; idcookiemanager1.AddCookie2('ar_cookie_accept=1',host); //host это который меняется всегда в wg186.odnoklassniki.ru idcookiemanager1.AddCookie2('BANNER_LANG=ru',host); idcookiemanager1.AddCookie2('debugModeEnabled=false',host); idcookiemanager1.AddCookie2('JSESSIONID='+sessionid,host); //JSESSIONID выводится с главной странице idcookiemanager1.AddCookie2('test_cookie=test_cookie',host); http1.Request.Host := host; http1.Request.Referer := referer; //referer выводится с главной странице http1.Request.UserAgent := 'Mozilla/4.0 (compatible; MSIE 8.0; Windows NT 6.0; ' + 'Trident/4.0; MRA 5.6 (build 03402); SLCC1; .NET CLR 2.0.50727; ' + 'Media Center PC 5.0; .NET CLR 1.1.4322; .NET CLR 3.5.21022; ' + '.NET CLR 3.5.30729; .NET CLR 3.0.30729; InfoPath.2; ' + 'OfficeLiveConnector.1.5; OfficeLivePatch.1.3; .NET4.0C)'; Memo1.Lines.Add( http1.Post(host+'/dk?cmd=ToolbarIconConversation&gwt.requested='+ gwthash + '&st.cmd=userMain',postdata)); //gwthash выводится с главной странице end; но не приходит в Мемо правильный Content, через HttpWatch в IE показывает правильный. Что делаю не так?
