<%
'checkMailTo=Application("appMailTo")
'If LCase(Trim(checkMailTo))="on" Then
'Response.Write("Application variable: " & Application("appMailTo"))
'Response.Write("Application variable: " & checkMailTo)
%>
<%If (Request.QueryString("To") <> "") and ((Instr(Request.ServerVariables("HTTP_REFERER"),"://www.elca.org") <> 0) or (Instr(Request.ServerVariables("HTTP_REFERER"),"://www.elca.org") <> 0) or (Instr(Request.ServerVariables("HTTP_REFERER"),"://www.compartiendolafe.org")<> 0) or _
(Instr(Request.ServerVariables("HTTP_REFERER"),"://elcaweb")<> 0) or (Instr(Request.ServerVariables("HTTP_REFERER"),"://prayingchurch.org")<> 0)) Then
' Set Flag for determing if this mailto came from elcaweb
If Instr(Request.ServerVariables("HTTP_REFERER"),"http://elcaweb") <> 0 Then
IntranetFlag = True
' Session("IntranetFlag") = 'on'
Else
IntranetFlag = False
' Session("IntranetFlag") = ''
End if
%>
Guestbook
Thank you for visiting the ELCA Home Page. After visiting our site, please sign our guestbook below. Be sure to put your *full* e-mail address if you want a reply to a question or comment.
Please direct inquiries to info@elca.org. Thank you.