<%@ Page Language="vb" EnableSessionState="false" %>
Sub Page_Load()
Try
Session("foo") = "Foo"
Catch HttpEx As HttpException
myMessage.Text = "ERROR:"
myMessage.Text &= "String Representation of Exception: " & _
HttpEx.ToString() & ""
End Try
End Sub