Powershell does not terminate when started VBSCRIPT

I try to invoke Powershell command in a HTA application via VBSCRIPT. I see
Powershell command window opens, but it will not terminate. It just stay
open without any status.

For example, I have this test script named testposh.vbs. I ran it in a
command window as wscript testposh.vbs. Note that the test with ipconfig.exe
command works fine. (that cmdarg is commented out.)

how can I make powershell run the command and returns output to my vbscript?

---testposh.vbs ---
Set objShell = WScript.CreateObject("WScript.Shell")

'cmdarg = "%comspec% /c ipconfig.exe"

cmdarg = "%comspec% /c powershell -nologo -noninteractive -command ""2+2"""

wscript.echo cmdarg

Set objExecObject = objShell.Exec(cmdarg)

strLine =""
LineCnt=0
Do Until objExecObject.StdOut.AtEndOfStream
strLine = strLine & objExecObject.StdOut.ReadLine()
LineCnt= LineCnt + 1
Loop

Wscript.Echo "Linecount=" & LineCnt & ". Lines=" & strLine

---
thanks.

I have this issue as well. Did you ever find a solution?

You can use the Run method of WScript.Shell, but I'd rather use Exec.

-- Sam

"ktmd" <ktmd@discussions.microsoft.com> wrote in message
news:AC0241A5-DEB1-4A2D-AB80-8C3E30C058D4@microsoft.com...
>I try to invoke Powershell command in a HTA application via VBSCRIPT. I
>see
> Powershell command window opens, but it will not terminate. It just stay
> open without any status.
>
> For example, I have this test script named testposh.vbs. I ran it in a
> command window as wscript testposh.vbs. Note that the test with
> ipconfig.exe
> command works fine. (that cmdarg is commented out.)
>
> how can I make powershell run the command and returns output to my
> vbscript?
>
> ---testposh.vbs ---
> Set objShell = WScript.CreateObject("WScript.Shell")
>
> 'cmdarg = "%comspec% /c ipconfig.exe"
>
> cmdarg = "%comspec% /c powershell -nologo -noninteractive -command
> ""2+2"""
>
> wscript.echo cmdarg
>
> Set objExecObject = objShell.Exec(cmdarg)
>
> strLine =""
> LineCnt=0
> Do Until objExecObject.StdOut.AtEndOfStream
> strLine = strLine & objExecObject.StdOut.ReadLine()
> LineCnt= LineCnt + 1
> Loop
>
> Wscript.Echo "Linecount=" & LineCnt & ". Lines=" & strLine
>
> ---
> thanks.
>