asp如何调用存贮过程?

[first_boy]

在示列数据库PUBS上建立存贮过程:
CREATE PROCEDURE aaa
@abc char(10),
@mycount int output
AS
select @mycount=count( *) from employee where minit=@abc
return
GO

现求用ASP代码写调用这个过程,救助!

通过ODBC,我在DM那自动生成如下调用代码,请改:
<%

Dim cmd__aaa
cmd__aaa = ""
if(Request("aaa") <> "") then cmd__aaa = Request("aaa")

%>
<%

set cmd = Server.CreateObject("ADODB.Command")
cmd.ActiveConnection = MM_abc_STRING
cmd.CommandText = "dbo.abc"
cmd.CommandType = 4
cmd.CommandTimeout = 0
cmd.Prepared = true
cmd.Parameters.Append cmd.CreateParameter("@RETURN_VALUE", 3, 4)
cmd.Parameters.Append cmd.CreateParameter("@aaa", 129, 1,4,cmd__aaa)
cmd.Parameters.Append cmd.CreateParameter("@mycount", 3, 2)
cmd.Execute()

%>

[leohuang]

上面的存储过程不能正确演示,修改了一下

Create PROCEDURE aaa
@abc varchar(10),
@mycount int output
AS
select @mycount=count( *) from employees where LastName like '%' + @abc + '%'
return
GO

ASP代码
<%
set conn = Server.CreateObject("ADODB.Connection")

conn.Open "provider=sqloledb.1;data Source=(local);User ID=sa;password=;Initial Catalog=Northwind"
'打开本地SQL Server中Northwind数据库

set cmd = Server.CreateObject("Adodb.Command")
cmd.ActiveConnection = conn
cmd.CommandText = "aaa"
cmd.CommandType = 4
cmd.Parameters.Append cmd.CreateParameter("@abc", 200, 1, 10, "d")
cmd.Parameters.Append cmd.CreateParameter("@myCount", 4, 2)

cmd.Execute

'显示返回结果
Response.Write cmd.Parameters(1).value

conn.Close
%>

[lijian910wolf]

UP

[first_boy]

就这一行,我早已解,谢leohuang(LEO)兄!

[first_boy]

请接分

[Mapleleaf123]

leohuang(LEO)
那我的呢~~5555555