<%
' is the user logged in?
if Session("logged_in") <> "true" then
' if not then redirect the user to the login page
Response.Redirect ("Gateway/index.asp")
end if
%>
<%message=CleanseTxt(request.querystring("message"))%>
<%
'function to clean text
Function CleanseTxt(TxtIn)
Dim rtnStr
rtnStr = Replace(TxtIn, "'", "`")
rtnStr = Replace(rtnStr, Chr(34), " ")
rtnStr = Trim(rtnStr)
'rem out upper case
'rtnStr = UCase(rtnStr)
CleanseTxt = rtnStr
End Function
%>
Pew Auth
