上帝De助手

QTP中读写xml可以使用其自带的组件，下面是简单的使用脚本。 ''' '''The class use to write data for test result report ''''===========Demo to use this class===================== 'Dim xmlobj 'Set xmlobj = new XML 'xmlobj.init 'x

Option Explicit Dim oDataBase Set oDataBase = new DataBase Dim sDBName, sSQL, RS '''To Read Mysql Data 'sName = "Mysql.ProductDB" 'sSQL = "select * from Products_Core limit 0,10;" 'print oDataBase.St

''The class use to report result ''''===========Demo to use this class===================== 'Dim oReporter 'Set oReporter = new Report 'oReporter.Set_Parent_Node("in") 'oReporter.Pass "test", "testpas