程序员:ASP操作XML的类
ASP操作XML的类的说明:
可以完成ASP对XML节点的添加、删除、修改、清空。
进行上述操作,根据条件,操作类型包括:仅对第一个符合条件、及全部符合条件二种。
如:
’将第一条件值替换成新值
’call xml.r_node("/blog/sorts/sort[id=’2’]/name","分lei2")
’将全部条件值替换成新值
’call xml.r_nodes("/blog/sorts/sort[id=’2’]/name","分lei2")
<%
dim xml,xmlfile
xmlfile="/Person/3/7/fls975/blog.xml"
set xml=new QT_XML_Class
Class QT_XML_Class
’Projict : ASP操作XML
’Author : Missde
’Link : www.missde.cn
’Date : 15:25 2007-5-29
private dom,xmlpath,doc
Public iserr_
’初始化类
Private Sub Class_Initialize()
Set dom = Server.CreateObject("Microsoft.FreeThreadedXMLDOM")
xmlpath = Server.MapPath(xmlfile)
If not dom.Load(xmlpath) Then
SaveToFile "<?xml version=""1.0"" encoding=""utf-8""?>"&VBcrlf&"
dom.Load(xmlpath)
End If
end Sub
0条评论