User Friendly ASP.NET Exception Handling

Module Module1

    Sub Main()

        'Console.WriteLine("If you want to debug the SoapExtension, you must: ")
        'Console.WriteLine()
        'Console.WriteLine("1) set the web service project as the startup project")
        'Console.WriteLine("2) set breakpoints in the SoapExtension or Handler ")
        'Console.WriteLine("3) Press F5 to begin debugging ")
        'Console.WriteLine("4) Execute this console app AS A BINARY from the \bin folder ")
        'Console.WriteLine()
        'Console.WriteLine("Press ENTER to continue...")
        'Console.ReadLine()

        Dim w As New WebReference.Service1
        Try
            w.GenerateException()
        Catch ex As System.Web.Services.Protocols.SoapException
            Console.WriteLine("System.Web.Services.Protocols.SoapException caught!")
            Console.WriteLine("Press ENTER to see details...")
            Console.WriteLine("Message: " & ex.Message)
            Console.WriteLine("Detail.OuterXml:")
            Console.WriteLine(ex.Detail.OuterXml)
            Console.WriteLine("Press ENTER to continue...")
            Console.ReadLine()
        End Try
    End Sub

End Module