Mega Code Archive

 
Categories / ASP.Net / ADO Database
 

Using the RowDeleted event to catch SQL errors (VB)

<%@ Page Language="VB" %> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <script runat="server">     Protected Sub GridView1_RowDeleted(ByVal sender As Object, ByVal e As GridViewDeletedEventArgs)              If (Not IsDBNull(e.Exception)) Then             Me.lblErrorMessage.Text = e.Exception.Message             e.ExceptionHandled = True         End If     End Sub     Protected Sub SqlDataSource1_Deleted(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.SqlDataSourceStatusEventArgs)         If (e.Exception IsNot Nothing) Then             Me.lblErrorMessage.Text = e.Exception.Message             e.ExceptionHandled = True         End If     End Sub </script>  <html xmlns="http://www.w3.org/1999/xhtml" > <head runat="server">     <title>Untitled Page</title> </head> <body>     <form id="form1" runat="server">     <asp:GridView ID="GridView1"                    Runat="server"                    DataSourceID="SqlDataSource1"                   DataKeyNames="CustomerID"                    AutoGenerateColumns="False"                   AllowSorting="True"                    AllowPaging="True"                   AutoGenerateEditButton="true"                    AutoGenerateDeleteButton="true"                    OnRowDeleted="GridView1_RowDeleted">          <PagerStyle HorizontalAlign="Center"></PagerStyle>          <PagerSettings Position="TopAndBottom"                          FirstPageText="Go to the first page"                          LastPageText="Go to the last page"                          Mode="NextPreviousFirstLast">          </PagerSettings>             <Columns>                 <asp:BoundField ReadOnly="True"                                  HeaderText="CustomerID"                                  DataField="CustomerID"                                 SortExpression="CustomerID"                                  Visible="False"></asp:BoundField>                 <asp:HyperLinkField HeaderText="CompanyName"                     DataNavigateUrlFields="CustomerID,Country" SortExpression="CompanyName"                     DataNavigateUrlFormatString=                         "http://www.yourServer.com/Customer.aspx?id={0}&country={1}"                     DataTextField="CompanyName">                 </asp:HyperLinkField>                 <asp:BoundField HeaderText="ContactName" DataField="ContactName"                      SortExpression="ContactName"></asp:BoundField>                 <asp:BoundField HeaderText="ContactTitle" DataField="ContactTitle"                      SortExpression="ContactTitle"></asp:BoundField>                 <asp:BoundField HeaderText="Address" DataField="Address"                      SortExpression="Address"></asp:BoundField>                 <asp:BoundField HeaderText="City" DataField="City"                      SortExpression="City"></asp:BoundField>                 <asp:BoundField HeaderText="Region" NullDisplayText="N/A"                      DataField="Region" SortExpression="Region"></asp:BoundField>                 <asp:BoundField HeaderText="PostalCode" DataField="PostalCode"                      SortExpression="PostalCode"></asp:BoundField>                 <asp:BoundField HeaderText="Country" DataField="Country"                       SortExpression="Country"></asp:BoundField>                 <asp:BoundField HeaderText="Phone" DataField="Phone"                       SortExpression="Phone"></asp:BoundField>                 <asp:BoundField HeaderText="Fax" DataField="Fax"                       SortExpression="Fax"></asp:BoundField>                                   </Columns>         </asp:GridView>         <asp:SqlDataSource ID="SqlDataSource1" Runat="server"              SelectCommand="SELECT * FROM [Customers]"              ConnectionString="<%$ ConnectionStrings:AppConnectionString1 %>"              DataSourceMode="DataSet"              DeleteCommand="DELETE From Customers WHERE (CustomerID = @CustomerID)"              UpdateCommand="UPDATE [Customers] SET [CompanyName] = @CompanyName,                   [ContactName] = @ContactName, [ContactTitle] = @ContactTitle,                   [Address] = @Address, [City] = @City, [Region] = @Region,                    [PostalCode] = @PostalCode, [Country] = @Country, [Phone] = @Phone,                   [Fax] = @Fax WHERE [CustomerID] = @original_CustomerID" OnDeleted="SqlDataSource1_Deleted">              <UpdateParameters>                  <asp:Parameter Type="String" Name="CompanyName"></asp:Parameter>                  <asp:Parameter Type="String" Name="ContactName"></asp:Parameter>                  <asp:Parameter Type="String" Name="ContactTitle"></asp:Parameter>                  <asp:Parameter Type="String" Name="Address"></asp:Parameter>                  <asp:Parameter Type="String" Name="City"></asp:Parameter>                  <asp:Parameter Type="String" Name="Region"></asp:Parameter>                  <asp:Parameter Type="String" Name="PostalCode"></asp:Parameter>                  <asp:Parameter Type="String" Name="Country"></asp:Parameter>                  <asp:Parameter Type="String" Name="Phone"></asp:Parameter>                  <asp:Parameter Type="String" Name="Fax"></asp:Parameter>                  <asp:Parameter Type="String" Name="CustomerID"></asp:Parameter>              </UpdateParameters>         </asp:SqlDataSource>          <asp:Label ID="lblErrorMessage" runat="server" Text="Label"></asp:Label>     </div>     </form> </body> </html> File: Web.config <configuration>   <appSettings/>   <connectionStrings>         <add name="AppConnectionString1"               connectionString="Data Source=localhost\SQLEXPRESS;Initial Catalog=Northwind;Integrated Security=True"              providerName="System.Data.SqlClient" />     </connectionStrings>   <system.web>     <compilation debug="true" strict="false" explicit="true">       <codeSubDirectories>         <add directoryName="VB"></add>         <add directoryName="CS"></add>       </codeSubDirectories>     </compilation>     <pages>       <namespaces>         <clear/>         <add namespace="System"/>         <add namespace="System.Collections"/>         <add namespace="System.Collections.Specialized"/>         <add namespace="System.Configuration"/>         <add namespace="System.Text"/>         <add namespace="System.Text.RegularExpressions"/>         <add namespace="System.Web"/>         <add namespace="System.Web.Caching"/>         <add namespace="System.Web.SessionState"/>         <add namespace="System.Web.Security"/>         <add namespace="System.Web.Profile"/>         <add namespace="System.Web.UI"/>         <add namespace="System.Web.UI.WebControls"/>         <add namespace="System.Web.UI.WebControls.WebParts"/>         <add namespace="System.Web.UI.HtmlControls"/>       </namespaces>     </pages>     <authentication mode="Windows"></authentication>     <identity impersonate="true"/>   </system.web> </configuration>