<%
dim checkusername,checkuserpass,checklogin
checkusername=session("TotCms_UserName")
checkusertype=session("TotCms_UserType")
checkuserid=session("TotCms_UserId")
if(session("TotCms_UserName")<>"") then
	checklogin=true
else
	checklogin=false
end if
if(checklogin=false) then
	response.Redirect("login.asp")
else
	
end if
%>