Solved

How to create script to edit Intenet Explorer settings.

Posted on 2004-10-19
4
209 Views
Last Modified: 2010-04-13
Hello all,

I need to create a script to edit the Temporary Intenet Files tab : to check for newer versions stored: To every visit to this page
and also in the advanced tab select SSL3 in the security options?

Anybody done this or have a copy?

Thanks In advance
0
Comment
Question by:mo9162
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
  • 2
4 Comments
 
LVL 15

Accepted Solution

by:
Colosseo earned 500 total points
ID: 12346261
Hi there

I have created a vbs which sets the values ok on my machine so should hopefully work ok for you

You will need to save the following code in a file like updateReg.vbs and then run it

Note the SSL3 option maintains the SSL 2 and TLS 1 options on the advanced tab. If you just want SSL3 regardless  of the current settings then remove this section CInt(strSSL) + from the if statement

Any questions just ask

Cheers

Scott

  ' The location in the registry for the Temporary Internet files setting
  regTemp = "HKCU\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\SyncMode5"

  ' The location in the registry for the SSL setting
  regSSL = "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\SecureProtocols"

  ' Run the code to update the registry
  update_Registry


  Sub update_Registry()

    ' The shell will be used to manipulate the registry
    Set WSHShell = CreateObject("WScript.Shell")

    ' Update the Temporary Internet files setting to "Every visit to the page"
    WSHShell.RegWrite regTemp,"3", "REG_DWORD"
 
    ' Get the current value of the SSL options
    strSSL = WSHShell.RegRead(regSSL)
 
    ' If the value is not already SSL 3.0 Then add SSL 3.0 to the current options
    If strSSL = "0" Or strSSL = "8" Or strSSL = "128" Or strSSL = "136" Then WSHShell.RegWrite regSSL,CInt(strSSL) + 32, "REG_DWORD"

    ' Tidy up
    Set WSHShell = Nothing

  End Sub

0
 

Author Comment

by:mo9162
ID: 12346450
Thanks worked a treat. :)
0
 

Author Comment

by:mo9162
ID: 12346456
Thanks worked a treat. :)
0
 
LVL 15

Expert Comment

by:Colosseo
ID: 12346459
Your welcome, thanks for the grade

Scott
0

Featured Post

Ransomware-A Revenue Bonanza for Service Providers

Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat.  The purpose of this eBook is to educate the reader about ransomware attacks.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
P2V Windows NT/2000 SP4 3 1,832
Win 2000 Pro - RDP Connection 2008 R2 Terminal Service 4 542
HeapQueryInformation could not be located 1 923
Windows Foriegn Disk 3 141
NTFS file system has been developed by Microsoft that is widely used by Windows NT operating system and its advanced versions. It is the mostly used over FAT file system as it provides superior features like reliability, security, storage, efficienc…
In Part II of this series, I will discuss how to identify all open instances of Excel and enumerate the workbooks, spreadsheets, and named ranges within each of those instances.
Nobody understands Phishing better than an anti-spam company. That’s why we are providing Phishing Awareness Training to our customers. According to a report by Verizon, only 3% of targeted users report malicious emails to management. With compan…

749 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question