ADO多数据量查询

[kjset]

代码: Set conn400 = Server.CreateObject("ADODB.Connection")
connstr400="Provider=SQLOLEDB.1;User ID=sa;Password=aaa;Initial Catalog=400search;Data Source=192.168.0.1;Connect Timeout=300"
conn400.Open connstr400
Set rs= Server.CreateObject("ADODB.Recordset")
sql="select * from Ddatrn_all where 序号= '018100228' order by 帐号 "
rs.open sql,conn400,1,1

记录大概200多万时正常多万时产生:
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

Microsoft OLE DB Provider for SQL Server 错误 '80040e21'

多步 OLE DB 操作产生错误。如果可能，请检查每个 OLE DB 状态值。没有工作被完成。

/400al.asp，行123
请帮忙解决

[kjset]

补充所得结果大概2000条记录

[kjset]

记录大概200多万时正常,800多万时产生:
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp，行242

Microsoft OLE DB Provider for SQL Server 错误 '80040e21'

多步 OLE DB 操作产生错误。如果可能，请检查每个 OLE DB 状态值。没有工作被完成。

/400al.asp，行123