在PowerScript中使用WSH

WSH(Windows Scripting Host)作為一種簡單的動態腳本作業方式,為一些簡單的問題處理提供了很好的支持,其能實現的很多功能
在PB中都沒有,那我們是否可以通過PB來使用這些WSH的腳本呢?經過測試是可行的.
如下腳本即可使用WSH的網絡功能.
integer li_rc
OleObject ole_wsh
ole_wsh = CREATE OleObject
li_rc = ole_wsh.ConnectToNewObject ( "WScript.Network" )
IF li_rc = 0 THEN
   MessageBox ("Domain", string( ole_wsh.UserDomain ))
   MessageBox ("User", string( ole_wsh.UserName ))
   MessageBox ("Computer", string( ole_wsh.ComputerName ))
END IF

如下腳本即可使用WSH的shell功能.
integer li_rcOleObject ole_wshole_wsh = CREATE OleObjectli_rc =
ole_wsh.ConnectToNewObject ( "WScript.Shell" )ole_wsh.Run
("Notepad")ole_wsh.AppActivate("Untitled - Notepad")Sleep
(500)ole_wsh.SendKeys (''Hello from PB")