OSDN Git Service

20021009版ソース
[seraphyscrtools/SeraphyScriptTools.git] / TestScript / simple1.vbs
1 Option Explicit
2
3 Dim Obj
4 Set Obj = WScript.CreateObject("SeraphyScriptTools.Instance")
5
6 Obj.MainFrame.Open "SIMPLE-WINDOW"
7
8 While Not Obj.MainFrame.Quit
9         Obj.WaitEvent
10 WEnd