- //打開記事本
- VBSCall RunApp("notepad.exe")
- //等待記事本完全打開
- Delay 100
- //得到目前視窗句柄
- dim hwnd
- Plugin hwnd=Window.Foreground()
- //查找目前視窗下的子句柄
- dim edithwnd
- Plugin edithwnd=Window.FindEx(hwnd,0,"Edit",0)
- //發送字元串消息
- Plugin Window.SendString(edithwnd, "看我發送字元串消息")
- //發送回車
- Plugin Window.SendKeyDown(edithwnd,13)
- //發送鍵盤消息
- Plugin Window.SendKeyDown(edithwnd,asc("1"))