首页 | 社区 | 博客 | 招聘 | 文章 | 新闻 | 下载 | 读书 | 代码
亲,您未登录哦! 登录 | 注册

VB.Net调用存储过程并得到返回值

打印文章

分享到:
//存储过程代码

CREATE PROCEDURE [AddNewInvoiceInfo] (@sUserID int,@sClaimMethod varchar(50),@sInvoiceNum

varchar(50),@sInvoiceDate datetime,@sBuyCity varchar(50))AS

Insert Into SMB_InvoiceInfo (MemberID,ClaimMethod,InvoiceNum,InvoiceDate,InvoiceCity) Values

(@sUserID,@sClaimMethod,@sInvoiceNum,@sInvoiceDate,@sBuyCity)

return @@IDENTITY

GO

//调用存储过程代码

Dim CN As New SqlConnection()

Dim InvoiceID As String

Try

CN.ConnectionString = DBConStr

CN.Open()

Dim CMD As SqlCommand

CMD = New SqlCommand(AddNewInvoiceInfo, CN)

CMD.CommandType = CommandType.StoredProcedure

CMD.Parameters.Add(New SqlParameter(@sUserID, SqlDbType.Int))

CMD.Parameters(@sUserID).Value = CInt(UserID.Text)

CMD.Parameters.Add(New SqlParameter(@sClaimMethod, SqlDbType.VarChar, 50))

CMD.Parameters(@sClaimMethod).Value = TransName.Text

CMD.Parameters.Add(New SqlParameter(@sInvoiceNum, SqlDbType.VarChar, 50))

CMD.Parameters(@sInvoiceNum).Value = InvoiceNum.Text

CMD.Parameters.Add(New SqlParameter(@sInvoiceDate, SqlDbType.DateTime))

CMD.Parameters(@sInvoiceDate).Value = InvoiceDate.SelectedDate.Date

CMD.Parameters.Add(New SqlParameter(@sBuyCity, SqlDbType.VarChar, 50))

CMD.Parameters(@sBuyCity).Value = BuyCity.Text

CMD.Parameters.Add(New SqlParameter(@sInvoiceID, SqlDbType.Int))

CMD.Parameters(@sInvoiceID).Direction = ParameterDirection.ReturnValue

CMD.ExecuteNonQuery()

InvoiceID = CMD.Parameters(@sInvoiceID).Value.ToString()

CMD.Dispose()

Catch ex As Exception

Response.Write(ex.ToString())

Finally

CN.Close()

End Try

本栏文章均来自于互联网,版权归原作者和各发布网站所有,本站收集这些文章仅供学习参考之用。任何人都不能将这些文章用于商业或者其他目的。( Pfan.cn )

编程爱好者论坛

本栏最新文章

  • VB.Net调用存储过程并得到返回值
  • 详解VB.NET对象浏览器作用体现
  • 老生常谈:从VB6迁移到VB.net
  • VB.net2008精彩实例,窗体应用技巧
  • 用VB.net2008打造你的影音播放器
  • 一个Office 2003风格的通知控件(VB.NET)
  • 在VB.NET中操作MySQL数据库
  • vb.net开发中使用excel插件的代码
  • vb.net封装组件成com的方法
  • .NET环境下几种不同的邮件发送解决方案
  • 用.net动态创建类的实例
  • VB.NET实现DataList横向数据交替变色
  • 在VB.Net中创建使用控件数组
  • 在Visual Basic .NET 中实现后台进程
  • VB.NET中使用Directsound9之简单播放
  • 用新VB.NET 枚举提高效率
  • 在有Clipboard的应用程序间移动数据
  • VB.NET中的变量范围差异
  • 从Visual Basic 6.0 到 Visual Basic.NET 的转换
  • 微软.Net程序设计FAQ