VB.NET & System.Data.OracleClient - ExecuteNonQuery() - How to learn Connector/NET ADO.NET component System.Data.OracleClient namespace is the .NET Framework Data Provider for Oracle data source, Using the ExecuteNonQuery method for Executes a Transact-SQL statement (Insert/Update/Delete) data and returns the number of rows affected. (Oracle Server Database)
ShotDev Focus:
- VB.NET & System.Data.OracleClient - ExecuteNonQuery()
Example
ExecuteNonQuery.aspx
- <%@ Import Namespace="System.Data"%>
- <%@ Import Namespace="System.Data.OracleClient"%>
- <%@ Page Language="VB" %>
- <script runat="server">
- Sub Page_Load(sender As Object, e As EventArgs)
- Sample1()
- 'Sample2()
- End Sub
- Sub Sample1()
- Dim objConn As System.Data.OracleClient.OracleConnection
- Dim objCmd As System.Data.OracleClient.OracleCommand
- Dim strConnString,strSQL As String
- strConnString = "Data Source=TCDB;User Id=myuser;Password=mypassword;"
- objConn = New System.Data.OracleClient.OracleConnection(strConnString)
- objConn.Open()
- strSQL = "INSERT INTO customer (CustomerID,Name,Email,CountryCode,Budget,Used) " & _
- "VALUES ('C005','Weerachai Nukitram','webmaster@shotdev.com','TH','2000000','1000000')"
- objCmd = New System.Data.OracleClient.OracleCommand()
- With objCmd
- .Connection = objConn
- .CommandType = CommandType.Text
- .CommandText = strSQL
- End With
- objCmd.ExecuteNonQuery()
- lblText.Text = "Record Insert Sucessful."
- objCmd = Nothing
- objConn.Close()
- objConn = Nothing
- End Sub
- Sub Sample2()
- Dim objConn As System.Data.OracleClient.OracleConnection
- Dim objCmd As System.Data.OracleClient.OracleCommand
- Dim strConnString,strSQL As String
- strConnString = "Data Source=TCDB;User Id=myuser;Password=mypassword;"
- objConn = New System.Data.OracleClient.OracleConnection(strConnString)
- objConn.Open()
- strSQL = "INSERT INTO customer (CustomerID,Name,Email,CountryCode,Budget,Used) " & _
- "VALUES ('C005','Weerachai Nukitram','webmaster@shotdev.com','TH','2000000','1000000')"
- objCmd = New System.Data.OracleClient.OracleCommand(strSQL,objConn)
- Try
- objCmd.ExecuteNonQuery()
- lblText.Text = "Record Insert Sucessful."
- Catch ex As Exception
- lblText.Text = "Record Cannot Insert : Error (" & ex.Message & ")"
- End Try
- objCmd = Nothing
- objConn.Close()
- objConn = Nothing
- End Sub
- </script>
- <html>
- <head>
- <title>ShotDev.Com Tutorial</title>
- </head>
- <body>
- <form id="form1" runat="server">
- <asp:Label id="lblText" runat="Server"></asp:Label>
- </form>
- </body>
- </html>
Screenshot
.
.
.
Download this script.
Loading ...
3putrefaction…
…