> 웹 프론트엔드 > HTML 튜토리얼 > QTP之轻松写入html log_html/css_WEB-ITnose

QTP之轻松写入html log_html/css_WEB-ITnose

WBOY
풀어 주다: 2016-06-24 11:46:08
원래의
1030명이 탐색했습니다.

       用QTP自动化的人都知道,报告时一个很重要的文件,也是检验测试是否通过的凭证,那么如何才能更好的写好log呢?今天我先开的头,可能要在后面才会更新这个模块内容;先给大家来个例子;

Function wrt_html(oStr)		Dim FSO,oLog		Dim FileDir			'文件路径			'		On Error Resume Next		Const ForReading=1,ForWriting=2,ForAppending=8                 '参数赋值(1:只读,2:只写,3:追加)		Set FSO = CreateObject("Scripting.FileSystemObject")				'打开文件		Set oLog = FSO.OpenTextFile("D:\测试.HTML", 8, True) 		oLog.WriteLine (CStr("oStr"))   '写入文件				'关闭和释放		oLog.Close		Set oLog = Nothing		Set FSO = Nothing	End Function
로그인 후 복사

 以上代码是在D盘目录下面写HTML文件  调用办法为:call wrt_html("111") 然后html就会出现如图:

这个只是开始后面会教大家写如下的报告:涂上颜色、截图、超链接等等,敬请期待……

 

관련 라벨:
원천:php.cn
본 웹사이트의 성명
본 글의 내용은 네티즌들의 자발적인 기여로 작성되었으며, 저작권은 원저작자에게 있습니다. 본 사이트는 이에 상응하는 법적 책임을 지지 않습니다. 표절이나 침해가 의심되는 콘텐츠를 발견한 경우 admin@php.cn으로 문의하세요.
인기 튜토리얼
더>
최신 다운로드
더>
웹 효과
웹사이트 소스 코드
웹사이트 자료
프론트엔드 템플릿