<% @ Page Language="VB" %>
Look for Variables
Look for Session and Application Variables
<%
Dim Book, Chapter, Publisher, Author As String
Book = Session("Book")
Chapter = Session("Chapter")
Publisher = Application("Publisher")
Author = Application("Author")
If (Book = Nothing) Then
Response.Write("Book: Unknown
")
Else
Response.Write("Book: " & Book & "
")
End If
If (Chapter = Nothing) Then
Response.Write("Chapter: Unknown
")
Else
Response.Write("Chapter: " & Chapter & "
")
End If
If (Publisher = Nothing) Then
Response.Write("Publisher: Unknown
")
Else
Response.Write("Publisher: " & Publisher & "
")
End If
If (Author = Nothing) Then
Response.Write("Author: Unknown
")
Else
Response.Write("Author: " & Author & "
")
End If
%>