|
server
newsgroups
|
|||||||||||||||||||||||
|
|||||||||||||||||||||||
enforce SSL 3.0, remove SSL 2.0 on Internet explorer
i wrote this script to change the settings on all client to force connection to use only SSL 3.0. I am testing it on my PC, but the result was a failure. could some one have a look of the script and let me know? thanks! ----------------start---------------------- Dim objShell, RegLocate, RegLocate1 Set objShell = WScript.CreateObject("WScript.Shell") On Error Resume Next RegLocate = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\SecureProtocols" objShell.RegWrite RegLocate,"A0","REG_DWORD" WScript.Quit -------end--------------- any comments ?
any one home ? Show quote "Leezy" <le***@mcsb.com> wrote in message news:OVHPMiaLIHA.536@TK2MSFTNGP06.phx.gbl... > Hi Guys, > > i wrote this script to change the settings on all client to force > connection to use only SSL 3.0. > I am testing it on my PC, but the result was a failure. > > could some one have a look of the script and let me know? > > thanks! > ----------------start---------------------- > > Dim objShell, RegLocate, RegLocate1 > Set objShell = WScript.CreateObject("WScript.Shell") > On Error Resume Next > RegLocate = > "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet > Settings\SecureProtocols" > > objShell.RegWrite RegLocate,"A0","REG_DWORD" > > WScript.Quit > > > -------end--------------- > > "Leezy" <le***@mcsb.com> wrote in message There can be any number of valid reasons why nobody chose to respond, so news:udRxBhMMIHA.1168@TK2MSFTNGP02.phx.gbl... > any comments ? > any one home ? watch the attitude... > "Leezy" <le***@mcsb.com> wrote in message Did the script throw an error message, or did the registry change just not > news:OVHPMiaLIHA.536@TK2MSFTNGP06.phx.gbl... >> Hi Guys, >> >> i wrote this script to change the settings on all client to force >> connection to use only SSL 3.0. >> I am testing it on my PC, but the result was a failure. have the effect you were expecting? If there was an error message, what did it say? if there was no error message, was the value set in the registry? Is this registry setting perhaps one that needs to be there when the user logs on (i.e. it might work next time)? Have you been successful in making this change manually? /Al Show quote >> >> could some one have a look of the script and let me know? >> >> thanks! >> ----------------start---------------------- >> >> Dim objShell, RegLocate, RegLocate1 >> Set objShell = WScript.CreateObject("WScript.Shell") >> On Error Resume Next >> RegLocate = >> "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet >> Settings\SecureProtocols" >> >> objShell.RegWrite RegLocate,"A0","REG_DWORD" >> >> WScript.Quit >> >> >> -------end--------------- >> >> > > |
|||||||||||||||||||||||