J
Jeff Thur
How can I program an itemdatabound control to get a column
(Zipcode) to look as such xxxxx-xxxx. It currently is in
this format, xxxxxxxxx.
Thanks for any help. So far haven't had any luck.
This is the Program:
<%@ Page Language="vb" Debug="true" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.SqlClient" %>
<%@ import Namespace="System.Web.Security " %>
<%@ import Namespace="System.Web.UI.WebControls" %>
<script runat="server">
' Insert page code here
'
Sub Page_Load(Sender As Object, e As EventArgs)
IF Not Page.IsPostback Then
State.Items.Add ("")
State.Items.Add ("AL")
State.Items.Add ("AK")
State.Items.Add ("AZ")
State.Items.Add ("AR")
State.Items.Add ("CA")
State.Items.Add ("CO")
State.Items.Add ("CT")
State.Items.Add ("DC")
State.Items.Add ("DE")
State.Items.Add ("FL")
State.Items.Add ("GA")
State.Items.Add ("HI")
State.Items.Add ("ID")
State.Items.Add ("IL")
State.Items.Add ("IN")
State.Items.Add ("IA")
State.Items.Add ("KS")
State.Items.Add ("KY")
State.Items.Add ("LA")
State.Items.Add ("ME")
State.Items.Add ("MA")
State.Items.Add ("MD")
State.Items.Add ("MI")
State.Items.Add ("MN")
State.Items.Add ("MO")
State.Items.Add ("MS")
State.Items.Add ("MT")
State.Items.Add ("NE")
State.Items.Add ("NV")
State.Items.Add ("NH")
State.Items.Add ("NJ")
State.Items.Add ("NM")
State.Items.Add ("NY")
State.Items.Add ("NC")
State.Items.Add ("ND")
State.Items.Add ("OH")
State.Items.Add ("OK")
State.Items.Add ("OR")
State.Items.Add ("PA")
State.Items.Add ("RI")
State.Items.Add ("SC")
State.Items.Add ("SD")
State.Items.Add ("TN")
State.Items.Add ("TX")
State.Items.Add ("UT")
State.Items.Add ("VT")
State.Items.Add ("VA")
State.Items.Add ("WA")
State.Items.Add ("WV")
State.Items.Add ("WI")
State.Items.Add ("WY")
End If
End Sub
Sub Button1_Click(sender As Object, e As
EventArgs)
Dim DS As DataSet
DataGrid1.DataSource = Nothing
DataGrid1.Databind()
Dim MyConnection As SqlConnection
Dim MyCommand As SqlDataAdapter
MyConnection = New SqlConnection
("server='(local)'; user id='sa'; password='fritz';
database='Cutis'")
MyCommand = New SqlDataAdapter
("EMSLKUPS", MyConnection)
MyCommand.SelectCommand.CommandType =
CommandType.StoredProcedure
MyCommand.SelectCommand.Parameters.Add
(New SqlParameter("@TxtFirst", SqlDbType.NVarChar, 1))
MyCommand.SelectCommand.Parameters
("@TxtFirst").Value = TxtFirst.Text
MyCommand.SelectCommand.Parameters.Add
(New SqlParameter("@TxtLast", SqlDbType.NVarChar, 6))
MyCommand.SelectCommand.Parameters
("@TxtLast").Value = TxtLast.Text
MyCommand.SelectCommand.Parameters.Add
(New SqlParameter("@TxtState", SqlDbType.NVarChar, 2))
MyCommand.SelectCommand.Parameters
("@TxtState").Value = State.SelectedValue
MyCommand.SelectCommand.Parameters.Add
(New SqlParameter("@TxtSubscr", SqlDbType.NVarChar, 10))
MyCommand.SelectCommand.Parameters
("@TxtSubscr").Value = TxtSubscr.Text
DS = new DataSet()
MyCommand.Fill(DS, "Results")
DataGrid1.DataSource=DS.Tables
("Results").DefaultView
DataGrid1.DataBind()
TxtLast.Text =""
TxtFirst.Text =""
TxtSubscr.Text =""
End Sub
Private Sub DataGrid1_ItemDataBound(ByVal sender As
Object, ByVal e As _
System.Web.UI.WebControls.DataGridItemEventArgs)
' FormatCells does get called for each row.....
FormatCells(sender, e)
End Sub
Protected Sub FormatCells(ByVal sender As
System.Object, ByVal e As _
System.Web.UI.WebControls.DataGridItemEventArgs)
Dim Zip As String
If e.Item.ItemType = ListItemType.Item Or
e.Item.ItemType = _
ListItemType.AlternatingItem Then
e.Item.Cells(5).Text = String.Format("ddddd-dddd",
Zip)
End If
End Sub
Sub TxtFirst_TextChanged(sender As Object, e As
EventArgs)
End Sub
Sub DataGrid1_SelectedIndexChanged(sender As
Object, e As EventArgs)
End Sub
Sub LinkButton1_Click(sender As Object, e As
EventArgs)
End Sub
</script>
<html>
<head>
</head>
<body>
<form runat="server">
<p>
<asp:Label id="Label4"
runat="server" font-bold="True" font-size="Large"
height="75px" borderstyle="Double" backcolor="#FFFFC0"
forecolor="Green" width="451px">EPSILON
MANAGEMENT SYSTEMS **** LOOKUP SCREEN
****</asp:Label>
&nbs
p; <asp:Label id="Label6" runat="server" font-
bold="True" font-size="XX-Large" height="76px"
borderstyle="Double" backcolor="#FFFFC0"
forecolor="Green" width="71px" font-names="Arial Black"
bordercolor="Green">EMS</asp:Label>  
;
</p>
<p>
</p>
<p>
&nbs
p; <asp:Label id="Label1"
runat="server" height="36px" borderstyle="Double"
backcolor="#FFFFC0" forecolor="Green" width="171px"
bordercolor="Green">First
Initial of
FirstName</asp:Label> &
nbsp;  
;
<asp:Label id="Label5"
runat="server" borderstyle="Double" backcolor="#FFFFC0"
forecolor="Green" width="178px">Subscriber
No.</asp:Label> &
nbsp;  
; &nb
sp;
</p>
<p>
&nbs
p; &n
bsp;
<asp:TextBox id="TxtFirst" runat="server"
ForeColor="Green" BackColor="#FFFFC0" BorderColor="Green"
BorderStyle="Double" OnTextChanged="TxtFirst_TextChanged"
Width="20px"></asp:TextBox>
&nbs
p; &n
bsp;
&nbs
p;
<asp:TextBox id="TxtSubscr" runat="server"
ForeColor="Green" BackColor="#FFFFC0"
BorderStyle="Double" Width="101px"></asp:TextBox>
</p>
<p>
<asp:Label id="Label2" runat="server" height="50px"
borderstyle="Double" backcolor="#FFFFC0"
forecolor="Green" width="203px" bordercolor="Green">First
6 chars of
LastName</asp:Label> &n
bsp;
<asp:Label
id="Label3" runat="server" borderstyle="Double"
backcolor="#FFFFC0" forecolor="Green" width="77px"
bordercolor="Green">State</asp:Label>
</p>
<p>
&nbs
p; &n
bsp; <asp:T
extBox id="TxtLast" runat="server" ForeColor="Green"
BackColor="#FFFFC0" BorderColor="Green"
BorderStyle="Double" Width="44px"></asp:TextBox>
&nbs
p; &n
bsp;
&nbs
p; <asp
ropDownList
id="State" runat="server" ForeColor="Green"
BackColor="#FFFFC0"></aspropDownList>
&nbs
p; &n
bsp;
</p>
<p>
&nbs
p; &n
bsp;
&nbs
p; &n
bsp;
&nbs
p; &n
bsp;
&nbs
p;
</p>
<p>
</p>
<p>
<asp:HyperLink id="HyperLink2"
runat="server" ForeColor="Green" BackColor="#FFFFC0"
BorderColor="Green" BorderStyle="Double" Width="134px"
NavigateUrl="http://www.epsilonmail.com:8082/Baldwin99.asp
x">Run Another Query</asp:HyperLink>
&nbs
p; &n
bsp;
&nbs
p;
<asp:Button id="Button1"
onclick="Button1_Click" runat="server" ForeColor="Green"
BackColor="#FFFFC0" BorderStyle="Double" Text="Submit
Query"></asp:Button>
</p>
<p>
<asp:HyperLink id="HyperLink1"
runat="server" ForeColor="Green" BackColor="#FFFFC0"
BorderColor="Green" BorderStyle="Double" Width="121px"
NavigateUrl="http://www.epsilonmail.com:8082/default.aspx"
<p>
</p>
<p>
</p>
<p>
</p>
<p>
</p>
<p>
<aspataGrid
id="DataGrid1" runat="server" ForeColor="Green"
BackColor="#FFFFC0" BorderColor="Green"
BorderStyle="Double"
OnSelectedIndexChanged="DataGrid1_SelectedIndexChanged"
Font-Bold="True">
</aspataGrid>
&nbs
p; &n
bsp;
</p>
<!-- Insert content here -->
</form>
</body>
(Zipcode) to look as such xxxxx-xxxx. It currently is in
this format, xxxxxxxxx.
Thanks for any help. So far haven't had any luck.
This is the Program:
<%@ Page Language="vb" Debug="true" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.SqlClient" %>
<%@ import Namespace="System.Web.Security " %>
<%@ import Namespace="System.Web.UI.WebControls" %>
<script runat="server">
' Insert page code here
'
Sub Page_Load(Sender As Object, e As EventArgs)
IF Not Page.IsPostback Then
State.Items.Add ("")
State.Items.Add ("AL")
State.Items.Add ("AK")
State.Items.Add ("AZ")
State.Items.Add ("AR")
State.Items.Add ("CA")
State.Items.Add ("CO")
State.Items.Add ("CT")
State.Items.Add ("DC")
State.Items.Add ("DE")
State.Items.Add ("FL")
State.Items.Add ("GA")
State.Items.Add ("HI")
State.Items.Add ("ID")
State.Items.Add ("IL")
State.Items.Add ("IN")
State.Items.Add ("IA")
State.Items.Add ("KS")
State.Items.Add ("KY")
State.Items.Add ("LA")
State.Items.Add ("ME")
State.Items.Add ("MA")
State.Items.Add ("MD")
State.Items.Add ("MI")
State.Items.Add ("MN")
State.Items.Add ("MO")
State.Items.Add ("MS")
State.Items.Add ("MT")
State.Items.Add ("NE")
State.Items.Add ("NV")
State.Items.Add ("NH")
State.Items.Add ("NJ")
State.Items.Add ("NM")
State.Items.Add ("NY")
State.Items.Add ("NC")
State.Items.Add ("ND")
State.Items.Add ("OH")
State.Items.Add ("OK")
State.Items.Add ("OR")
State.Items.Add ("PA")
State.Items.Add ("RI")
State.Items.Add ("SC")
State.Items.Add ("SD")
State.Items.Add ("TN")
State.Items.Add ("TX")
State.Items.Add ("UT")
State.Items.Add ("VT")
State.Items.Add ("VA")
State.Items.Add ("WA")
State.Items.Add ("WV")
State.Items.Add ("WI")
State.Items.Add ("WY")
End If
End Sub
Sub Button1_Click(sender As Object, e As
EventArgs)
Dim DS As DataSet
DataGrid1.DataSource = Nothing
DataGrid1.Databind()
Dim MyConnection As SqlConnection
Dim MyCommand As SqlDataAdapter
MyConnection = New SqlConnection
("server='(local)'; user id='sa'; password='fritz';
database='Cutis'")
MyCommand = New SqlDataAdapter
("EMSLKUPS", MyConnection)
MyCommand.SelectCommand.CommandType =
CommandType.StoredProcedure
MyCommand.SelectCommand.Parameters.Add
(New SqlParameter("@TxtFirst", SqlDbType.NVarChar, 1))
MyCommand.SelectCommand.Parameters
("@TxtFirst").Value = TxtFirst.Text
MyCommand.SelectCommand.Parameters.Add
(New SqlParameter("@TxtLast", SqlDbType.NVarChar, 6))
MyCommand.SelectCommand.Parameters
("@TxtLast").Value = TxtLast.Text
MyCommand.SelectCommand.Parameters.Add
(New SqlParameter("@TxtState", SqlDbType.NVarChar, 2))
MyCommand.SelectCommand.Parameters
("@TxtState").Value = State.SelectedValue
MyCommand.SelectCommand.Parameters.Add
(New SqlParameter("@TxtSubscr", SqlDbType.NVarChar, 10))
MyCommand.SelectCommand.Parameters
("@TxtSubscr").Value = TxtSubscr.Text
DS = new DataSet()
MyCommand.Fill(DS, "Results")
DataGrid1.DataSource=DS.Tables
("Results").DefaultView
DataGrid1.DataBind()
TxtLast.Text =""
TxtFirst.Text =""
TxtSubscr.Text =""
End Sub
Private Sub DataGrid1_ItemDataBound(ByVal sender As
Object, ByVal e As _
System.Web.UI.WebControls.DataGridItemEventArgs)
' FormatCells does get called for each row.....
FormatCells(sender, e)
End Sub
Protected Sub FormatCells(ByVal sender As
System.Object, ByVal e As _
System.Web.UI.WebControls.DataGridItemEventArgs)
Dim Zip As String
If e.Item.ItemType = ListItemType.Item Or
e.Item.ItemType = _
ListItemType.AlternatingItem Then
e.Item.Cells(5).Text = String.Format("ddddd-dddd",
Zip)
End If
End Sub
Sub TxtFirst_TextChanged(sender As Object, e As
EventArgs)
End Sub
Sub DataGrid1_SelectedIndexChanged(sender As
Object, e As EventArgs)
End Sub
Sub LinkButton1_Click(sender As Object, e As
EventArgs)
End Sub
</script>
<html>
<head>
</head>
<body>
<form runat="server">
<p>
<asp:Label id="Label4"
runat="server" font-bold="True" font-size="Large"
height="75px" borderstyle="Double" backcolor="#FFFFC0"
forecolor="Green" width="451px">EPSILON
MANAGEMENT SYSTEMS **** LOOKUP SCREEN
****</asp:Label>
&nbs
p; <asp:Label id="Label6" runat="server" font-
bold="True" font-size="XX-Large" height="76px"
borderstyle="Double" backcolor="#FFFFC0"
forecolor="Green" width="71px" font-names="Arial Black"
bordercolor="Green">EMS</asp:Label>  
;
</p>
<p>
</p>
<p>
&nbs
p; <asp:Label id="Label1"
runat="server" height="36px" borderstyle="Double"
backcolor="#FFFFC0" forecolor="Green" width="171px"
bordercolor="Green">First
Initial of
FirstName</asp:Label> &
nbsp;  
;
<asp:Label id="Label5"
runat="server" borderstyle="Double" backcolor="#FFFFC0"
forecolor="Green" width="178px">Subscriber
No.</asp:Label> &
nbsp;  
; &nb
sp;
</p>
<p>
&nbs
p; &n
bsp;
<asp:TextBox id="TxtFirst" runat="server"
ForeColor="Green" BackColor="#FFFFC0" BorderColor="Green"
BorderStyle="Double" OnTextChanged="TxtFirst_TextChanged"
Width="20px"></asp:TextBox>
&nbs
p; &n
bsp;
&nbs
p;
<asp:TextBox id="TxtSubscr" runat="server"
ForeColor="Green" BackColor="#FFFFC0"
BorderStyle="Double" Width="101px"></asp:TextBox>
</p>
<p>
<asp:Label id="Label2" runat="server" height="50px"
borderstyle="Double" backcolor="#FFFFC0"
forecolor="Green" width="203px" bordercolor="Green">First
6 chars of
LastName</asp:Label> &n
bsp;
<asp:Label
id="Label3" runat="server" borderstyle="Double"
backcolor="#FFFFC0" forecolor="Green" width="77px"
bordercolor="Green">State</asp:Label>
</p>
<p>
&nbs
p; &n
bsp; <asp:T
extBox id="TxtLast" runat="server" ForeColor="Green"
BackColor="#FFFFC0" BorderColor="Green"
BorderStyle="Double" Width="44px"></asp:TextBox>
&nbs
p; &n
bsp;
&nbs
p; <asp
ropDownListid="State" runat="server" ForeColor="Green"
BackColor="#FFFFC0"></asp
ropDownList> &nbs
p; &n
bsp;
</p>
<p>
&nbs
p; &n
bsp;
&nbs
p; &n
bsp;
&nbs
p; &n
bsp;
&nbs
p;
</p>
<p>
</p>
<p>
<asp:HyperLink id="HyperLink2"
runat="server" ForeColor="Green" BackColor="#FFFFC0"
BorderColor="Green" BorderStyle="Double" Width="134px"
NavigateUrl="http://www.epsilonmail.com:8082/Baldwin99.asp
x">Run Another Query</asp:HyperLink>
&nbs
p; &n
bsp;
&nbs
p;
<asp:Button id="Button1"
onclick="Button1_Click" runat="server" ForeColor="Green"
BackColor="#FFFFC0" BorderStyle="Double" Text="Submit
Query"></asp:Button>
</p>
<p>
<asp:HyperLink id="HyperLink1"
runat="server" ForeColor="Green" BackColor="#FFFFC0"
BorderColor="Green" BorderStyle="Double" Width="121px"
NavigateUrl="http://www.epsilonmail.com:8082/default.aspx"
</p>
<p>
</p>
<p>
</p>
<p>
</p>
<p>
</p>
<p>
<asp
ataGridid="DataGrid1" runat="server" ForeColor="Green"
BackColor="#FFFFC0" BorderColor="Green"
BorderStyle="Double"
OnSelectedIndexChanged="DataGrid1_SelectedIndexChanged"
Font-Bold="True">
</asp
ataGrid> &nbs
p; &n
bsp;
</p>
<!-- Insert content here -->
</form>
</body>