各位大虾帮帮忙，怎么用asp动态更新xml文件？

[casoon]

<?xml version='1.0' encoding='gb2312'?>
<data>
<oumei>
<item typer="oumei1" title="国家宝藏" img="flash/001.jpg"
url="#"/>
<item typer="oumei" title="渴望" img="flash/002.jpg"
url="#"/>
</oumei>
<gangtai>
<item title="宰相刘罗锅" img="flash/003.jpg"
url="#"/>
<item title="护国良相狄仁杰" img="flash/002.jpg"
url="#"/>
</gangtai>
<hanri>
<item title="梅塞马克打准了" img="flash/002.jpg"
url="#"/>
<item title="国家宝藏" img="flash/001.jpg"
url="#"/>
</hanri>
<dalu>
<item title="梅塞马克打准了" img="flash/003.jpg"
url="#"/>
<item title="国家宝藏" img="flash/001.jpg"
url="#"/>
</dalu>
</data>

上面的这个xml文件，我用asp应该怎么来自动更新?
sql语句是"select title,img from movie"
谢谢了！

[ssm1226]

遍历rs,拼写xml串;或直接使用dom　createElement...

[casoon]

能不能帮我写几句？
谢谢了！

[ssm1226]

eg:


<!-- #include file="adovbs.inc" -->
<%

Dim adoConn
Set adoConn = Server.CreateObject("ADODB.Connection")

Dim sConn
sConn = "Provider=SQLOLEDB.1;Password=11;Persist Security Info=True;User ID=sa;Initial Catalog=test;Data Source=."
adoConn.ConnectionString = sConn
adoConn.CursorLocation = adUseClient
adoConn.Open

Dim adoCmd
Set adoCmd = Server.CreateObject("ADODB.Command")
Set adoCmd.ActiveConnection = adoConn

Dim sQuery
sQuery = "<ROOT xmlns:sql='urn:schemas-microsoft-com:xml-sql'><sql:query>select * from aaa FOR XML AUTO</sql:query></ROOT>"

Dim adoStreamQuery
Set adoStreamQuery = Server.CreateObject("ADODB.Stream")
adoStreamQuery.Open
adoStreamQuery.WriteText sQuery, adWriteChar
adoStreamQuery.Position = 0

Set adoCmd.CommandStream = adoStreamQuery
adoCmd.Dialect = "{5D531CB2-E6Ed-11D2-B252-00C04F681B71}"

dim xmldoc
set xmldoc=server.CreateObject("MSXML2.DOMDocument")
xmldoc.async=false

adoCmd.Properties("Output Stream") = xmldoc
adoCmd.Execute , , adExecuteStream
xmldoc.save "c:\test.xml"
%>

[gu1dai]

学习

这个例子。