詳談如何在VB.NET使用ORACLR數據庫事務
大家都知道VB.NET，oracle，但是如何在VB.NET使用ORACLE數據庫呢，我想這個問題很多人都不知道怎么解決，在這里給大家演示一個示例吧。Oracle.DataAccess.Client 命名空間是 ODP.NET 的一部分，它包含許多類，其中有OracleConnection、OracleCommand 和 OracleTransaction。示例程序用到了這些類。
VB.NET使用ORACLR第 1 步
創建一個 OracleConnection 對象連接到 Oracle 數據庫，然后打開該連接。
在 C# 中：
- OracleConnection myOracleConnection =new OracleConnection(
- "User Id=store;Password=store;Data Source=ORCL"
- );
- myOracleConnection.Open();
在 VB.NET 中:
- Dim myOracleConnection As New OracleConnection( _
- "User Id=store;Password=store;Data Source=ORCL")
- myOracleConnection.Open()
User Id 和 Password 屬性指定了您所要連接到的模式的數據庫用戶和口令。Data Source 屬性指定了數據庫的 Oracle Net 服務名稱；初始數據庫的默認服務名稱為 ORCL。如果您使用的不是初始數據庫，或者您的服務名稱不同，那么您需要在程序中修改 Data Source 屬性的設置。
VB.NET使用ORACLR第 2 步
創建一個 OracleTransaction 對象，然后調用 OracleConnection 對象的 BeginTransaction() 方法啟動事務。
在 C# 中：
- OracleTransaction myOracleTransaction =
- myOracleConnection.BeginTransaction();
- In VB.NET:
- Dim myOracleTransaction As OracleTransaction = _
- myOracleConnection.BeginTransaction()
VB.NET使用ORACLR第3 步
創建一個 OracleCommand 對象，用于存儲 SQL 語句。
在 C# 中：
- OracleCommand myOracleCommand = myOracleConnection.CreateCommand();
在 VB.NET 中：
- Dim myOracleCommand As OracleCommand =
- myOracleConnection.CreateCommand
因為 OracleCommand 對象使用 OracleConnection 對象的 CreateCommand() 方法創建的，所以它自動使用在第 2 步中為 OracleConnection 對象設置的事務。
VB.NET使用ORACLR第 4 步
將 OracleCommand 對象的 CommandText 屬性設為向表 product_types 中添加一行的第一條 INSERT 語句。
在 C# 中：
- myOracleCommand.CommandText =
- "INSERT INTO product_types (" +
- " product_type_id, name" +
- ") VALUES (" +
- " 3, 'Magazine'" +
- ")";
在 VB.NET 中：
- myOracleCommand.CommandText = _
- "INSERT INTO product_types (" & _
- " product_type_id, name" & _
- ") VALUES (" & _
- " 3, 'Magazine'" & _
- ")"
VB.NET使用ORACLR第 5 步
使用 OracleCommand 對象的 ExecuteNonQuery() 方法運行 INSERT 語句。
在 C# 中：
- myOracleCommand.ExecuteNonQuery();
在 VB.NET 中：
- myOracleCommand.ExecuteNonQuery();
VB.NET使用ORACLR第 6 和第 7 步
將 OracleCommand 對象的 CommandText 屬性設為向表 Products 中添加一行的第二條 INSERT 語句，并運行它。
在 C# 中：
- myOracleCommand.CommandText =
- "INSERT INTO products (" +
- " product_id, product_type_id, name, description, price" +
- ") VALUES (" +
- " 5, 3, 'Oracle Magazine', 'Magazine about Oracle', 4.99" +
- ")";
- myOracleCommand.ExecuteNonQuery();
在 VB.NET 中：
- myOracleCommand.CommandText = _
- "INSERT INTO products (" & _
- " product_id, product_type_id, name, description, price" & _
- ") VALUES (" & _
- " 5, 3, 'Oracle Magazine', 'Magazine about Oracle', 4.99" & _
- ")"
- myOracleCommand.ExecuteNonQuery()
VB.NET使用ORACLR第 8 步
使用 OracleTransaction 對象的 Commit() 方法提交數據庫中的事務。
在 C# 中：
- myOracleTransaction.Commit();
在 VB.NET 中：
- myOracleTransaction.Commit()
在完成 Commit() 方法之后，由 INSERT 語句添加的兩行將在數據庫中永久記錄。
VB.NET使用ORACLR第 9 步
使用 Close() 方法關閉 OracleConnection 對象。
在 C# 中：
- myOracleConnection.Close();
在 VB.NET 中：
- myOracleConnection.Close()
編譯并運行示例程序
要編譯 C# 示例程序，您可以使用 csc 命令運行 C# 編譯器。因為程序使用 Oracle Data Access DLL，所以您應使用 /r 選項指定該 DLL 的完整路徑，例如：
注意：您需要用您計算機上的相應路徑來替換該 DLL 的路徑。此外，如果您的計算機找不到 csc 編譯器，那么您可能需要運行 Microsoft sdkvars.bat 腳本來首先設置 .NET SDK 的環境變量；您可以在安裝 .NET SDK 的 bin 目錄中找到該腳本。
如果您遇到以下錯誤：
- Example1.cs(10,7):error CS0246:The type or namespace name 'Oracle'
- could not be found (are you missing a using
- directive or an assembly reference?)
這說明您沒有在編譯命令中正確指定 Oracle Data Access DLL。（有關設置的信息，請參閱 John Paul Cook 的技術文章“在 Oracle 數據庫上構建 .NET 應用程序”。）
下面是用于編譯 VB.NET 程序的等價命令：
- vbc TransExample1.vb /r:C:\oracle\product\10.1.0\
- Client_1\bin\Oracle.DataAccess.dll /r:system.dll /r:system.data.dll
接下來，輸入以下命令，運行示例：
- An exception was thrown
- Message = ORA-12514:TNS:listener does not currently know
- of service requested in connect descriptor
您將看到程序的輸出。不過，如果您遇到類似以下的異常
這說明 OracleConnection 對象的連接字符串中的 Data Source 的設置不正確。您應當咨詢您的 DBA 或查閱 Oracle Net 文檔以獲得更多詳細信息。
如果您使用的是 VS .NET，那么您可以遵循以下指示來編譯和運行 C# 程序 TransExample1.cs：
創建一個新的 C# 控制臺應用程序。File>New Project，然后選擇 Visual C# Projects，Console Application。
將項目命名為 TransExample1。用 TransExample1.cs 中的代碼替換 VS .NET 生成的所有代碼。選擇 Project>Add Reference 添加對 Oracle.DataAccess.dll 的引用，然后瀏覽至您安裝 ODP.NET 的目錄（在我的計算機上，它是 C:\oracle\product\10.1.0\Client_1\bin\Oracle.DataAccess.dll），然后雙擊 Oracle.DataAccess.dll。
選擇 Debug>Start without Debugging 運行該程序。要編譯和運行 TransExample1.vb，您可以執行類似的一系列步驟，但第 1 步應選擇一個 Visual Basic 控制臺應用程序，并在第 3 步用 TransExample1.vb 中的代碼替換生成的代碼。
查看程序的運行結果
當您運行完 C# 或 VB .NET 程序時，您可以在 SQL*Plus 中使用以下 SELECT 語句查看事務的結果：
- SELECT p.product_id, p.product_type_id, pt. name, p.name, p.description, p.price
- FROM products p, product_types pt
- WHERE p.product_type_id = pt.product_type_id
- AND p.product_id = 5;
- 您將看到以下結果： PRODUCT_ID PRODUCT_TYPE_ID NAME NAME
- ---------- --------------- ---------- -----------------------
- DESCRIPTION PRICE
- -------------------------------------------------- ----------
- 5 3 Magazine Oracle Magazine
- Magazine about Oracle 4.99
【編輯推薦】
