VBScript object required

Question

Option Explicit 
Dim output, ProxyEnable, ProxyServer, wshShell, doc

Sub Window_onLoad
    loadProxySettings()
End Sub 

Set wshShell = CreateObject("WScript.Shell")
ProxyEnable = wshShell.RegRead("HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyEnable")
ProxyServer = wshShell.RegRead("HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\ProxyServer")

Function loadProxySettings()
    If ProxyEnable = 1 Then
        proxyStatus.className = "enabled"
        proxyStatus.innerHTML = "Proxy aktiv"

        toggleProxyButton.value = "Proxy deaktivieren"

        proxyServer.value = ProxyServer
    Else
        proxyStatus.className = "disabled"
        proxyStatus.innerHTML = "Proxy deaktiviert"

        toggleProxyButton.value = "Proxy aktivieren"

        proxyServer.value = ProxyServer
    End If 
End Function

Just can't find the problem why this is giving me the error:

Object required "ProxyStatus"

(and yes I have a span element with the id of proxyStatus)

Set doc = document seems to be setting doc equal to something which is uninitialized. — John Coleman
hmm tried it too, but still the same.. thats why i am so irritated..hmm thanks tho — Steve
The variable document is still not initialized in your code. Where do you expect its content to come from? Is this perhaps used in an ASP or HTA? — Ansgar Wiechers

user692942 user692942 · Accepted Answer · 2016-02-25T23:02:35

Go back to this code

Set ProxyStatus = document.getElementById("proxyStatus")
Set ToggleProxyButton = document.getElementById("toggleProxy")
Set ProxyServerInput = document.getElementById("proxyServer")

The only mistake here as long as the HTML is correctly formed is the use of Set when you are just referencing existing objects in the DOM. Try removing the Set from these lines like this;

ProxyStatus = document.getElementById("proxyStatus")
ToggleProxyButton = document.getElementById("toggleProxy")
ProxyServerInput = document.getElementById("proxyServer")

VBScript object required

2 Answers