Hackviking He killed Chuck Norris, he ruled dancing so he took up a new hobby…


PSC: Basic script

So the challenge was accepted! Follow it here! One of the conditions was that the script has to perform like a program or command line tool to be exact! But why go for one when you can go for both! Still not sure what the final script will do but I have to detect how the script is started and act accordingly.

I always use Option explicit, makes troubleshooting so much easier!

Option explicit

Check if the script is running from console or windows mode by checkking the WScript.FullName string.

If InStr(1, WScript.FullName, "cscript", vbTextCompare) Then
ElseIf InStr(1, WScript.FullName, "wscript", vbTextCompare) Then
	' Hope this never fires! :)
    wscript.echo "How the hell did you start this script?"
End If

Sub for handling the command line version. Checks for command line arguments, if none displays help.

Sub InitConsole()
	'Check if we have any parameters
	If Wscript.Arguments.Count = 0 then
		'Display help
		wscript.echo "You didn't supply any command line parameters... At least one parameter is required!"
		'Verrify the parameters
		wscript.echo "You supplied " & Wscript.Arguments.Count & " arguments!"
	End If
End Sub

Sub for handling if the user double clicks the script...

Sub InitWindow()
	wscript.echo "You are running this by dubble click..."
End Sub

Stay tuned for the next version!

Posted by Kristofer Källsbo

Comments (0) Trackbacks (0)

No comments yet.

Leave a Reply

This site uses Akismet to reduce spam. Learn how your comment data is processed.

No trackbacks yet.