怎么样MDB数据库文件作为数据源,转换为XML文件输出,我用的是ADO控件+VB6
用ADO的Recordset对象的save方法,Recordset.Save 文件名, adPersistXML 。
可是保存的不是标准的XML文件格式,而是Schema文件。怎么样格式化输出这种文件呢?像XML一样控制输出。
用ADO的Recordset对象的save方法,Recordset.Save 文件名, adPersistXML 。
可是保存的不是标准的XML文件格式,而是Schema文件。怎么样格式化输出这种文件呢?像XML一样控制输出。
要怎么 像xml一样控制输出。 ???
如果要操作 直接用open方法就可以了啊!
GetData = "<root>"
while not adodb_recordset.EOF
GetData = GetData & "<record>"
for i = 0 to adodb_recordset.Fields.Count -1
set v = adodb_recordset.Fields.Item(i)
GetData = GetData& "<" & adodb_recordset.Fields.Item(i).Name &">" &_
adodb_recordset.Fields.Item(i).Value &_
"</" & adodb_recordset.Fields.Item(i).Name &">"
set v = Nothing
next
GetData = GetData & "</record>"
adodb_recordset.MoveNext
wend
GetData = GetData & "</root>"