在.net中调用存储过程的另一种方法。cmd.commandtype为commandtypetext

王朝c#·作者佚名  2006-01-31
窄屏简体版  字體: |||超大  

[存储过程]

‘//////////////////////////////////////////////////////////////////////////////////////////

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

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航