adsweb使用TidHTTP获取http 402

Question

使用TidHTTP访问Adsweb时，我有时需要支付http 402付款，但并非所有计算机都支付。同一个程序在一台计算机上运行正常，另一台计算机运行相同的语句会出现402错误。

CSHttp: TidHTTP;

Try
    CSHttp := TidHTTP.Create(nil);
    MyURL := MasterTbl.FieldByName('DatabaseUrl').AsString;
    MyUrl := MyUrl + '__query?statement=select%20name,accountnum%20from%20customer%20where%20accountnum=''' + Myphone + '''&$format=json'
    with CSHttp do
         begin
              Request.CacheControl := 'no-cache';
              Request.BasicAuthentication := True;
              Request.Username := MasterTbl.FieldByName('DBlogin').AsString;
              Request.Password := MasterTbl.FieldByName('DBPassword').AsString;
              Request.UserAgent := 'Mozilla/3.0 (compatible; Indy Library)';
         end;
    Try
    MyResult := CShttp.Get(MyURL);
    Except
         on E:Exception do
            Myerror := E.Message;

    End;
Finally
    CSHttp.Free;
end;

如果我重新启动ADS 11，它有时会修复它。 也许在电话中出现问题？ 谢谢， 金