/*SP5*/

CREATE PROCEDURE dbo.getUserName

--为了加深对"顺序"的印象，将以下两参数的定义顺序颠倒一下

@UserName varchar(40) output,

@UserID int

as

set nocount on

begin

if @UserID is null return

select @UserName=username

from dbo.[userinfo]

where userid=@UserID

if rowcount> 0

return 1

else

return 0

return

end

go

'**调用同时具有返回值、输入参数、输出参数的存储过程**

DIM MyComm,UserID,UserName

UserID = 1

Set MyComm = Server.CreateObject("ADODB.Command")

with MyComm

.ActiveConnection = MyConStr 'MyConStr是数据库连接字串

.CommandText = "getUserName" '指定存储过程名

.CommandType = 4 '表明这是一个存储过程

.Prepared = true '要求将SQL命令先行编译

'返回值要最先被声明

.Parameters.Append .CreateParameter("RETURN",2,4)

'以下两参数的声明顺序也做相应颠倒

.Parameters.append .CreateParameter("@UserName",200,2,40)

.Parameters.append .CreateParameter("@UserID",3,1,4,UserID)

.Execute

end with

if MyComm(0) = 1 then