VB.NET & System.Data.OracleClient - ExecuteScalar()

Author: admin | Posted: 13-06-2010 | Category: VB.NET & System.Data.OracleClient

VB.NET & System.Data.OracleClient - ExecuteScalar() - How to learn Connector/NET ADO.NET component System.Data.OracleClient namespace is the .NET Framework Data Provider for Oracle data source, Using the ExecuteScalar method for Executes the query, and returns the first column of the first row in the result set returned by the query (Oracle Server Database)

ShotDev Focus:
- VB.NET & System.Data.OracleClient - ExecuteScalar()

Example

ExecuteScalar.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)
Dim myValue As Object
myValue = exExecuteScalar()
lblText.Text = myValue.ToString()
End Sub

Function exExecuteScalar() As Object
Dim objConn As System.Data.OracleClient.OracleConnection
Dim objCmd As System.Data.OracleClient.OracleCommand
Dim strConnString,strSQL As String
Dim myScalar As Object

strConnString = "Data Source=TCDB;User Id=myuser;Password=mypassword;"
objConn = New System.Data.OracleClient.OracleConnection(strConnString)
objConn.Open()

strSQL = "SELECT MAX(Used) FROM customer"

objCmd = New System.Data.OracleClient.OracleCommand()
With objCmd
.Connection = objConn
.CommandType = CommandType.Text
.CommandText = strSQL
End With

myScalar = objCmd.ExecuteScalar()

objCmd = Nothing
objConn.Close()
objConn.Close()
objConn = Nothing

Return myScalar
End Function

</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.