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

Author: admin | Posted: 14-06-2010 | Category: VB.NET & System.Data.Odbc

VB.NET & System.Data.Odbc - ExecuteScalar() - How to learn Connector/NET ADO.NET component System.Data.Odbc namespace is the .NET Framework Data Provider for ODBC 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.

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

Example

ExecuteScalar.aspx

<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="System.Data.Odbc"%>
<%@ 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.Odbc.OdbcConnection
Dim objCmd As System.Data.Odbc.OdbcCommand
Dim strConnString,strSQL As String
Dim myScalar As Object

strConnString = "DSN=mydatabase;UID=;PWD=;"
objConn = New System.Data.Odbc.OdbcConnection(strConnString)
objConn.Open()

strSQL = "SELECT MAX(Used) FROM customer"

objCmd = New System.Data.Odbc.OdbcCommand()
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.