wscript.echo no workie in my scriptie (Infopath VBSCRIPT)

[funnybroad]

I've got some vbscript behind my Infopath form. Here's a chunk of it. The
problem is: I can't get wscript.echo to work.

Here's the code:

Sub Echo_Test_OnClick(eventObj)
Dim objShell, BtnCode
Set objShell = CreateObject("WSCript.shell")

BtnCode = objShell.Popup("Will This Work?", 7, "Answer This Question:",
4 + 32)

Select Case BtnCode
case 6 WScript.Echo "case 6"
case 7 WScript.Echo "case 7"
case -1 WScript.Echo "case -1"
End Select
End Sub

Here's the error message:

The following error occurred:

Object required: ''
File:script.vbs
Line:282

 

[S.Y.M. Wong-A-Ton]

Try XDocument.UI.Alert() instead.