加载中
VBS读写txt文件常用方法

1、打开文件 使用opentextfile方法 set fs =createobject(“scripting.filesystemobject”) set ts=fs.opentextfile(“c:\1.txt”,1,true) 注意这里需要填入文件的完整路径,后面一个参数为访...

vbs控制语音音量及语速实例

双击即可根据您设置的语速及音量读出“Hello,开源中国”。 Set objVoice = CreateObject("SAPI.SpVoice") 'Set objVoice.Voice = objVoice.GetVoices("Name=Microsoft Simplified Chinese...

vbs创建日志文件并追加内容

某些特殊情况下,在Windows环境使用vbs操作日志文件也是很不错的选择

vbs
2016/07/10 19:53
2.8K
UFT开发实例:一个完整的测试框架源码

11年做保险系统中理赔流程自动化时,开发的一个小框架。

使用vbs识别验证码方案

本文给出了一种验证码识别方案,前提是我们要有生成验证码的二进制码。

UFT检查点类型

QTP中的检查点类型 QTP支持在测试步骤中添加如下类型的检查点: 1。标准检查点(Standard Checkpoint):用于检查测试对象的属性 2。图像检查点(Image Checkpoint):用于检查被测应用程序的...

UFT开发实例:DataTable操作实例

11年自己用QTP做自动化测试时使用过的,分享给大家。给还在使用QTP做自动化的同学做个参考。这个实例用于统计操作步骤的耗时。

UFT自动化测试工具实例代码

11年使用UFT做自动化时开发的一些实例代码。本想一个一个讲解,但发现代码贴出来后很乱。索性就一次性挑了一些比较完整的实例分享给大家做参考,代码中已经有了备注。

UFT开发实例:常用的代码片段

1 生产随机数列 第一种方法 CODE: randomize'更新反回的数据 funcation rand(k,n) n=int((k-1)*rnd+1) rand=n end funcation 第二种方法 CODE: n=randomnumber.value(1,255) 2 当运行到表中的...

UFT小知识点整理

11年整理的,时间有点长了,给现在还在使用QTP做自动化测试的童鞋做个参考吧。

vbs版的语音报时程序

几年前出于兴趣写的。将以下vbs代码另存为文件,双击后即可听到语音报时。 Dim a,b,c,d,e,f,g Function FormateTime(sendTime,Para) '格式化时间 select case Para case "1" sen...

vbs
2016/07/09 11:25
1K
UFT操作SQLServer,MySQL,Oracle,DB2,Access数据库的方法

连接数据库代码: Set Conn = CreateObject("ADODB.Connection" )   str="DRIVER=SQL Server;SERVER=192.168.1.109;UID=wangshaoping;PWD=wsp;APP=Microsoft Office 2003;WSID=wangshaopi...

基于vbs通过语音向电脑发送命令

几年前处于兴趣搞的一个小程序,识别率不是特别准确,是一个挺好玩的小程序

vbs
2016/07/09 10:47
789
vbs定时关机任务脚本

大家一定要在机器空闲时测试哦。不然真会关掉你的机器的。 '**************************************** '*by mengfeiyang '*关机 '**************************************** Set colOperati...

vbs
2016/07/09 10:51
707
中文姓名笔画计算(VBS脚本版)

1、vbs源码 '中文姓名笔画计算(VBS脚本版) dim word,key word=inputbox("请输入你要计算的文字") if word="" then msgbox "小样 不是叫你不要输入文字吗" Wscript.Quit end if key=char_wo...

vbs
2016/07/09 11:02
643
UFT开发代码实例:将Excel中的数据保存为数组

2011年开发的一个小例子,那个时候还没有selenium,QTP还叫UFT。那时我也用UFT做过保险系统,国航系统,PICC,国寿系统的自动化测试项目,期间积累了不少很好的尝试案例。现在估计还有很多公...

UFT开发实例:QTP调用OutLook自动发送邮件

11年自己用QTP做自动化测试时使用过的,分享给大家。给还在使用QTP做自动化的同学做个参考

UFT代码片段整理(1)

1.手工参数化 Browser("百度一下,你就知道").Page("百度一下,你就知道").WebEdit("wd").Set DataTable("searchContent",dtGlobalSheet) For i=1 to Datatable.GetRowCount Dialog("Login"...

没有更多内容

加载失败,请刷新页面

返回顶部
顶部