Vbscript Execution in Microsoft Office Communications Server 2007 Speech Server.

I am directed by a Microsoft Support Member to post this Issue here.

I am trying to add a Speech Server Application through Code using Vbscript in Microsoft Office Communications Server 2007 Speech Server. Below is Vbscript.

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\MSSV2")
Set objPeerClass = objWMIService.Get("Application")
Set objPeer = objPeerClass.SpawnInstance_()
objPeer.Name= "ApplicationOne"
objPeer.Put_
wscript.echo "Created Application= " & objPeer.Name

Above Script gives Error Number 80041031. Please help me to remove this Error.