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

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

VB.NET & System.Data.OracleClient - DataAdapter() - How to learn Connector/NET ADO.NET component System.Data.OracleClient namespace is the .NET Framework Data Provider for Oracle data source, Using the OracleDataAdapter set of data commands and a database connection that are used to fill the DataSet and update the data source. (Oracle Server Database)

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

Example

DataAdapter.aspx

<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="System.Data.OracleClient"%>
<%@ Page Language="VB" %>
<script runat="server">
Dim objConn As System.Data.OracleClient.OracleConnection
Dim objCmd As System.Data.OracleClient.OracleCommand

Sub Page_Load(sender As Object, e As EventArgs)
Dim strConnString As String
strConnString = "Data Source=TCDB;User Id=myuser;Password=mypassword;"
objConn = New System.Data.OracleClient.OracleConnection(strConnString)
objConn.Open()

BindData()
End Sub

Sub BindData()
'*** DataAdapter & DataTable ***'
'myRepeater.DataSource = CreateDataTable()
'myRepeater.DataBind()

'*** DataAdapter & DataSet ***'
myRepeater.DataSource = CreateDataSet.Tables(0).DefaultView
myRepeater.DataBind()

End Sub

'*** DataAdapter & DataTable ***'
Function CreateDataTable() As DataTable
Dim objConn As New System.Data.OracleClient.OracleConnection
Dim dtAdapter As System.Data.OracleClient.OracleDataAdapter
Dim dt As New DataTable

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

Dim strSQL As String
strSQL = "SELECT * FROM customer"

dtAdapter = New System.Data.OracleClient.OracleDataAdapter(strSQL, objConn)
dtAdapter.Fill(dt)

Return dt '*** Return DataTable ***'

dtAdapter = Nothing

End Function

'*** DataAdapter & DataSet ***'
Function CreateDataSet() As DataSet
Dim objConn As New System.Data.OracleClient.OracleConnection
Dim objCmd As New System.Data.OracleClient.OracleCommand
Dim dtAdapter As New System.Data.OracleClient.OracleDataAdapter

Dim ds As New DataSet
Dim strConnString,strSQL As String

strConnString = "Data Source=TCDB;User Id=myuser;Password=mypassword;"
strSQL = "SELECT * FROM customer"

objConn.ConnectionString = strConnString
With objCmd
.Connection = objConn
.CommandText = strSQL
.CommandType = CommandType.Text
End With
dtAdapter.SelectCommand = objCmd

dtAdapter.Fill(ds)
Return ds '*** Return DataSet ***'

dtAdapter = Nothing

End Function

Sub Page_UnLoad()
objConn.Close()
objConn = Nothing
End Sub

</script>
<html>
<head>
<title>ShotDev.Com Tutorial</title>
</head>
<body>
<form id="form1" runat="server">
<asp:Repeater id="myRepeater" runat="server">
<HeaderTemplate>
<table border="1">
<tr>
<th>CustomerID</th>
<th>Name</th>
<th>Email</th>
<th>CountryCode</th>
<th>Budget</th>
<th>Used</th>
</tr>
</HeaderTemplate>
<ItemTemplate>
<tr>
<td align="center"><%#Container.DataItem("CustomerID") %></td>
<td><%#Container.DataItem("Name") %></td>
<td><%#Container.DataItem("Email") %></td>
<td align="center"><%#Container.DataItem("CountryCode") %></td>
<td align="right"><%#Container.DataItem("Budget") %></td>
<td align="right"><%#Container.DataItem("Used") %></td>
</tr>
</ItemTemplate>
</asp:Repeater>
</form>
</body>
</html>

Screenshot

.
.
.
Download this script.