Results 1 to 3 of 3

Thread: Proxy settings in Internet Explorer

  1. #1

    Thread Starter
    Junior Member
    Join Date
    Mar 2010
    Posts
    27

    Proxy settings in Internet Explorer

    Hello,
    not sure in what forum I would put this question.
    I want to write a VB program that can controll which settings is checked in the LAN-settings window in internet explorer, to control what proxy-server will be used. I know about the proxyenable key in the registry, deciding if the proxy-server should be used or not, and also the key that decide what proxy will be used.
    However, if I set proxyenable=0 (means to not use proxy), the setting for automatic detection is still checked in internet explorer, which means that it will still use a proxy-server. So to get around this, I must manually uncheck this. How can I do this in VB?

    /Robin

  2. #2
    Pro Grammar chris128's Avatar
    Join Date
    Jun 2007
    Location
    England
    Posts
    7,604

    Re: Proxy settings in Internet Explorer

    You would be better off posting this in the VB.NET forum really - PM a mod/admin and ask them to move it.

    As for the question - I would assume that there is a registry value relating to the automatic detection of the proxy server as well so you would just modify that registry value accordingly. Have you looked to see if there is a corresponding registry value?
    My free .NET Windows API library (Version 2.2 Released 12/06/2011)

    Blog: cjwdev.wordpress.com
    Web: www.cjwdev.co.uk


  3. #3
    Member
    Join Date
    Jan 2010
    Location
    Sydney, Australia
    Posts
    46

    Re: Proxy settings in Internet Explorer

    Here is some code from one of my older projects:
    This changes the proxy settings to use a socks proxy running on port 8080:
    Code:
    'Enable Proxy
            My.Computer.Registry.SetValue _
                    ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings", "ProxyEnable", "1", Microsoft.Win32.RegistryValueKind.DWord)
    
            'Set the proxy server
            My.Computer.Registry.SetValue _
                    ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings", "ProxyServer", "socks=localhost:8080", Microsoft.Win32.RegistryValueKind.String)
    
            'Untick "Auto detect settings" box
            My.Computer.Registry.SetValue _
                    ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Connections", "DefaultConnectionSettings", New Byte() {&H46, &H0, &H0, &H0, &H34, &H0, &H0, &H0, &H1, &H0, &H0, &H0, &H14, &H0, &H0, &H0, &H73, &H6F, &H63, &H6B, &H73, &H3D, &H6C, &H6F, &H63, &H61, &H6C, &H68, &H6F, &H73, &H74, &H3A, &H38, &H30, &H38, &H30, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H1, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H65, &H54, &H8A, &H94, &H9C, &HCA, &H1, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H4, &H0, &H0, &H0, &H17, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HFE, &H80, &H0, &H0, &H0, &H0, &H0, &H0, &HA5, &H55, &HB5, &HF5, &H8A, &H68, &H8C, &H92, &HB, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H1, &H0, &H0, &H0, &H7C, &H6A, &H87, &H3, &H8C, &H6A, &H87, &H3, &H4, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H17, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HFE, &H80, &H0, &H0, &H0, &H0, &H0, &H0, &H18, &H25, &HA, &H8E, &H85, &H95, &H4F, &H7B, &HD, &H0, &H0, &H0, &HA, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HD8, &H78, &H2B, &H0, &HA8, &H6D, &H87, &H3, &H0, &H0, &H0, &H0, &H4, &H0, &H0, &H0, &H0, &H0, &H0, &H60, &H0, &H0, &H0, &H20, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HC0, &H6, &H0, &H0, &H30, &H6A, &H87, &H3, &H5, &H0, &H0, &H0, &HD0, &H3, &H0, &H0, &H6B, &H30, &H2, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H2, &H0, &H0, &H0, &HA, &H0, &H2, &HF, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H38, &H0, &H0, &H0, &H14, &H0, &H0, &H0, &H40, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H2, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HC, &H0, &H0, &HC, &HE0, &H3C, &H9, &H0, &HB8, &HEA, &H34, &H0, &H90, &H4F, &H7F, &H3, &HA, &H0, &H0, &HA, &HE6, &H3C, &H9, &H0, &H80, &H42, &H31, &H0, &HC0, &HF5, &H2D, &H0, &H18, &H10, &H2, &HC0, &H0, &H0, &H0, &H0, &H8, &H0, &H0, &H0, &H9, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H1, &H0, &H0, &H0, &H17, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H20, &H1, &H0, &H0, &HCF, &H2E, &H30, &H96, &H18, &H25, &HA, &H8E, &H85, &H95, &H4F, &H7B, &H0, &H0, &H0, &H0, &HFF, &HFF, &HFF, &HFF, &H0, &H0, &H0, &H0, &H38, &H0, &H2E, &H0, &H39, &H0, &H1, &H38, &HFC, &H3C, &H9, &H8, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H10, &H79, &H2B, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H20, &H80, &H0, &H77, &H2C, &HA4, &HFF, &H76, &H28, &H30, &HE2, &H72, &HD9, &H6, &H0, &H0, &H1, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H40, &H0, &H0, &H0, &H1, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0}, RegistryValueKind.Binary)
    And this disables the from proxy running:
    Code:
    'Disable proxy
            My.Computer.Registry.SetValue _
                    ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings", "ProxyEnable", "0", Microsoft.Win32.RegistryValueKind.DWord)
    
            'Set proxy server to nothing
            My.Computer.Registry.SetValue _
                    ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings", "ProxyServer", "", Microsoft.Win32.RegistryValueKind.String)
    
            'Tick "auto detect settings box"
            My.Computer.Registry.SetValue _
                    ("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings\Connections", "DefaultConnectionSettings", New Byte() {&H46, &H0, &H0, &H0, &H36, &H0, &H0, &H0, &H9, &H0, &H0, &H0, &H14, &H0, &H0, &H0, &H73, &H6F, &H63, &H6B, &H73, &H3D, &H6C, &H6F, &H63, &H61, &H6C, &H68, &H6F, &H73, &H74, &H3A, &H38, &H30, &H38, &H30, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H5, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HD0, &H6F, &H72, &H36, &H95, &H9C, &HCA, &H1, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H4, &H0, &H0, &H0, &H17, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HFE, &H80, &H0, &H0, &H0, &H0, &H0, &H0, &HA5, &H55, &HB5, &HF5, &H8A, &H68, &H8C, &H92, &HB, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H1, &H0, &H0, &H0, &H7C, &H6A, &H87, &H3, &H8C, &H6A, &H87, &H3, &H4, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H17, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HFE, &H80, &H0, &H0, &H0, &H0, &H0, &H0, &H18, &H25, &HA, &H8E, &H85, &H95, &H4F, &H7B, &HD, &H0, &H0, &H0, &HA, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HD8, &H78, &H2B, &H0, &HA8, &H6D, &H87, &H3, &H0, &H0, &H0, &H0, &H4, &H0, &H0, &H0, &H0, &H0, &H0, &H60, &H0, &H0, &H0, &H20, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HC0, &H6, &H0, &H0, &H30, &H6A, &H87, &H3, &H5, &H0, &H0, &H0, &HD0, &H3, &H0, &H0, &H6B, &H30, &H2, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H2, &H0, &H0, &H0, &HA, &H0, &H2, &HF, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H38, &H0, &H0, &H0, &H14, &H0, &H0, &H0, &H40, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H2, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &HC, &H0, &H0, &HC, &HE0, &H3C, &H9, &H0, &HB8, &HEA, &H34, &H0, &H90, &H4F, &H7F, &H3, &HA, &H0, &H0, &HA, &HE6, &H3C, &H9, &H0, &H80, &H42, &H31, &H0, &HC0, &HF5, &H2D, &H0, &H18, &H10, &H2, &HC0, &H0, &H0, &H0, &H0, &H8, &H0, &H0, &H0, &H9, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H1, &H0, &H0, &H0, &H17, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H20, &H1, &H0, &H0, &HCF, &H2E, &H30, &H96, &H18, &H25, &HA, &H8E, &H85, &H95, &H4F, &H7B, &H0, &H0, &H0, &H0, &HFF, &HFF, &HFF, &HFF, &H0, &H0, &H0, &H0, &H38, &H0, &H2E, &H0, &H39, &H0, &H1, &H38, &HFC, &H3C, &H9, &H8, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H10, &H79, &H2B, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H20, &H80, &H0, &H77, &H2C, &HA4, &HFF, &H76, &H28, &H30, &HE2, &H72, &HD9, &H6, &H0, &H0, &H1, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H40, &H0, &H0, &H0, &H1, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0, &H0}, RegistryValueKind.Binary)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width