ASP.NET(vb.net) & FormView - Oracle Database - System.Data.OracleClient Example scripts how to use FormView control in asp.net , Using Connector System.Data.OracleClient namespace is the .NET Framework Data Provider for Oracle, how to the connect to Oracle Database.
ShotDev Focus:
- ASP.NET(vb.net) & FormView - Oracle Database - System.Data.OracleClient
Example
FormView1.aspx
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="FormView1.aspx.vb" Inherits="FormView1" %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml" > <head runat="server"> <title>ShotDev.Com Tutorial</title> </head> <body> <form id="form1" runat="server"> <asp:FormView id="myFormView" runat="server" AllowPaging="True"> <ItemTemplate> <table width="500" cellpadding="5" border="0"> <tr> <td valign="top" align="center"> <asp:Image id="Image1" runat="server"/> <br /> <h2><asp:Label id="lblGalleryName" runat="server"></asp:Label></h2> </td> </tr> </table> </ItemTemplate> </asp:FormView> </form> </body> </html>
FormView1.aspx.vb
Imports System.Data Imports System.Data.OracleClient Partial Class FormView1 Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load IF Not Page.IsPostBack() Then BindData() End IF End Sub Sub BindData() Dim objConn As OracleConnection Dim objCmd As OracleCommand Dim dtAdapter As New OracleDataAdapter Dim strConnString As String strConnString = "Data Source=TCDB;User Id=myuser;Password=mypassword;" objConn = New OracleConnection(strConnString) objConn.Open() Dim strSQL As String Dim ds As New DataSet strSQL = "SELECT * FROM gallery " objCmd = New OracleCommand With objCmd .Connection = objConn .CommandText = strSQL .CommandType = CommandType.Text End With dtAdapter.SelectCommand = objCmd dtAdapter.Fill(ds) '*** BindData to FormView ***' myFormView.DataSource = ds myFormView.DataBind() ds = Nothing objConn.Close() objConn = Nothing End Sub Protected Sub myFormView_DataBound(ByVal sender As Object, ByVal e As System.EventArgs) Handles myFormView.DataBound '*** Image ***' Dim Image1 As Image = CType(myFormView.FindControl("Image1"), Image) If Not IsNothing(Image1) Then Image1.ImageUrl = "images/" & myFormView.DataItem("Picture") Image1.Attributes.Add("OnClick", "window.open('images/" & myFormView.DataItem("Picture") & "')") Image1.Style.Add("cursor", "hand") Image1.ToolTip = myFormView.DataItem("GalleryName") End If '*** GalleryName ***' Dim lblGalleryName As Label = CType(myFormView.FindControl("lblGalleryName"), Label) If Not IsNothing(lblGalleryName) Then lblGalleryName.Text = myFormView.DataItem("GalleryName") End If End Sub Protected Sub myFormView_PageIndexChanging(ByVal sender As Object, ByVal e As FormViewPageEventArgs) Handles myFormView.PageIndexChanging myFormView.PageIndex = e.NewPageIndex BindData() End Sub End Class
Create a asp.net file and save to path root-path/dotnet/
Run
http://localhost/dotnet/FormView1.aspx
Screenshot
1snapshot…
…