Need help - Right now, I have a datagrid, and it works in the sense that they can edit a value and update a table in my DB. However, how do I validate that no column is left blank? Also, how do i validate that if they do edit a value, that it matches whats in my table? Meaning, if they edit True Distributorship, and they edit it to a value, but that not value is in another table, then I dont want them to update it. Thanks for thehelp
<%@dotnet.itags.org. Page %>
<%@dotnet.itags.org. Import namespace ="System.Data.SqlClient" %>
<%@dotnet.itags.org. Import namespace ="System.Data" %>
<%@dotnet.itags.org. Import namespace ="System.Web.Security" %>
<%@dotnet.itags.org. Import Namespace="System.Web" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>Maintain True Distributorships Page</title>
<meta name="GENERATOR" content="Microsoft Visual Studio.NET 7.0">
<meta name="CODE_LANGUAGE" content="Visual Basic 7.0">
<meta name="vs_defaultClientScript" content="JavaScript">
<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
</HEAD>
<body MS_POSITIONING="GridLayout">
<form id="Form1" method="post" runat="server">
<h2 style="FONT-FAMILY: Arial">
Maintain True Distributorships</h2>
<hr>
<TABLE id="Table1" cellSpacing="1" cellPadding="1" width="300" border="1">
<TR>
<TD>
<asp:DataGrid id="ReportInfo" runat="server" BorderWidth="1px" AutoGenerateColumns="False" BorderColor="#999999" BackColor="White" HorizontalAlign="Left" BorderStyle="Groove" CellPadding="3" GridLines="Vertical" OnEditCommand="DataGrid_Edit" OnCancelCommand="DataGrid_Cancel" OnUpdateCommand="DataGrid_Update">
<SelectedItemStyle Font-Bold="True" ForeColor="White" BackColor="#008A8C"></SelectedItemStyle>
<AlternatingItemStyle BorderStyle="Groove" BackColor="Gainsboro"></AlternatingItemStyle>
<ItemStyle Font-Size="7" ForeColor="Black" BackColor="White" Font-Name="arial"></ItemStyle>
<HeaderStyle Font-Bold="True" Font-Size="10" ForeColor="White" BackColor="maroon" Font-Name="arial"></HeaderStyle>
<FooterStyle ForeColor="Black" BackColor="Silver"></FooterStyle>
<Columns>
<asp:EditCommandColumn ButtonType="LinkButton" CancelText="Cancel" EditText="Edit" UpdateText="Update" HeaderText="Update Report" />
<asp:BoundColumn DataField="UID" HeaderText="UID" ReadOnly="True" Visible="False" />
<asp:BoundColumn DataField="distributorship" HeaderText="Distributorship" ReadOnly = "True" />
<asp:BoundColumn DataField="distributorship_name" HeaderText="Distributorship Name" ReadOnly = "True" />
<asp:BoundColumn DataField="true_distributorship" HeaderText="True Distributorship" />
</asp:DataGrid>
</TD>
</TR>
<TR>
<TD>
<asp:HyperLink id="HyperLink1" runat="server" ToolTip="Return to Business Intelligence Reference Data Maintenance Menu" NavigateUrl="add_bank.aspx" Font-Italic="true" Font-Name="arial" Font-Bold="true" Font-Size="10">Return to Business Intelligence Reference Data Maintenance Menu</asp:HyperLink>
</TD>
</TR>
</TABLE>
</form>
<script runat="server">
Public Sub Page_Load(Source As Object, E As EventArgs)
If Not Page.IsPostBack Then
BindData()
End If
End Sub
Public Sub BindData()
Dim myDataSet As New DataSet
Dim myConnection As New SqlClient.SqlConnection(ConfigurationSettings.AppSettings("dev3"))
Dim myCommand As New SqlClient.SqlCommand("Select * From distributorship_rollup_xref order by uid", myConnection)
Dim mySqlDataAdapter As New SqlClient.SqlDataAdapter(myCommand)
mySqlDataAdapter.Fill(myDataSet, "maint_tdist")
ReportInfo.DataSource = myDataSet.Tables("maint_tdist")
ReportInfo.DataBind()
End Sub
Public Sub DataGrid_Edit(Source As Object, E As DataGridCommandEventArgs)
ReportInfo.EditItemIndex = E.Item.ItemIndex
BindData()
End Sub
Public Sub DataGrid_Cancel(Source As Object, E As DataGridCommandEventArgs)
ReportInfo.EditItemIndex = -1
BindData()
End Sub
Public Sub DataGrid_Update(Source As Object, E As DataGridCommandEventArgs)
Dim myDataSet As New DataSet
Dim txttruedistributorship As TextBox = E.Item.Cells(4).Controls(0)
Dim txttruedistributorshipname As TextBox = E.Item.Cells(5).Controls(0)
Dim myConnection As New SqlClient.SqlConnection(ConfigurationSettings.AppSettings("dev3"))
Dim strUpdateStmt As String
strUpdateStmt = "UPDATE distributorship_rollup_xref SET " & _
"true_distributorship = '" & txttruedistributorship.Text & "' " & _
"WHERE UID = " & E.Item.Cells(1).Text
Dim myCommand As New SqlCommand(strUpdateStmt, myConnection)
MyCommand.Connection.Open()
myCommand.ExecuteNonQuery()
ReportInfo.EditItemIndex = -1
BindData()
End Sub
</script>
</body>
</HTML>
No comments:
Post a Comment