<%@ Page Language="vb" EnableSessionState="false" %>
Sub Page_Load()
Try
Server.Execute("DoesNotExist.aspx")
Catch HttpEx As HttpException
Message.Text = "ERROR:"
Message.Text &= "Http Error Message: " & _
HttpEx.GetHtmlErrorMessage() & ""
End Try
End Sub