Stažení souboru s neplatným certifikátem   otázka

Offtopic

Dobrý den,

potřeboval bych stáhnout stránku s prošlým certifikátem přes https, ostatní https stránky (hrrps://www.google.cz, https://pma.wedos.cz) to načte, ale u té s prošlým cert.to napíše chybu.

hledal jsem řešení na googlu a nic nenašel.. Nevíte co s tím?

Děkuji Pospyrus

nahlásit spamnahlásit spam 0 odpovědětodpovědět

Pokud jde o stránku, tu nestahujete jako soubor, ale otevíráte. Zkuste ji otevřít v MSIE - ten varuje, ale otevření dovolí.

Jde-li skutečně o stažení souboru, pak adresa není úplná. Co by na adrese mělo být ke stažení? Wedos poskytuje hosting, např. adresa https://pma.wedos.net/ je na databázový server. Jestli se snažíte stáhnout databázi, tak se nedivte, že to nejde.

nahlásit spamnahlásit spam -1 / 1 odpovědětodpovědět

No, já potřebuji stáhnout stránku jako zdrojový kód ze stránky s neplatným certifikátem... což jsem předtím asi trochu blbě napsal.

Konkrétně se snažím přes knihovnu NET přes .httpWebRequest, .httpWebResponse a u tohoto se program zasekne a vyhodi chybu. Např. u http://pma.wedos.cz to funguje, ale tam kde je prošlý certifikát ne.

nahlásit spamnahlásit spam 0 odpovědětodpovědět

Najprv ju musíte tak, či onak stiahnuť(Čo podľa Vás robí prehlidač?). A dotyčný to nechce v prehliadači, ale programovo.

nahlásit spamnahlásit spam 0 odpovědětodpovědět

Jenže pouhé stažení mi nepomůže, jelikož potřebuji pracovat i s Cookies..

Toto mi funguje:

1
2
Dim rq As HttpWebRequest = HttpWebRequest.Create("http://vbnet.cz")
Dim rs As HttpWebResponse = rq.GetResponse()

Ale:

1
2
Dim rq As HttpWebRequest = HttpWebRequest.Create("https://neco.strankasproslymcert.cz")
Dim rs As HttpWebResponse = rq.GetResponse()

Vypíše toto:

1
The underlying connection was closed: Could not establish trust relationship for the SSL/TLS secure channel.

Pospyrus

nahlásit spamnahlásit spam 0 odpovědětodpovědět

Už jsem to po hodně dlouhém hledání našel:

Stačí přidat funkci:

1
2
3
4
5
6
7
8
9
Function CertificateValidationCallBack( _
        ByVal sender As Object, _
        ByVal certificate As X509Certificate, _
        ByVal chain As X509Chain, _
        ByVal sslPolicyErrors As SslPolicyErrors _
    ) As Boolean
 
        Return True
    End Function

a

1
ServicePointManager.ServerCertificateValidationCallback = New RemoteCertificateValidationCallback(AddressOf CertificateValidationCallBack)       

Děkuji Těm, co se mi pokoušeli pomoci ;)

nahlásit spamnahlásit spam 1 / 1 odpovědětodpovědět

přihlásit pomocí externího účtu

přihlásit pomocí jména a hesla

Uživatel:
Heslo:

zapomenuté heslo

 

založit nový uživatelský účet

zaregistrujte se

 
zavřít

Nahlásit spam

Opravdu chcete tento příspěvek nahlásit pro porušování pravidel fóra?

Nahlásit Zrušit

Chyba

zavřít

feedback