上一篇: 
下一篇: 
文章来自: 
引用通告: 
Tags: 
最新日志:
不错呦！smile@林凯西，确保“准备文件”中的几个文件都有安装，S...您好，看了您这篇帖子觉得很有帮助。但是有个问题想请...我的修改过了怎么还被恶意注册呢 @jjjjiiii 用PJ快9年了，主要是A...PJ3啊，貌似很少有人用PJ了，现在不是WP就是z...@332347365，我当时接入时错误码没有-10...楼主，ChkValue值应为-103是什么意思呢？...大哥 你最近能看到我发的信息，请跟我联系，我有个制...
ASP获取存储过程的Return返回值和Output输出参数值
编辑:dnawo 日期:2008-04-10
1.获取Return返回值
注：获取Return返回值的@return一项必须放在@a和@b之前，否则会出错提示"[Microsoft][ODBC SQL Server Driver][SQL Server]为过程或函数 MYSQL 指定的参数太多"!!!
2.获取Output输出参数值
复制内容到剪贴板
程序代码
程序代码<%
'存储过程
'Create PROCEDURE MYSQL
' @a int,
' @b int
'AS
' return @a + @b
'GO
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Driver={SQL Server};server=192.168.1.69;uid=sa;pwd=sa;database=union_5k3g;"
Set MyCommand = Server.CreateObject("ADODB.Command")
MyCommand.Parameters.append MyCommand.CreateParameter("@return",3,4)
MyCommand.Parameters.append MyCommand.CreateParameter("@a",3,1,50,10)
MyCommand.Parameters.append MyCommand.CreateParameter("@b",3,1,50,20)
MyCommand.CommandType = 4
MyCommand.ActiveConnection = conn
MyCommand.CommandText = "MYSQL"
MyCommand.execute
Response.Write(MyCommand.Parameters("@return"))
Set MyCommand = Nothing
conn.close
Set conn = Nothing
%>
'存储过程
'Create PROCEDURE MYSQL
' @a int,
' @b int
'AS
' return @a + @b
'GO
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Driver={SQL Server};server=192.168.1.69;uid=sa;pwd=sa;database=union_5k3g;"
Set MyCommand = Server.CreateObject("ADODB.Command")
MyCommand.Parameters.append MyCommand.CreateParameter("@return",3,4)
MyCommand.Parameters.append MyCommand.CreateParameter("@a",3,1,50,10)
MyCommand.Parameters.append MyCommand.CreateParameter("@b",3,1,50,20)
MyCommand.CommandType = 4
MyCommand.ActiveConnection = conn
MyCommand.CommandText = "MYSQL"
MyCommand.execute
Response.Write(MyCommand.Parameters("@return"))
Set MyCommand = Nothing
conn.close
Set conn = Nothing
%>
注：获取Return返回值的@return一项必须放在@a和@b之前，否则会出错提示"[Microsoft][ODBC SQL Server Driver][SQL Server]为过程或函数 MYSQL 指定的参数太多"!!!
2.获取Output输出参数值
复制内容到剪贴板 程序代码
程序代码<%
'存储过程
'Create PROCEDURE MYSQL
' @a int,
' @b int,
' @c int output
'AS
' Set @c = @a + @b
'GO
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Driver={SQL Server};server=192.168.1.69;uid=sa;pwd=sa;database=union_5k3g;"
Set MyCommand = Server.CreateObject("ADODB.Command")
MyCommand.Parameters.append MyCommand.CreateParameter("@a",3,1,50,20)
MyCommand.Parameters.append MyCommand.CreateParameter("@b",3,1,50,20)
MyCommand.Parameters.append MyCommand.CreateParameter("@c",3,2,50)
MyCommand.CommandType = 4
MyCommand.ActiveConnection = conn
MyCommand.CommandText = "MYSQL"
MyCommand.execute
Response.Write(MyCommand.Parameters("@c"))
Set MyCommand = Nothing
conn.close
Set conn = Nothing
%>
'存储过程
'Create PROCEDURE MYSQL
' @a int,
' @b int,
' @c int output
'AS
' Set @c = @a + @b
'GO
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "Driver={SQL Server};server=192.168.1.69;uid=sa;pwd=sa;database=union_5k3g;"
Set MyCommand = Server.CreateObject("ADODB.Command")
MyCommand.Parameters.append MyCommand.CreateParameter("@a",3,1,50,20)
MyCommand.Parameters.append MyCommand.CreateParameter("@b",3,1,50,20)
MyCommand.Parameters.append MyCommand.CreateParameter("@c",3,2,50)
MyCommand.CommandType = 4
MyCommand.ActiveConnection = conn
MyCommand.CommandText = "MYSQL"
MyCommand.execute
Response.Write(MyCommand.Parameters("@c"))
Set MyCommand = Nothing
conn.close
Set conn = Nothing
%>
评论: 0 | 引用: 0 | 查看次数: 5465
发表评论
请登录后再发表评论！
