日韩性视频-久久久蜜桃-www中文字幕-在线中文字幕av-亚洲欧美一区二区三区四区-撸久久-香蕉视频一区-久久无码精品丰满人妻-国产高潮av-激情福利社-日韩av网址大全-国产精品久久999-日本五十路在线-性欧美在线-久久99精品波多结衣一区-男女午夜免费视频-黑人极品ⅴideos精品欧美棵-人人妻人人澡人人爽精品欧美一区-日韩一区在线看-欧美a级在线免费观看

歡迎訪問 生活随笔!

生活随笔

當前位置: 首頁 > 运维知识 > 数据库 >内容正文

数据库

vb对数据库操作用存储过程

發布時間:2023/12/9 数据库 30 豆豆
生活随笔 收集整理的這篇文章主要介紹了 vb对数据库操作用存储过程 小編覺得挺不錯的,現在分享給大家,幫大家做個參考.

存儲過程如下
create? proc sp_recordset
? @bbb int
? as
? select * from aaa where bbb = @bbb
vb代碼如下:

? Dim cmd As ADODB.Command
? Dim conn As ADODB.Connection
? Dim rs As ADODB.Recordset
? Dim ADOPrm
? Set ADOPrm = New ADODB.Parameter
?
?
? Set rs = New ADODB.Recordset
? Set conn = New ADODB.Connection
? conn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=DB_PurchaseOrder;Data Source=."
? conn.Open
?
? Set cmd = New ADODB.Command
? cmd.CommandType = adCmdStoredProc
? cmd.ActiveConnection = conn
? cmd.CommandText = "sp_recordset"
? Set ADOPrm = cmd.CreateParameter("@bbb", adInteger, adParamInput)
? cmd.Parameters.Append ADOPrm
? cmd.Parameters("@bbb").Value = "123"

?? Set rs = cmd.Execute()
?
? MsgBox rs(0) & rs(1)

轉載于:https://www.cnblogs.com/redfox241/archive/2007/08/09/849924.html

總結

以上是生活随笔為你收集整理的vb对数据库操作用存储过程的全部內容,希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網站內容還不錯,歡迎將生活随笔推薦給好友。