SAPIEN Technologies

Your probably going to have to look at an HTA, or possibly Powershell. Have you checked the ScriptingVault?

The only Star is Jim. He is usually right 99.9% of the time. Im just a lonely regular member. 8(

Ok, I think i narrowed down the issue to having this line in my profile causing the crash.Add-PSSnapin quest.activeroles.admanagementCommenting this line out results in normal behavior. 8(

Using PrimalScript 2007 pro Ver. 4.5.562When starting a new Powershell script the Editor crashes with no error code. It crashes the same time I suspect it tries to load my PS profile. By turning off "Load Powershell Profiles" option under options does not cause this problem. This starting ...

If i understand you correctly no you do not. You can create as many "Select Case" statements inside the For Each loop as you like.

I believe your using the "Display name" for the service. You need to use the "Service Name".so for DNS client the Service name is "DNSCache"for Ftp Publishing I think the name is "MSFTPSVC"

This is how I would restructure it. I cant really test this out but it should work. Set objFSO = CreateObject("Scripting.FileSystemObject") strDate = InputBox("What date do you want to process through ERMX?") If IsEmpty(strdate) Then WScript.Quit End If If RegexMatch("^d{4}$...

Your gonna have to put the main part of your script into a subroutine for this to work and avoid duplicate code. strDate = InputBox("Type in a date") If IsEmpty(strdate) Then WScript.Quit End If If RegexMatch("^d{4}$",strDate) Then WScript.Echo "Match" ' Call Main Else ...

You want to try to match what the person could type with a given pattern. If that pattern matches what was typed then you want to continue with the rest of the script. If not then warn the user then exit. strDate = InputBox("Type in a date") If IsEmpty(strdate) Then WScript.Quit End If If ...

You could use this but I would also write in some string matching to make sure that the user entered no more or no less the required amount of digits and also to make sure they are digits. a simple Regular expression comes to mind. strDate = InputBox("Type in a date") If IsEmpty(strdate) T...