关于功能自动化和QTP_2012-07-30.pptVIP

QTP工具介绍-增加内置验证点 QTP工具介绍-增加内置验证点 QTP工具介绍-增加内置验证点 QTP工具介绍-增加内置验证点 QTP工具介绍-增加内置验证点 QTP工具介绍-数据库验证点 QTP工具介绍-数据库验证点 QTP工具介绍-数据库验证点 QTP工具介绍-XML验证点 Function GetXml (ByVal strXmlFilePath,ByVal xmlNodeName)Dim xmlDoc,xmlRootSet xmlDoc = CreateObject(“Microsoft.XMLDOM”) ‘创建‘XML DOM对象xmlDoc.async = False 控制加载模式为同步模式（xml树加载完毕后再执行后续代码）xmlDoc.load strXmlFilePath 载入xml文件If xmlDoc.parseError.errorCode 0 ThenMsgBox XML文件格式不对，原因是： Chr(13) xmlDoc.parseError.reasonExit Function End IfSet xmlRoot = xmlDoc.documentElement xmlRecursion xmlRoot,xmlNodeName 调用xml递归函数传入指定的根和节点名 GetXml = True xmlRecursion