%
Dim strPageTitle
strPageTitle = "Home"
%>
<%
'Dim USER_ID, YN, AGENT
'USER_ID = Request.Cookies("user")("USER_ID")
'YN = Request.Cookies("user")("YN")
'AGENT = Request.Cookies("user")("AGENT")
'Response.write "USER_ID : " & USER_ID & "
"
'Response.write "YN : " & YN & "
"
'Response.write "AGENT : " & AGENT & "
"
'Response.write "USER_ID : " & SESSION("USERID") & "
"
'Response.write "YN : " & SESSION("NAME") & "
"
'Response.write "AGENT : " & SESSION("AGENT") & "
"
IF SESSION("GROUP") <> "MEMBER" And Request.Cookies("user") <> "" Then
IF Request.Cookies("user")("YN") = "Y" Then
Response.Redirect "/login_auto.asp"
'Response.write "GOOOOOOOOOO"
'Response.end
End IF
End IF
Sub SubMain(ByRef objQuery)
Call SubContent(objQuery)
End Sub
Sub SubContent(ByRef objQuery)
%>
<%'//LEFT AREA %> |
|
|||||||||||||||||||||||