按键精灵的应用实例

主题：将Excel的内容导入到销售系统中　

　　门店之间经常互相调货，调货的品种和数量比较多，由店员直接扫货录入工作量忒大，我希望能采用一种方法减轻他们重复录入的工作量。

1.开发系统插件直接导入到系统中，但该销售系统采用文本式数据库存储。系统中既没有SQL，也没有Oracle或Access之类的数据库，而数据存储dat文件经过加密而成，无法得知密码或程序接口信息，这样开发系统插件就比较难。

2.用按键精灵来实现，按键精灵是个非常好的软件，它能记录鼠标和键盘的变动来模拟手动输入，对于重复性较强的任务特别适用。

   A.前期准备：进入销售系统的数据录入前状态。

　B.编写按键精灵脚本：

Call Plugin.Office.OpenXls("d:\test.xlsx")
//调用Excel文件
For i=1 to 500
//定义读取的行数（销售系统最多能一次导入500行）
Text1 = Plugin.Office.ReadXls(1, i, 1)
Text2 = Plugin.Office.ReadXls(1, i, 2)
//读取第一行第一列
If Len(text) = 0 Then
KeyPress "Up", 1 
Call Plugin.Office.CloseXls()
ExitScript
End If
//判断是否到达Excel的尾行，如果是退出。
Call Plugin.Sys.SetCLB(text1)
//将Text内容粘贴到粘贴板上
KeyDown 17, 1
KeyPress 86, 1
KeyUp 17, 1
//粘贴商品ALU到销售系统的表格内
KeyDown "Right", 1
KeyUp "Right", 1
KeyDown "Right", 1
KeyUp "Right", 1
//销售系统表内的位置变化
Call Plugin.Sys.SetCLB(text2)
KeyDown 17, 1
KeyPress 86, 1
KeyUp 17, 1
//粘贴商品Qutities到销售系统的表格内
KeyPress "Down", 1
//销售系统表下移一行
Next
这个脚本经过发布后就可使用，已在WindowsXP+Office2010通过测试，如有不足之处，欢迎各位高手批评指正。 

　

转载于:https://www.cnblogs.com/coolhead/archive/2012/01/12/2320309.html