ASP.Net/Language Basics/Try Catch

Материал из .Net Framework эксперт
Версия от 11:53, 26 мая 2010; Admin (обсуждение | вклад) (1 версия)
(разн.) ← Предыдущая | Текущая версия (разн.) | Следующая → (разн.)
Перейти к: навигация, поиск

Catch Page Exception

<%@ Page Language=VB Debug=true %>
<script runat=server>
Sub SubmitBtn_Click(Sender As Object, E As EventArgs)
    Try
        Dim TempResult as Integer
        TempResult = txtNumber1.Text / txtNumber2.Text
        lblResult.Text = "Result: " & TempResult
    Catch TheException as Exception
        lblResult.Text = "Error occured: " _
            & TheException.ToString()
    Finally
        lblResult.Text = lblResult.Text _
            & "<BR>Done."
    End Try
End Sub
</SCRIPT>
<HTML>
<HEAD>
<TITLE>Try</TITLE>
</HEAD>
<BODY  TEXT="black" LINK="darkred" VLINK="darkred" ALINK="red" LEFTMARGIN="40" TOPMARGIN="60">
<form runat="server">
<Font Face="Tahoma" Size="+1">
<asp:Label
    id="lblMessage1"
    runat="Server"
    Text="Enter a Number"
/>
<BR>
<asp:TextBox
    id="txtNumber1"
    runat="Server"
/>
<BR><BR>
<asp:Label
    id="lblMessage2"
    runat="Server"
    Text="Enter another Number"
/>
<BR>
<asp:TextBox
    id="txtNumber2"
    runat="Server"
/>
<BR><BR>
<asp:Label
    id="lblResult"
    runat="Server"
    Text="Result: "
/>
<BR>
<asp:Button 
    id="butOK"
    text="  Go  "
    Type="Submit"
    OnClick="SubmitBtn_Click" 
    runat="server"
/>
</Font>
</Form>
</BODY>
</HTML>
Источник — «http://nfex.ru/index.php?title=ASP.Net/Language_Basics/Try_Catch&oldid=2222»