Solved

Internet Explorer VBScript on Intranet

Posted on 2014-11-26
3
80 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 AD Toolbox Looking More Like a Toybox?

Managing Active Directory can get complicated.  Often, the native tools for managing AD are just not up to the task.  The largest Active Directory installations in the world have relied on one tool to manage their day-to-day administration tasks: Hyena. Start your trial today.

Question has a verified solution.

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

Suggested Solutions

Title # Comments Views Activity
RD Web 8 113
Show Screenshot Before or After Populating Fields 11 99
have an internal merchandise site... 3 77
Apple workstations and domain 5 58
Introduction (All good things must come to an end (http://en.wikipedia.org/wiki/All_Good_Things...))The original MySQL API (http://php.net/manual/en/book.mysql.php) has gone away, deprecated by PHP in Version 5.5, and removed from PHP in all current…
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…
This video teaches users how to migrate an existing Wordpress website to a new domain.
Wufoo.com provides powerful tools for surveying targeted groups, and utilizing data from completed surveys to find trends, discover areas of demand or customer expectation, and make business decisions on products or services.

770 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