如题。
webService的函数如下：
VB.NET code:
Public Function RecordSetBySql(ByVal Sql As String) As XmlDataDocument
Dim xRs As ADODB.Recordset
Dim cmd As ADODB.Command
Dim st As Stream
Dim xd As XmlDataDocument
xRs = New ADODB.Recordset
cmd = New ADODB.Command
st = New Stream
xd = New XmlDataDocument
xRs.Open(Sql, SDConn, CursorTypeEnum.adOpenDynamic, LockTypeEnum.adLockOptimistic)
xRs.Save(st, PersistFormatEnum.adPersistXML)
st.Flush()
st.Position = 0
xd.LoadXml(st.ReadText(st.Size))
st.Close()
xRs.Close()
conn.Close()
Return xd
End Function
{{
<?xml version="1.0" encoding="utf-8" ?>
<HuiSin>
<admin>100,100</admin>
<user>200,200</user>
怎样在这里添加一个新的呢？
< ......
