人人做人人澡人人爽欧美,国产主播一区二区,久久久精品五月天,羞羞视频在线观看免费

當前位置:蘿卜系統下載站 > 技術開發教程 > 詳細頁面

用vb.net設置ms access存儲過程(1)

用vb.net設置ms access存儲過程(1)

更新時間:2022-07-01 文章作者:未知 信息來源:網絡 閱讀次數:

1.存儲過程在access中如何運行?
 不像access中的其他對象或者ms sql中可以有直觀的設計界面,在access中的存儲過程,沒有這些,所以我們不能在access中建立他們,我將向大家展示在ado.net中如何操作他們。
2。創建存儲過程
我們需要使用一段sql語句來創建存儲過程,我們使用事例數據庫Northwind 來說明我們的例子。
一個簡單的存儲過程
 "CREATE PROC procProductsList AS SELECT * FROM Products;"
CREATE PROC procProductsList 意思是創建存儲過程as 后面可以是任何有效的sql語句。
 但是有的時候我們需要制定某一參數,比如我們要刪除指定ProductsID 的記錄,這時就需要這樣的存儲過程。"CREATE PROC procProductsDeleteItem(inProductsID LONG)" & _
"AS DELETE FROM Products WHERE ProductsID = inProductsID;" 在給出一個更復雜的:
"CREATE PROC procProductsAddItem(inProductName VARCHAR(40), " & _
"inSupplierID LONG, inCategoryID LONG) " & _
"AS INSERT INTO Products (ProductName, SupplierID, CategoryID) " & _
"Values (inProductName, inSupplierID, inCategoryID);""CREATE PROC procProductsUpdateItem(inProductID LONG, " & _
" inProductName VARCHAR(40)) " & _
"AS UPDATE Products SET ProductName = inProductName " & _
"WHERE ProductID = inProductID;"好了,原理已經知道了。我們把這些綜合一下做一個模塊,豈不更好,說干就干。

Imports SystemImports System.DataImports System.Data.OleDbModule CreateSPSub Main()ProductsProcs()End Sub' Products Stored Procs to be added to the db.Sub ProductsProcs()Dim sSQL As String' procProductsList - Retrieves entire tablesSQL = "CREATE PROC procProductsList AS SELECT * FROM Products;"CreateStoredProc(sSQL)' procProductsDeleteItem - Returns the details (one record) from the ' JobTitle tablesSQL = "CREATE PROC procProductsDeleteItem(@ProductID LONG) AS " _& "DELETE FROM Products WHERE ProductID = @ProductID;"CreateStoredProc(sSQL)' procProductsAddItem - Add one record to the JobTitle tablesSQL = "CREATE PROC procProductsAddItem(inProductName VARCHAR(40), " _& "inSupplierID LONG, inCategoryID LONG) AS INSERT INTO " _& "Products (ProductName, SupplierID, CategoryID) Values " _& "(inProductName, inSupplierID, CategoryID);"CreateStoredProc(sSQL)' procProductsUpdateItem - Update one record on the JobTitle tablesSQL = "CREATE PROC procProductsUpdateItem(inProductID LONG, " _& "inProductName VARCHAR(40)) AS UPDATE Products SET " _& "ProductName = inProductName WHERE ProductID = inProductID;"CreateStoredProc(sSQL)End Sub' Execute the creation of Stored ProceduresSub CreateStoredProc(ByVal sSQL As String)Dim con As OleDbConnectionDim cmd As OleDbCommand = New OleDbCommand()Dim da As OleDbDataAdapter' Change Data Source to the location of Northwind.mdb on your local ' system.Dim sConStr As String = "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data " _& "Source=C:\Program Files\Microsoft " _& "Office\Office10\Samples\Northwind.mdb"con = New OleDbConnection(sConStr)cmd.Connection = concmd.CommandText = sSQLcon.Open()cmd.ExecuteNonQuery()con.Close()End SubEnd Module
(未完待續)

溫馨提示:喜歡本站的話,請收藏一下本站!

本類教程下載

系統下載排行

網站地圖xml | 網站地圖html
主站蜘蛛池模板: 东港市| 皋兰县| 蓝田县| 弥渡县| 潍坊市| 黎平县| 屏边| 囊谦县| 武夷山市| 津市市| 荆州市| 长沙市| 五莲县| 江源县| 江川县| 余姚市| 麻阳| 元阳县| 高安市| 阿拉善左旗| 绥阳县| 东乡族自治县| 纳雍县| 新晃| 图木舒克市| 宜章县| 普洱| 丹凤县| 霍邱县| 金沙县| 潼南县| 南郑县| 汽车| 余姚市| 正镶白旗| 鲜城| 蕉岭县| 都昌县| 吐鲁番市| 洮南市| 安图县|