Page Lifecycle ASP.Net Tutorial

  1. Home
  2. ASP.Net Tutorial
  3. Page Lifecycle
  4. Aspx page inherits from a Page class (vb net)
<%@ Page  Inherits="ParentPage" src="Default.aspx.vb" %>

   
      
   
                          runat="server" 
                    AutoGenerateColumns="True" />
      
   

File: Default.aspx.vb
Imports System
Imports System.Web
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Data
Imports System.Data.OleDb
Public Class ParentPage : Inherits Page
   public lblMessage as Label
   public DataGrid1 as DataGrid
   
   private strConnString as string = "Provider=" & _
      "Microsoft.Jet.OLEDB.4.0;" & _
      "Data Source=yourDatabase.mdb"
   private objConn as new OleDbConnection(strConnString)
   
   sub Page_Load(Sender as Object, e as EventArgs) 
      if Not Page.IsPostBack then
         FillDataGrid()
      end if
   end sub
   private sub FillDataGrid(Optional EditIndex as integer=-1)
      dim objCmd as OleDbCommand = new OleDbCommand("select * from tblUsers", objConn)
      dim objReader as OleDbDataReader
       
      try
         objCmd.Connection.Open()
         objReader = objCmd.ExecuteReader
      catch ex as OleDbException
         lblMessage.Text = "Error retrieving from the database."
      end try
       
      DataGrid1.DataSource = objReader
      DataGrid1.DataBind()
       
      objReader.Close
      objCmd.Connection.Close()
   end sub
    
End Class