AllowCertificatePolicy.cls 479 B

1234567891011121314
  1. USING System.Net.*.
  2. USING System.Net.ServicePointManager.*.
  3. USING System.Security.Cryptography.X509Certificates.*.
  4. CLASS AllowCertificatePolicy IMPLEMENTS ICertificatePolicy:
  5. METHOD PUBLIC LOGICAL CheckValidationResult ( INPUT poSrvPoint AS ServicePoint,
  6. INPUT poCertificate AS X509Certificate,
  7. INPUT poRequest AS WebRequest,
  8. INPUT piCertificateProblem AS INTEGER ):
  9. RETURN TRUE.
  10. END METHOD.
  11. END CLASS.