ARTICLE

Showing Data In Gridview Using Application State in VB.NET

Posted by Satyapriya Nayak Articles | ASP.NET using VB.NET August 29, 2011
In this article we will know how to display data from the database into a Gridview by using Application State object.
Reader Level:

In this article we will know how to display data from the database into a Gridview by using Application State object.

Application State: - We can declare variables, objects in the application state. If we assign any value in the application state it can be globally accessed in any WebPages of the current application.

Program

First add a Global Application Class to the current application.

Global.asax code

<%@ import Namespace="System.Data" %>

<%@ import Namespace="System.Data.SqlClient" %>

<%@ Application Language="VB" %>

<script runat="server">

    Dim strConnString As String = System.Configuration.ConfigurationManager.ConnectionStrings.Item("ConnectionString").ToString()

    Dim con As New SqlConnection(strConnString)

    Dim str As String

    Dim com As SqlCommand

    Dim ds As DataSet

    Dim da As SqlDataAdapter

    Sub Application_Start(ByVal sender As Object, ByVal e As EventArgs)

        ' Code that runs on application startup

        Application("sqlconstring") = str

        Application("sqlcon") = con

        Application("sqlcom") = com

        Application("sqldataset") = ds

        Application("sqldataadapter") = da

    End Sub

    Sub Application_End(ByVal sender As Object, ByVal e As EventArgs)

        ' Code that runs on application shutdown

    End Sub     

    Sub Application_Error(ByVal sender As Object, ByVal e As EventArgs)

        ' Code that runs when an unhandled error occurs

    End Sub

    Sub Session_Start(ByVal sender As Object, ByVal e As EventArgs)

        ' Code that runs when a new session is started

    End Sub

    Sub Session_End(ByVal sender As Object, ByVal e As EventArgs)

        ' Code that runs when a session ends.

        ' Note: The Session_End event is raised only when the sessionstate mode

        ' is set to InProc in the Web.config file. If session mode is set to StateServer

        ' or SQLServer, the event is not raised.

    End Sub  

</script>

Default.aspx code

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>

<!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>Untitled Page</title>

</head>

<body>

    <form id="form1" runat="server">

    <div>

    <asp:GridView ID="GridView1" BackColor="#FF9999" runat="server">

    <HeaderStyle BackColor="#FFCC99" />

    </asp:GridView><br />

    <asp:Button ID="Button1" runat="server" Text="Display Records" />

    </div>

    </form>

</body>

</html>

Default.aspx.vb code

Imports System.Data

Imports System.Data.SqlClient

Partial Class _Default

    Inherits System.Web.UI.Page

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

        Try

            Application("sqlcon").open()

            Application("sqlconstring") = "select * from employee"

            Application("sqlcom") = New SqlCommand(Application("sqlconstring"), Application("sqlcon"))

            Application("sqldataadapter") = New SqlDataAdapter(Application("sqlcom"))

            Application("sqldataset") = New DataSet

            Application("sqldataadapter").fill(Application("sqldataset"), "employee")

            GridView1.DataSource = Application("sqldataset")

            GridView1.DataMember = "employee"

            GridView1.DataBind()

            Application("sqlcon").close()

        Catch ex As Exception

            Response.Write(ex.Message)

        End Try

    End Sub

End Class

Output

sa2.gif

Thanks for reading

Login to add your contents and source code to this article
share this article :
post comment
 
Become a Sponsor
PREMIUM SPONSORS
  • ceTE software specializes in components for dynamic PDF generation and manipulation. The DynamicPDF™ product line allows you to dynamically generate PDF documents, merge PDF documents and new content to existing PDF documents from within your applications. Visit DynamicPDF here
    Finally – a virtual platform that delivers next-generation Windows Server 2008 Hyper-V virtualization technology from a managed hosting partner you can truly depend on. Visit www.maximumasp.com/max for a FREE 30 day trial. Hurry offer ends soon. Climb aboard the MaxV platform and take advantage of High Availability, Intelligent Monitoring, Recurrent Backups, and Scalability – with no hassle or hidden fees. As a managed hosting partner focused solely on Microsoft technologies since 2000, MaximumASP is uniquely qualified to provide the superior support that our business is built on. Unparalleled expertise with Microsoft technologies lead to working directly with Microsoft as first to offer IIS 7 and SQL 2008 betas in a hosted environment; partnering in the Go Live Program for Hyper-V; and product co-launches built on WS 2008 with Hyper-V technology.
Team Foundation Server Hosting
Become a Sponsor