拥有多年互联网和银行系统性能测试开发经验,对性能瓶颈诊断定位和优化领域有较多研究。
重回互联网行业,性能测试开发、自动化测试开发、Java开发
Log analysis Tool for PT
上一篇 /
下一篇 2013-01-07 12:58:45
/ 个人分类:日志分析
Log analysis Tool for PT:
1. PT data collection
2. log collection
'创建一个FileSystemObject对象的事例
Set MyFileObject=CreateObject("Scripting.FileSystemObject")
'创建一个Folder对象
Set MyFolder=MyFileObject.GetFolder("D:\HKSG2013_iCRM2\PT\UAT data preparation\log\log")'
'循环显示其中文件
dim count
count=0 '计算文件个数
For Each thing in MyFolder.Files
outputline(thing)
count=count+1
Next
sub outputline(filename)
set fso=createobject("scripting.filesystemobject")
set file=fso.opentextfile(filename)
dim i
Const ForAppending=8
for i=0 to 2
i=i+1
'skipline 跳过一行
h=file.readline
'h=h&vbcrlf
Next
file.close
'set file=fso.createtextfile("Log_summary.txt")
Set file=fso.OpenTextFile("D:\HKSG2013_iCRM2\PT\UAT data preparation\log\Log_summary.txt",ForAppending)
'file.write h
file.WriteLine h
file.close
End sub
收藏
举报
TAG: