Revelation Illustrated Print No. 6

<% @Language=VBScript %> <% 'Set user cookie and get user data from database If Session("Cookie") = 0 Then Response.Cookies("UserID") = Session("UserID") Response.Cookies("UserID").Expires = "31 Dec 2040" 'Date + 180 6 months to expire 'Example of fixed date: "1 Dec 1999" 'Refer to VBScript and ASP documentation Session("Cookie") = 1 else UserID = Session("UserID") If Session("Name") = "" Then set rsUsr = conn.execute("SELECT * from Users WHERE UserID = '" & Session("UserID") & "'") If rsUsr.EOF AND rsUsr.BOF Then 'User Unkown else Session("Name") = rsUsr("Name") Session("Surname") = rsUsr("Surname") Session("Mail") = rsUsr("mail") Session("Country") = rsUsr("Country") End If 'Refresh the cookie so that it doesn't expire Response.Cookies("UserID") = Session("UserID") Response.Cookies("UserID").Expires = Date + 180 '6 months to expire 'Example of fixed date: "1 Dec 1999" set rsUsr = nothing End if WMsg =" back " & Session("Name") & " " End If %> Revelation Illustrated Print No. 6

Casting crowns before the throne (REV. 4:9-11)

Revelation Illustrated Print Number 6

ORDERING INFORMATION

This illlustration may be purchased by using the form below. Please choose which format you would like from the drop-down menu.

COMPLETE PRODUCT INFORMATION: The Revelation Illustrated Series is also available in complete sets of prints, slides, and on video! For more information, please click here!

View Shopping Cart