www.pudn.com > WLGL.rar > username.incx
<%
'###########################################################################################
'# #
'# This page is generated by ASP2ASP.Net Converter, a product of Halcyon Software, Inc. #
'# Copyright (c) 2001, all rights reserved. Halcyon Software Inc. #
'# #
'###########################################################################################
%>
<%' HALCYON: All local variables have been declared in the
<%
If trim(Session("username")) = "" Then
%>
<%
Response.End
else
sp = split(request.servervariables("HTTP_REFERER"),"/")
'response.write ubound(sp)
'response.end
If ubound(sp) > 2 Then
If sp(2) <> request.servervariables("HTTP_HOST") Then
%>
<% response.end
End If
elseif ubound(sp) = 0 Then
%>
<%
response.end
End If
End If
%>