<%@ Page Language="VB" %>
Sub Page_Load(Sender As Object, e As EventArgs)
lblOutput.text = "Page loading" & _
"Application started at: " & Application("Time") & "
" & _
"Current time: " & DateTime.Now & "
"
End Sub
Sub Click(obj As Object, E As EventArgs)
Session.Abandon()
End Sub