VB alert action

Question

I have a wierd [at least I think so] problem.

I have an alert action set to fire a VB script to send an SMS message to support mobile phones. Everything works fine until I try and get Orion to pass an agument to the script, namely ${nodename}. Basically, nothing happens.

However, if I run the script from the command line and pass an argument, then all is OK, so I assume my fault lies within Orion.

Command I am running and the script follow. Does anyone have any suggestions?

Alert action: [cscript.exe selected]
s:\scripts\sms_node_down.vbs ${NodeName}

Script:
Dim ArgObj, node
Set ArgObj = wScript.Arguments

'First parameter
node = ArgObj(0)

' Variable declarations
Dim Engine
Dim Connection
Dim MobNum
Dim Message

' Create an instance of the Engine
Set Engine = CreateObject("SMSDo.Engine")

' Now the Engine has been created, open a connection - Parameters are Server, Username, Password
Set Connection = Engine.Connect("172.20.10.42", "rooster", "xxxxxx")

' Set the on call mobile number
MobNum = "+44xxxxxxxxxx"

' Set message to send
Message = "ALERT! "& node &" not responding."

' Send the message - Parameters are Number, Message, Reserved (always zero)
Call Connection.SendMessage(MobNum, Message, 0)

' Reset the objects to nothing to release allocated memory
set Engine = nothing
set Connection = nothing
set ArgObj = Nothing