|
web
newsgroups
|
|||||||||||||||||||||||
|
|||||||||||||||||||||||
How to properly Format zip code in a datagrid(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:DropDownList id="State" runat="server" ForeColor="Green" BackColor="#FFFFC0"></asp:DropDownList> &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" >Home Page</asp:HyperLink> </p><p> </p> <p> </p> <p> </p> <p> </p> <p> <asp:DataGrid id="DataGrid1" runat="server" ForeColor="Green" BackColor="#FFFFC0" BorderColor="Green" BorderStyle="Double" OnSelectedIndexChanged="DataGrid1_SelectedIndexChanged" Font-Bold="True"> </asp:DataGrid> &nbs p; &n bsp; </p> <!-- Insert content here --> </form> </body> .. Hi
If the Zip is numeric, you can Dim intZip = Integer.Parse(Zip) Dim formatedZip = intZip.ToString("#####-####") HTH Elton Wang elton_w***@hotmail.com Show quoteHide quote >-----Original Message----- >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:DropDownList >id="State" runat="server" ForeColor="Green" >BackColor="#FFFFC0"></asp:DropDownList> > > &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" >>Home Page</asp:HyperLink> > </p> > <p> > </p> > <p> > </p> > <p> > </p> > <p> > </p> > <p> > > <asp:DataGrid >id="DataGrid1" runat="server" ForeColor="Green" >BackColor="#FFFFC0" BorderColor="Green" >BorderStyle="Double" >OnSelectedIndexChanged="DataGrid1_SelectedIndexChanged" >Font-Bold="True"> > > </asp:DataGrid> > > &nbs >p; &n >bsp; > > </p> > <!-- Insert content here --> > </form> ></body> > > >.. > > >. >
DataGrid for Data Entry
Template column base on another column value Conditionally set dataGrid Rows backcolor getting the data for dynamically for Datagrid aspx, word question DataGrid with Dropdown list dropdownlist in datagrid Call windows apps from web apps How to add javascript onClick attribute to datagrid's edit template (update command)? Custom Paging Question |
|||||||||||||||||||||||