紫
紫藤居士
Unregistered / Unconfirmed
GUEST, unregistred user!
代码:
for j:=1 To zzz do begin IdHTTP1.Request.CustomHeaders.Text:=ADOQUery1.FieldValues['cookies']; try IdHTTP1.Get(seturl); DeleteIECache; i:=i+1; Delay(500); ADOQuery1.Next; Label4.Caption:=IntToStr(i); Memo1.Lines.add(ADOQUery1.FieldValues['cookies']); except if MessageDlg('出现错误',mtConfirmation, [mbYes, mbNo], 0) = mrYes then begin Close; end; end;