<%@ LANGUAGE="VBSCRIPT" %> <% Option Explicit Response.Buffer=true %> <% dim lg if len(Request.QueryString("lg")) = 0 then lg=headerVerifications("language","http://www.shade.ca/art/default.asp") elseif Request.QueryString("lg") = "fr" then session.Contents("language") = "fr" lg="fr" elseif Request.QueryString("lg") = "en" then session.Contents("language") = "en" lg="en" end if %>

<% if lg="fr" then %> Copyright Shade.ca <% else %> Copyright Shade.ca <% end if %>