|
#1
|
|||
|
|||
Парсинг
Код:
var Data:TStringList; Request:String; HTTP:TIdHTTP; begin idhttp1.CookieManager:=idcookiemanager1; Data:=TStringList.Create; HTTP:=TIdHTTP.Create(nil); Data.Add('username=WonderfulMonster'); Data.Add('question=Привет'); Data.Add('dcf404769d5ce2a=29b4c9d667e4400c8c65262283f195c7'); Data.Add('anonimous=checked'); data.Add('capctha='); try Request:=HTTP.Post('http://sprashivai.ru/questions/ask',Data); if Pos('ok',Request)<>0 then begin ShowMessage('ок'); end else begin ShowMessage('нет'); end; finally Data.Free; Request:=''; HTTP.Free; end; Код:
Data.Add('dcf404769d5ce2a=29b4c9d667e4400c8c65262283f195c7'); Ставь спасибо за спасибо! Помог?Ставь спасибо!Увидел пост? Поставь спасибо! |