冷月

//////在global.sbh定义全局变量$include: "global.sbh" 的内容dim j        as integer dim danHaoId as string  --------原单单号,默认值为NULLdim fangShi  as integer --------生成方式: fangShi=0--默认值(即没有任何选择),fangShi=1--用“F11

   建sqlserver数据源：在控制面板->管理工具->数据源中建一个数据源，数据源名为zlsqldb,与图中的名字不同。测试通过就建好数据源了。 Robot脚本：Robot帮助中的脚本，我只改了一下数据源的名字，先熟悉一下，运行该脚本时会让输入连接数据库的用户和密码，这就对了，哈哈哈。$Include "sqautil.sbh" 

  获得计算器中数据的值：Robot提供了获取对象识别方法和属性的东东――Inspector。Robot tools－Inspector..具体使用方法：（1）打开Inspector（2）左键点图上面的手，将手移动到计算器的输入的值上面，松开鼠标。在Inspector左下角就显示了刚才选的对象的属性。（3）从上，选择Label，ObjectIndex=1,按CTRL

  建数据池：（一）   数据池（DATAPOOL）创建（1）启动Rational TestManager，进去后不用做其它操作，直接点Tools>Manage>Datapool打开数据池操作界面。（2）点击New…，输入数据池名称点“确定”；（3）在打开的Data Type Specification中添加字段定义；字段定义说明：Name：字段名称Type：数据类型，下面的要注意

        起初知道有验证点这个东西，但不知道在什么地方插，怎么用，上次无意中浏览winlunner的时候又想到了robot也有插入验证点这个功能的，于是到网上找了一篇文章看了看，恍然大悟，原来在这里。。。。。。不求甚解，稍微试试。        如果用到验证点，我那个获取窗体标题的函数真的是要回家休息了 呵呵。不过思路没什么改变，只是判断由函数变为插入验证点判断而已。

        插入验证点可以在录制脚本的时候插入，不用暂停录制， 回到robot的主界面点插入验证点就行了；也可以不在录制脚本的时候插入，把那些robot自动生成的插入验证点的代码复制粘贴到合适的地方。 插入验证点： 菜单栏－－Insert－－Verification Point 1.Alphanumeric    识别的对象中捕获并比较字母或数字的值。 2.Menu   （到现在还没搞定）  

sub main     Dim Result as integer    dim value   as string        Window SetContext, "Caption=仓库管理系统 - [进货一览表]", ""        Window SetContext, "Caption=进货一览表;ChildWindow", ""    InputKeys "{F4}"      

Sub Main    Dim Result As Integer            Initially Recorded: 2005-8-9  16:40:25    Script Name: 新增直接入库单    药品表:  药品代码 单位 单价 数量  批号    "ZY.2151999017" "kg" "10" "100" "0001"    "ZY.215199901

例子：1.建头文件2.建包含自定义函数的文件3.新建脚本，使用头文件的参数，调用函数头文件（Header.sbh）包含自定义函数的文件（fun.sbl）这两个文件的路径都放在此默认路径下：*/Rationalaccess/TestDatastore/DefaultTestScriptDatastore/TMS_Scripts/SQABas321.建头文件： New－>SQABas32 File－>

无人职守时运行robot的设想：1.拼接好所有脚本2.在阶段性的地方插入界面比较代码  如果界面相同，顺序向下执行  如果界面不相同，调用抓图的程序，保存当前图片，执行跳转语句运行另外一部分脚本3.继续运行，碰到问题同上处理4.查看自动抓下的图片，重现该问题以上各步骤的实现方法： 1. 脚本调用脚本 2.用SQAGetProperty("CurrentWindow","Recognition",v

Sub MainOpen "E:/zhanglin/d/自动话测试/temp001.txt" For Output As #1Write #1, "张三", "初一年级", 14Write #1, "李四", "职业高中", 18Close #1Dim name1 As String, nianji1 As String, age1 As Integerdim msgtext as str

1.新建一个被调用的脚本fun22.新建一个调用脚本fun3fun2.Script.rtxml  和 fun3.Script.rtxml所在的路径都在：*/Rationalaccess/TestDatastore/DefaultTestScriptDatastore/TMS_Scripts1.建调用的脚本 New－>Script... 文件名：fun2 写入： Sub Main    Dim Re

   $Include "sqautil.sbh" Sub Main    Dim Result As Integer    定义一个数值，用来保存从数据库表中取出的数据    dim out1(1 to 3,1 to 30) as Variant        定义用于连接数据库的变量connection，这个变量一定要是long型    定义从表中读