Solved

Internet Explorer VBScript on Intranet

Posted on 2014-11-26
3
78 Views
Last Modified: 2014-11-26
I'm having trouble with a simple winmgts script.  I'm sure I must have a coding error, I just cannot see it.

<!DOCTYPE HTML>
<html>
<head>

  <title></title>
  <meta charset="utf-8">
  <meta name="viewport" content="width=device-width, initial-scale=1">
    <style>
.result {
    border: 2px solid;
    border-radius: 50px;
    padding-top: 25px;
    padding-right: 50px;
    padding-bottom: 25px;
    padding-left: 50px;
    width:500px;
}

    </style>
<script language="VBScript">
function foo()
dim strComputer
dim objReg

on error resume next

strComputer = "."

Set objReg = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")

If Err <> 0 Then
   foo = err.number & " " & err.description
end if

If Err = 0 Then
  foo = "ok"
Else
  foo = err.number & " " & err.description
End If

end function

</script>

<script type="text/javascript">
function myFunction() {
    document.getElementById("status").innerHTML ="Before Call to foo()";
    document.getElementById("result").innerHTML = foo();
    document.getElementById("status").innerHTML = "After Call to foo()";
}
</script>


</head>
<body onload="myFunction()">
<h3>Results should show up below</h3>
<div id="result" class="result"></div>
<hr></hr>
<br></br>
<div id="status"></div>
<p>Test 0001</p>
</body>
</html>

Open in new window


screenshotresults.jpg
0
Comment
Question by:Jeff Darling
  • 2
3 Comments
 
LVL 58

Accepted Solution

by:
Gary earned 500 total points
ID: 40467315
What version of IE?
ActiveX is disabled by default in modern versions
Goto Tools > Internet Options > Security tab
Check the settings there
0
 
LVL 12

Author Comment

by:Jeff Darling
ID: 40467334
IE 9
ActiveX is enabled
0
 
LVL 12

Author Comment

by:Jeff Darling
ID: 40467386
ok, It is definitely a security setting.  I was able to get it to work by setting the security settings to low, but I should not have to do that.

at least I know that the code is ok.  this is intended to run locally, not across the internet.

cannot do as HTA, has to be hosted on IIS...
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

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

Introduction HyperText Transfer Protocol (http://www.ietf.org/rfc/rfc2616.txt) or "HTTP" is the underpinning of internet communication.  As a teacher of web development I have heard many questions, mostly from my younger students who have come to t…
If I have to fix slow responding website my first thoughts are server side optimizations: the database may not be optimized or caching is not enabled, or things like that. We often overlook another major part of our web application: the client. We o…
Use Wufoo, an online form creation tool, to make powerful forms. Learn how to selectively show certain fields based on user input using rules to gather relevant information and data from your forms. The rules feature provides you with an opportunity…
Learn how to set-up PayPal payment integration in your Wufoo form. Allow your users to remit payment through PayPal upon completion of your online form. This is helpful for collecting membership payments, customer payments, donations, and more.

911 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

Need Help in Real-Time?

Connect with top rated Experts

20 Experts available now in Live!

Get 1:1 Help Now