在VB中如何接收SQL存储过程的值！？

[zlheadof]

SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS OFF
GO
CREATE PROCEDURE login
@name char(16),
@pwd char(20),
@ret char(1) output
AS

set nocount on

if exists(select * from [user] where name = @name and pwd = @pwd)
begin
set @ret ="1"
end
else
set @ret="0"

GO
SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

[jameschan]

一般vb使用存储过程是adoconn.execute 存储过程 变量，变量。。这样的
具体忘了，呵呵，现在用mysql做服务器，还没有存储过程

[tollers]

Set cmdProc = New ADODB.Command

Set cmdProc.ActiveConnection = cnnDB
With cmdProc
.CommandType = adCmdStoredProc
.CommandText = strCmdText

.Parameters(1).Direction = adParamInput
.Parameters(1) = "xxx"
.Parameters(2).Direction = adParamInput
.Parameters(1) = "yyy"

.Parameters(3).Direction = adParamOutput
.Parameters(0).Direction = adParamReturnValue
.Execute
End With

返回值=.Parameters(3)

[阿建像熊猫]

sql="存储过程"
adoconn.execute sql

即可。

[tollers]

第9行应该是
.Parameters(2) = "yyy"

[tollers]

另：.Parameters(0) 可以接收存储过程 return 的值

[zlheadof]

如果我返回的是一个SQL语句呢！！

如果写存储过程，和VB的程序！！？？？