HTTPRIO 连接到操作系统上的 Web 服务"error : HTTP/1.1 401 Unauthorized"，同时在 Win32 中工作

Question

我有一个简单的项目，该项目使用 checkVatService.wsdl chek chek的欧洲增值税数量。

在MacOS上运行该项目时，以下错误：" error : HTTP/1.1 401 Unauthorized"。

在Win32上运行时，项目返回"有效"

procedure TForm1.ControleVat;
var
  cv  : checkVatApprox;
  cvs : checkVatApproxResponse;
  HTTPRIO1: THTTPRIO;
begin
  HTTPRIO1 := THTTPRIO.Create(nil);
  HTTPRIO1.WSDLLocation := 'checkVatservice.WSDL';
  HTTPRIO1.Service := 'checkVatService';
  HTTPRIO1.Port := 'checkVatPort';
  cvs:=nil;
  cv:=checkVatApprox.Create;
  try
    cv.countryCode := 'BE';
    cv.vatNumber   := '0000000097'; 
    try
      cvs:= ( HTTPRIO1 as checkVatPortType ).checkVatApprox(cv);
      if cvs.valid then begin
        showmessage('valid');
      end else begin
        showmessage('invalid');
      end;
    except
      on e:exception do begin
        showmessage('error : ' + e.Message);
      end;
    end;
  finally
    cv.Free;
    freeandnil(cvs);
  end;
end;

该服务不需要自动化，在Win32和OS中，用户名/密码都是空白的。

是什么导致此错误？连接有什么区别？

Answer 1

我在Android中也有同样的问题。在窗口中一切都可以；如果客户端重试IPv6 IPv4。

我建议您使用：https：//www.isvat.eu/