如何获得conn的执行结果？
我在写一个SQL查询器，因为要操作服务器上的数据，但是又不想安装SQL。
我设置了一个文本框txtSQL，当点击按钮时，代码为：conn.execute txtSQL
如果在SQL查询分析器上运行查询，我们可以看到返回结果，比如“XX行记录受影响”。那么，我应该如何获得返回的结果？
[解决办法]
1、新建一个带返回值的存储过程
CREATE PROCEDURE GetRowcount
@SQL NVARCHAR(4000),
@b INT=0 OUTPUT
AS
SET NOCOUNT ON
EXEC SP_EXECUTESQL @SQL
SET @b=@@ROWCOUNT
GO
2、VB中调用
Dim cd As ADODB.Command
Dim lngRowcount As Long '返回的结果
Set cd = New ADODB.Command
cd.CommandText = "GetRowcount "
cd.CommandType = adCmdStoredProc
Set cd.ActiveConnection = Conn
cd.Parameters( "@SQL ").Value = txtSQL
cd.Execute
lngRowcount = cd.Parameters( "@b ").Value
[解决办法]
dim lRows as long
conn.execute txtSQL, lRows
debug.print lRows & " 行记录受影响 "
