Wrox Home  
Search P2P Archive for: Go

  Return to Index  

aspx_beginners thread: Help with populating dropdown list from table


Message #1 by m.murray@s... on Thu, 19 Dec 2002 12:19:39
Hi there

I'm trying to populate a dropdown list "drpContactTypes" from a table in 
my SQL Server. It won't work - what am i doing wrong?

Cheers in advance!

Matt

********************
From the Global.asax
********************
  Sub Session_Start(ByVal sender As Object, ByVal e As EventArgs)
        ' Fires when the session is started
        Session("ContactMgmt") = SqlConnection1
        'data adapters
        Session("adptCalls") = SqlDataAdapter1
        Session("adptContactTypes") = SqlDataAdapter2
        Session("adptContacts") = SqlDataAdapter3
        'data sets
        Session("dsCalls") = DsCalls
        Session("dsContactTypes") = DsContactTypes
        Session("dsContacts") = DsContacts
    End Sub
**********************


***************
addcontact.aspx
***************
<%@ Page Language="vb" AutoEventWireup="false" 
Codebehind="AddContact.aspx.vb" Inherits="ContactManagement.AddContact"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>AddContact</title>
<meta content="Microsoft Visual Studio.NET 7.0" name="GENERATOR">
<meta content="Visual Basic 7.0" name="CODE_LANGUAGE">
<meta content="JavaScript" name="vs_defaultClientScript">
<meta content="http://schemas.microsoft.com/intellisense/ie5" 
name="vs_targetSchema">
</HEAD>
<body>
<form id="Form1" method="post" runat="server">
<h1>Add a Contact</h1>
<P>First Name:
<asp:textbox id="txtFirstName" runat="server"></asp:textbox></P>
<P>Last Name:
<asp:textbox id="txtLastName" runat="server"></asp:textbox></P>
<P>Address:
<asp:textbox id="txtAddress" runat="server" 
TextMode="MultiLine"></asp:textbox></P>
<P>City:
<asp:textbox id="txtCity" runat="server"></asp:textbox></P>
<P>State:
<asp:dropdownlist id=drpStates runat="server" DataSource="<%# arrState %>">
</asp:dropdownlist></P>
<P>ZIP:
<asp:textbox id="txtZIP" runat="server"></asp:textbox></P>
<P>Home Phone:
<asp:textbox id="txtHomePhone" runat="server"></asp:textbox></P>
<P>Work Phone:
<asp:textbox id="txtWorkPhone" runat="server"></asp:textbox></P>
<P>Notes:
<asp:textbox id="txtNotes" runat="server" 
TextMode="MultiLine"></asp:textbox></P>

'*******************
'here it is!!!!
'*******************

<P>Contact Type:
<asp:dropdownlist id="drpContactTypes" 
runat="server"></asp:dropdownlist></P>	

<P><asp:button id="butAdd" runat="server" 
Text="Add"></asp:button><asp:button id="butCancel" runat="server" 
Text="Cancel"></asp:button></P>
<P><asp:literal id="litStatus" runat="server"></asp:literal></P>
<P><asp:hyperlink id="HyperLink1" runat="server" 
NavigateUrl="SwitchBoard.aspx"><< Return to Switchboard</asp:hyperlink></P>
</form>
</body>
</HTML>
******************



******************
addcontact.aspx.vb
******************

Imports System.Data
Imports System.Data.SqlClient

Public Class AddContact
    Inherits System.Web.UI.Page
    Protected WithEvents txtFirstName As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtLastName As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtAddress As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtCity As System.Web.UI.WebControls.TextBox
    Protected WithEvents drpStates As 
System.Web.UI.WebControls.DropDownList
    Protected WithEvents txtZIP As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtHomePhone As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtWorkPhone As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtNotes As System.Web.UI.WebControls.TextBox
    Protected WithEvents drpContactTypes As 
System.Web.UI.WebControls.DropDownList
    Protected WithEvents butAdd As System.Web.UI.WebControls.Button
    Protected WithEvents butCancel As System.Web.UI.WebControls.Button
    Protected WithEvents litStatus As System.Web.UI.WebControls.Literal
    Protected WithEvents HyperLink1 As System.Web.UI.WebControls.HyperLink

#Region " Web Form Designer Generated Code "
#End Region

    Dim ContactMgmt As SqlConnection
    Dim adptContactTypes As SqlDataAdapter
    Dim adptContacts As SqlDataAdapter
    Dim dsContacts As New dsContacts()
    'these variables are public for data binding
    Public dsContactTypes As New dsContactTypes()
    Public arrState As String() = {"AL", "AK", "AR", "AZ", _
        "CA", "CO", "CT", "DE", "FL", "GA", "HI", "ID", "IL", _
        "IN", "IA", "KS", "KY", "LA", "MA", "ME", "MD", "MI", _
        "MN", "MO", "MS", "MT", "NC", "ND", "NE", "NH", "NJ", _
        "NM", "NV", "NY", "OH", "OK", "OR", "PA", "RI", "SC", _
        "SD", "TN", "TX", "UT", "VA", "VT", "WA", "WI", "WY"}


    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles MyBase.Load
        'Put user code to initialize the page here
        'get the connection and adapters from session state
        ContactMgmt = Session("ContactMgmt")
        adptContactTypes = Session("adptContactTypes")
        adptContacts = Session("adptContacts")
        'fill the contacttype data set 
        adptContactTypes.Fill(dsContacts)
        'fill the contacts data set
        adptContacts.Fill(dsContacts)
        'bind to data - populates dprContactTypes and drpState lists
        drpContactTypes.DataBind()
        drpStates.DataBind()
    End Sub

End Class





Message #2 by "Peter Lanoie" <planoie@n...> on Thu, 19 Dec 2002 11:35:57 -0500
Unlike all your other drop downs, drpContactTypes does not have a datasource
specified.

Before:
	drpContactTypes.DataBind()
Add:
	drpContactTypes.DataSource = <your contact type data source here>


-----Original Message-----
From: m.murray@s... [mailto:m.murray@s...]
Sent: Thursday, December 19, 2002 12:20
To: aspx_beginners
Subject: [aspx_beginners] Help with populating dropdown list from table


Hi there

I'm trying to populate a dropdown list "drpContactTypes" from a table in
my SQL Server. It won't work - what am i doing wrong?

Cheers in advance!

Matt

********************
From the Global.asax
********************
  Sub Session_Start(ByVal sender As Object, ByVal e As EventArgs)
        ' Fires when the session is started
        Session("ContactMgmt") = SqlConnection1
        'data adapters
        Session("adptCalls") = SqlDataAdapter1
        Session("adptContactTypes") = SqlDataAdapter2
        Session("adptContacts") = SqlDataAdapter3
        'data sets
        Session("dsCalls") = DsCalls
        Session("dsContactTypes") = DsContactTypes
        Session("dsContacts") = DsContacts
    End Sub
**********************


***************
addcontact.aspx
***************
<%@ Page Language="vb" AutoEventWireup="false"
Codebehind="AddContact.aspx.vb" Inherits="ContactManagement.AddContact"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>AddContact</title>
<meta content="Microsoft Visual Studio.NET 7.0" name="GENERATOR">
<meta content="Visual Basic 7.0" name="CODE_LANGUAGE">
<meta content="JavaScript" name="vs_defaultClientScript">
<meta content="http://schemas.microsoft.com/intellisense/ie5"
name="vs_targetSchema">
</HEAD>
<body>
<form id="Form1" method="post" runat="server">
<h1>Add a Contact</h1>
<P>First Name:
<asp:textbox id="txtFirstName" runat="server"></asp:textbox></P>
<P>Last Name:
<asp:textbox id="txtLastName" runat="server"></asp:textbox></P>
<P>Address:
<asp:textbox id="txtAddress" runat="server"
TextMode="MultiLine"></asp:textbox></P>
<P>City:
<asp:textbox id="txtCity" runat="server"></asp:textbox></P>
<P>State:
<asp:dropdownlist id=drpStates runat="server" DataSource="<%# arrState %>">
</asp:dropdownlist></P>
<P>ZIP:
<asp:textbox id="txtZIP" runat="server"></asp:textbox></P>
<P>Home Phone:
<asp:textbox id="txtHomePhone" runat="server"></asp:textbox></P>
<P>Work Phone:
<asp:textbox id="txtWorkPhone" runat="server"></asp:textbox></P>
<P>Notes:
<asp:textbox id="txtNotes" runat="server"
TextMode="MultiLine"></asp:textbox></P>

'*******************
'here it is!!!!
'*******************

<P>Contact Type:
<asp:dropdownlist id="drpContactTypes"
runat="server"></asp:dropdownlist></P>

<P><asp:button id="butAdd" runat="server"
Text="Add"></asp:button><asp:button id="butCancel" runat="server"
Text="Cancel"></asp:button></P>
<P><asp:literal id="litStatus" runat="server"></asp:literal></P>
<P><asp:hyperlink id="HyperLink1" runat="server"
NavigateUrl="SwitchBoard.aspx"><< Return to Switchboard</asp:hyperlink></P>
</form>
</body>
</HTML>
******************



******************
addcontact.aspx.vb
******************

Imports System.Data
Imports System.Data.SqlClient

Public Class AddContact
    Inherits System.Web.UI.Page
    Protected WithEvents txtFirstName As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtLastName As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtAddress As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtCity As System.Web.UI.WebControls.TextBox
    Protected WithEvents drpStates As
System.Web.UI.WebControls.DropDownList
    Protected WithEvents txtZIP As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtHomePhone As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtWorkPhone As System.Web.UI.WebControls.TextBox
    Protected WithEvents txtNotes As System.Web.UI.WebControls.TextBox
    Protected WithEvents drpContactTypes As
System.Web.UI.WebControls.DropDownList
    Protected WithEvents butAdd As System.Web.UI.WebControls.Button
    Protected WithEvents butCancel As System.Web.UI.WebControls.Button
    Protected WithEvents litStatus As System.Web.UI.WebControls.Literal
    Protected WithEvents HyperLink1 As System.Web.UI.WebControls.HyperLink

#Region " Web Form Designer Generated Code "
#End Region

    Dim ContactMgmt As SqlConnection
    Dim adptContactTypes As SqlDataAdapter
    Dim adptContacts As SqlDataAdapter
    Dim dsContacts As New dsContacts()
    'these variables are public for data binding
    Public dsContactTypes As New dsContactTypes()
    Public arrState As String() = {"AL", "AK", "AR", "AZ", _
        "CA", "CO", "CT", "DE", "FL", "GA", "HI", "ID", "IL", _
        "IN", "IA", "KS", "KY", "LA", "MA", "ME", "MD", "MI", _
        "MN", "MO", "MS", "MT", "NC", "ND", "NE", "NH", "NJ", _
        "NM", "NV", "NY", "OH", "OK", "OR", "PA", "RI", "SC", _
        "SD", "TN", "TX", "UT", "VA", "VT", "WA", "WI", "WY"}


    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
        'Put user code to initialize the page here
        'get the connection and adapters from session state
        ContactMgmt = Session("ContactMgmt")
        adptContactTypes = Session("adptContactTypes")
        adptContacts = Session("adptContacts")
        'fill the contacttype data set
        adptContactTypes.Fill(dsContacts)
        'fill the contacts data set
        adptContacts.Fill(dsContacts)
        'bind to data - populates dprContactTypes and drpState lists
        drpContactTypes.DataBind()
        drpStates.DataBind()
    End Sub

End Class


  Return to Index