Recent content by skar

Hi, I've wrote a simple VBscript that will write to a shared Excel spreadsheet. Im sending username, asset number, computer name and model type. I can run this on multiple machines, it will check if there is a duplicate and it will also find the next empty line to write to. This is working...

Im using InnerHTML to clear the text areas and redraw new tables. Keeping it all inside the single HTA until the final warning which is a popup. But a single window I can work with. :)

Hi All, This is for a Windows setup using AD. I'm using VBscript in a HTA to write a small app that will allow admins a quick way to view a sites DHCP server, list all the scopes and edit the DNS servers issued out. Its coming on quite well and I'm around 80% done. But I have this gut feeling...

I think the answer to this is to get the vendors to provide some sort of snapshot tools. VBscript just isnt going to do what I need it to do. To be honest I thought I was barking up the wrong tree but it's always worth a shot and asking. Someone may have already tried to do it and re-inventing...

Win32_BIOS: strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colBIOS = objWMIService.ExecQuery _ ("Select * from Win32_BIOS") For each objBIOS in colBIOS Wscript.Echo "Build Number: " &...

Just had a quick look at Win32_ComputerSystemProduct but it's really hooking into the hardware and not the BIOS. But it was worth a shot. Thanks for the info on that one. :)

I did look at using Win32_BIOS but it only brings back basic information. It wont tell me, for example, the setting for the ambiant keyboard on a Dell E6500. I'm not looking for specific information. I just want to read in all settings and their values and pump it into a CSV or some other human...

Hi all, I want to run a script on a new, out of the box machine that will read the entire BIOS and output everything into a CVS or some other format. Dont care, I can use Perl to fudge it into another format. I can get a bootable USB key with WinPE running but it's the WMI hooks I need help...

Thanks! That did the trick for the missing homeDirectory. if($entry->exists('homeDirectory')) { $homedir = $entry->get_value('homeDirectory'); } else { $homedir = "No HomeDirectory has been set."; } I also did the same for the CN but its still failing with the same...

Hi all, I've been working on a script to search Active Directory for a user name and then return the homedirectory. Took me a while to figure out the correct LDAP string but I now have it running. :D I'm using the name John Smith both to authenticate and as the test user to search for...

I'm using two servers for these tests. Server82 and server83. They are both Windows 2000 sp3. I'm checking them now to see what the differences are. But it seems they are "sister" servers. Both running pretty much the same software. Server82 runs fine. Server83 hangs the script. I take it WMI...

Ok, I put in the msgbox with colComputers.Count and ran it against a known good server and one that it wont run against. The working server gave me a 1 and ran with no problems. The other server didnt show me the colComputers.Count msgbox. It just hung.

Yes. Odd huh? As it works fine for most of the servers I'm running this against. Any ideas what I could do to catch this error?

Its still hanging and without errors. With the use of msgbox I know it gets to this part of the code. Starts the loop but doesnt pop up the next msgbox. Any ideas? for each colItem in colComputers msgbox "im in the loop" if colItem.DomainRole = 4 or colItem.DomainRole = 5 then

<bangs head against wall....> argh! Ok, I've removed the On Error Resume Next and its running again. I'll see what happens. Thanks.