帮忙看看这段ASP调用有什么问题？

Question

技术信息（适用于支持人员）错误类型：
MyBusiness (0x800A005B)
/zhanghl/dy.asp, 第 4 行
浏览器类型：
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0) 页：
GET /zhanghl/dy.asp 时间：
2002年4月26日, 13:40:36 
详细信息：
Microsoft 支持

Answer 1

同志们看看吧！这是MSDN上的说法：
出于安全的原因，不能从 Microsoft Internet Explorer 执行的脚本中使用 Save 方法。
这是微软出的技术书籍中的例子：
rs.save response,1。
矛盾，矛盾，我有点不想用微软的东西了！

Answer 2

新修改的代码：
<%
response.contenttype="text/xml"
set obj=server.createobject("MyBusiness.CCustomerManger")
obj.AcquireConnection
set rs=obj.GetCustomer
obj.ReleaseConnection
rs.save response,1
%>
错误转到第7行，这一行据说是微软ADO2.5的最精彩处之一。请大家看看怎么回事？

Answer 3

我这样用的，没错呀。
<%
response.contenttype="text/xml"
dim rs , s
set rs=server.createobject("adodb.recordset")
'使用的是VB附带的BIBLIO.MDB
s="Provider=Microsoft.Jet.OLEDB.3.51;Persist Security Info=False;Data Source=C:\Program Files\Microsoft Visual Studio\VB98\BIBLIO.MDB"
rs.open "select * from Authors where au_id=1",s
rs.save response,1
rs.close
%>
下面是显示的结果
- <xml xmlns:s="uuid:BDC6E3F0-6DA3-11d1-A2A3-00AA00C14882" xmlns:dt="uuid:C2F41010-65B3-11d1-A29F-00AA00C14882" xmlns:rs="urn:schemas-microsoft-com:rowset" xmlns:z="#RowsetSchema">
- <s:Schema id="RowsetSchema">
- <s:ElementType name="row" content="eltOnly">
- <s:AttributeType name="Au_ID" rs:number="1" rs:maydefer="true">
  <s:datatype dt:type="int" dt:maxLength="4" rs:precision="10" rs:fixedlength="true" /> 
  </s:AttributeType>
- <s:AttributeType name="Author" rs:number="2" rs:nullable="true" rs:maydefer="true" rs:write="true">
  <s:datatype dt:type="string" rs:dbtype="str" dt:maxLength="50" /> 
  </s:AttributeType>
- <s:AttributeType name="c2" rs:name="Year Born" rs:number="3" rs:nullable="true" rs:maydefer="true" rs:write="true">
  <s:datatype dt:type="i2" dt:maxLength="2" rs:precision="5" rs:fixedlength="true" /> 
  </s:AttributeType>
  <s:extends type="rs:rowbase" /> 
  </s:ElementType>
  </s:Schema>
- <rs:data>
  <z:row Au_ID="1" Author="Jacobs, Russell" /> 
  </rs:data>
  </xml>
你检查一下你的组件是否返回了正确的记录集？

Answer 4

拜托，第4行是
set rs=obj.GetCustomer

Answer 5

原来是
obj.ReleaseConnection
rs.save response,1
这地方出了问题，改为
rs.save response,1
obj.ReleaseConnection
就可以了，我很奇怪，当我释放连接后，RS记录集竟然是失效的，按道理我是将记录集设为Client型的，应该不受连接的影响呀？

Answer 6

精彩是这个吧：
客户端：
var rs=new ActiveXObject("ADODB.Recordset");
rs.Open("刚才那个save的URL","Provider=MSPersist");

Answer 7

现在是我的VB客户应用通过HTTP调用一个COM+组件，上面的代码是服务器端ASP的代码，主要是这段代码有点问题。

Answer 8

在组件内部,Recordset的CursorLocation属性应置为adUseClient,并且在返回Recordset之前,应将它的ActiveConnection置为空.这是返回向客户端Recordset接口的基本要求.