asp如何使用ADO 2x Command 对象读取数据？

如何使用ADO 2x Command 对象读取数据？

具体的读数据代码如下：

Cmd = CType(EC.Example1(), ADODB.Command)
' 现有代码返回 ADO Command 对象
strWriter = New StringWriter()
xmlWriter = New XmlTextWriter(strWriter)
' 使用 XmlTextWriter 和 StringWriter 转换 Command 对象的 Parameters 集合，初始化 stringwriter 和 xmlwriter 以返回 xml 字符串
For i = 0 To Cmd.Parameters.Count - 1            
xmlwriter.WriteElementString(Cmd.Parameters(i).Name.Substring(1),_ Cmd.Parameters(i).Value.ToString)
' 在 Parameters 集合内循环，写入名称和值
Next
Example1 = strWriter.GetStringBuilder.ToString()
' 将 xml 作为字符串返回