Development ASP.Net

<%@ Page Language="vb" %>


   
      Sub Page_Load()
         Try
            Dim myHttpEx As _
               New HttpException("This is the original exception")
            Dim myHttpEx2 As _
               New HttpException("This is a nested exception", myHttpEx)
            Throw New HttpException("Threw an exception from Page_Load", myHttpEx2)
         Catch HttpEx As HttpException
            Dim InnerHttpEx As HttpException
            InnerHttpEx = HttpEx.InnerException
            Message.Text = "ERROR:
"
            Message.Text &= "Message: " & HttpEx.Message & "
"
            Message.Text &= "Inner Exception Message: " & _
               InnerHttpEx.Message & "
"
            Message.Text &= "Base Exception Message: " & _
               InnerHttpEx.GetBaseException.Message & "
"
         End Try
      End Sub