|
Sub Main
Dim Result As Integer
'Initially Recorded: 2004-12-9 20:12:13
'Script Name: 1232004
Window SetContext, "Class=Shell_TrayWnd", ""
Toolbar Click, "ObjectIndex=2;\;ItemText=显示桌面", "Coords=15,6"
Window SetContext, "Class=WorkerW;Level=2", ""
ListView DblClick, "ObjectIndex=1;\;ItemText=快捷方式 ERM.exe", "Coords=30,15"
Window SetContext, "Caption=企业关系管理", ""
EditBox Click, "ObjectIndex=2", "Coords=58,9"
EditBox Click, "ObjectIndex=1", "Coords=58,0"
:,(:,( InputKeys "12321"--(只记录了密码,但是我的帐号却没有记录下来!)问题是EditBox这个控件Robot也支持!
GenericObject Click, "Text=确定(S)", "Coords=44,10"
Window SetContext, "Caption=企业关系管理系统 V1.0.5.1 Beta", ""
GroupBox Click, "ObjectIndex=5", "Coords=106,11"
TabControl Click, "Text=NBClient", "Coords=39,58"
Window SetContext, "Caption=客户信息备案", ""
GroupBox Click, "ObjectIndex=7", "Coords=373,18"
Window SetContext, "Caption=客户数据选择:", ""
GenericObject DblClick, "Class=TDBGridEh;ClassIndex=1", "Coords=157,69"
Window SetContext, "Caption=客户信息备案", ""
GroupBox Click, "ObjectIndex=2", "Coords=66,20"
GroupBox Click, "ObjectIndex=2", "Coords=292,20"
Window SetContext, "Caption=消息显示窗体", ""
Window Click, "", "Coords=64,21" |
|