利用vbscript vuser脚本创建数据文件
因为测试需要生成大量的不同文件名的TXT文件实现方法如下：
1首先新建一个vbscript vuser脚本
2在global.vbs中插入如下函数
Sub Createfile()
Dim fso, tf
Set fso = CreateObject("Scripting.FileSystemObject")
Set tf = fso.CreateTextFile("Z:\MSI_IN\SC_IP" + lr.eval_string("<Unique_number>") + ".msi", True)
tf.WriteLine("第一行" + lr.eval_string("<Param1>") + "第一行")
tf.WriteLine("第二行")
tf.WriteLine("第三行")
。。。。。。
End Sub
其中Unique_number为LR中定义的参数，参数类型选择唯一值，与不同的常量（“SC_IP”及".msi“）结合即可生成不同文件名的大量文件，如果运行多用户的话注意block size的设置，否则如果运行的虚拟用户或者迭代次数过多时会出错，生成的文件内容也同样可以参数化，Param1即为参数，要注意参数的使用格式
3在action中插入Createfile()
4在cotroller中运行脚本，可以设置多个虚拟用户，指定迭代次数决定要生成多少个文件。如果需要长时间不断生成的话就指定运行时间。 VB的 更适合QTP吧 如果是生成文件不如拿.net写个小工具比vbs方便多了无非就是一些写文件操作
页:
[1]
