Discussion :

[Miska59]

Bonjour,



mon problème c'est quand je telecharger un fichier zip avec webclient. j'ai une erreur de téléchargement. mon problème vient du SecurityProtocolType.tls12 dans mon PC.

je suis aller dans le registre : HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SecurityProviders\SCHANNEL\Protocols\TLS 1.3\Client et changer la valeur Enabled = 0, manuellement ça fonctionne. mais si je fait avec form1_load j'ai toujours mon erreur de téléchargement mème la valeur enabled = 0.

dans form1_load :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
If (Environment.Is64BitOperatingSystem) Then
                    rk = RegistryKey.OpenBaseKey(RegistryHive.LocalMachine, RegistryView.Registry64)
                Else
                    rk = RegistryKey.OpenBaseKey(RegistryHive.LocalMachine, RegistryView.Registry32)
                End If
                regPerm1 = New RegistryPermission(RegistryPermissionAccess.Write Or RegistryPermissionAccess.Read, "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SecurityProviders\SCHANNEL\Protocols\TLS 1.3\Client")
                regPerm1.AddPathList(RegistryPermissionAccess.Write Or RegistryPermissionAccess.Read, "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SecurityProviders\SCHANNEL\Protocols\TLS 1.3\Client")
                regPerm1.Assert()
                rk = rk.OpenSubKey("SYSTEM\CurrentControlSet\Control\SecurityProviders\SCHANNEL\Protocols\TLS 1.3\Client", True)
                If rk IsNot Nothing Then
                    rk.SetValue("Enabled", "0", RegistryValueKind.DWord)
                End If
                rk.Close()

dans form1_formclosing :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 If (Environment.Is64BitOperatingSystem) Then
            rk2 = RegistryKey.OpenBaseKey(RegistryHive.LocalMachine, RegistryView.Registry64)
        Else
            rk2 = RegistryKey.OpenBaseKey(RegistryHive.LocalMachine, RegistryView.Registry32)
        End If
        regPerm1 = New RegistryPermission(RegistryPermissionAccess.AllAccess, "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SecurityProviders\SCHANNEL\Protocols\TLS 1.3\Client")
        regPerm1.AddPathList(RegistryPermissionAccess.AllAccess, "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SecurityProviders\SCHANNEL\Protocols\TLS 1.3\Client")
        regPerm1.Assert()
        rk2 = rk2.OpenSubKey("SYSTEM\CurrentControlSet\Control\SecurityProviders\SCHANNEL\Protocols\TLS 1.3\Client", True)
        If rk2 IsNot Nothing Then
            rk2.SetValue("Enabled", "1", RegistryValueKind.DWord)
        End If
        rk2.Close()

quand je démarre mon programme en administrateur, la valeur Enabled est bien a zéro mais j'ai toujours mème erreur de téléchargement et si je le fait manuelle ça fonctionne. pourquoi avec le programme ne fonctionne pas?
Merci de votre compréhension.