CertIssuer (http)
De Wiki1000
(Différences entre les versions)
Ligne 7 : | Ligne 7 : | ||
Exemple: | Exemple: | ||
<source lang='delphi'> | <source lang='delphi'> | ||
+ | var | ||
+ | http : THttpClient; | ||
begin | begin | ||
+ | http := ThttpClient.Create(nil); | ||
+ | http.URL := 'https://client.badssl.com/'; | ||
+ | http.CertSerial := '2b936ce32d82ce8b01fd9a0595ac6366aa014c82'; | ||
+ | http.CertIssuer := 'C=US, S=California, L=San Francisco, O=BadSSL, CN=BadSSL Client Root Certificate Authority'; | ||
+ | http.SSL := true; | ||
+ | http.Method := hrmGet; | ||
+ | try | ||
+ | http.Execute; | ||
+ | showmessage(http.RequestInfos); | ||
+ | showmessage(http.ResponseStr); | ||
+ | showmessage(http.responseInfos); | ||
+ | except | ||
+ | showmessage(http.ErrorText); | ||
+ | showmessage(e.message); | ||
+ | end; | ||
end; | end; | ||
</source> | </source> |
Version du 20 décembre 2019 à 14:08
property CertIssuer:string;
Lecture/Ecriture
Cette propriété indique l'émetteur du certificat SSL à utiliser en cas d'authentification mutuelle.
Exemple:
var http : THttpClient; begin http := ThttpClient.Create(nil); http.URL := 'https://client.badssl.com/'; http.CertSerial := '2b936ce32d82ce8b01fd9a0595ac6366aa014c82'; http.CertIssuer := 'C=US, S=California, L=San Francisco, O=BadSSL, CN=BadSSL Client Root Certificate Authority'; http.SSL := true; http.Method := hrmGet; try http.Execute; showmessage(http.RequestInfos); showmessage(http.ResponseStr); showmessage(http.responseInfos); except showmessage(http.ErrorText); showmessage(e.message); end; end;
Voir aussi:
Whos here now: Members 0 Guests 0 Bots & Crawlers 1 |