在.net中调用存储过程的另一种方法

来源：vlan9.com 作者： 出处：巧巧读书 2006-03-14 进入讨论组

• 关 键 词：
• 调用存储过程
• word
• .net

[存储过程] 

CREATE PROCEDURE Test_procedure @cid int ,@y int, @n varchar(10) output 

AS 

select * from city where cid=@cid 

if @y=1 

begin 

set @n = '成功！' 

return 0 

end 

else 

begin 

set @n = '失败！' 

return -1 

end 

GO 

[程序中调用存储过程]  

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 

Dim conn As OleDbConnection 

Try 

conn = New OleDbConnection("provider=sqloledb;data source=localhost;user id=sa;password=;initial catalog=jiang") 

Dim cmd As New OleDbCommand(" {? = call Test_procedure(?,?,?)}", conn) 

conn.Open() 

With cmd 

.CommandType = CommandType.Text ‘这句可以省略，因为是默认设置，但这里还是显式地写出以引起注意 

.Parameters.Add("@retval", OleDbType.Integer) 

.Parameters.Add("@cid", OleDbType.Integer) 

.Parameters.Add("@y", OleDbType.Integer) 

.Parameters.Add("@n", OleDbType.VarChar, 10) 

.Parameters("@n").Direction = ParameterDirection.Output 

.Parameters("@retval").Direction = ParameterDirection.ReturnValue 

.Parameters("@cid").Value = 1 

.Parameters("@y").Value = 1 

.ExecuteNonQuery() 

MessageBox.Show(.Parameters("@n").Value) ‘测试结果为“成功！” 

End With 

Catch ex As Exception 

MessageBox.Show(ex.ToString) 

Finally 

conn.Close() 

End Try 

End Sub

文字：http://www.qqread.com/dotnet/e952882000.html 更多内容请看存储过程、网络存储—光纤通道、.NET移动与嵌入式技术专题，或进入讨论组讨论。

【收藏此文】【大 中 小】【打印】【关闭】

较早的文章：.net如何实现页面间的参数传递(1)

较新的文章：.NET ：消息与AOP(1)