<%
if request("type") <> "showmefree" then
get_index = instr(Request.ServerVariables("HTTP_REFERER"),".asp")
'get_page = right(left(Request.ServerVariables("HTTP_REFERER"),get_index+3),16)
'if get_page <> "course_frame.asp" then
get_page = left(Request.ServerVariables("HTTP_REFERER"),get_index+3)
if not(get_page = a1 or get_page = a2 or get_page = a3 or get_page = a4 or get_page = a5 or get_page = a6 or get_page = a7 or get_page = a8 or get_page = a9 or get_page = a10) then
response.write "
您使用不當方式開啟課程 , 以至於您無法上課 , 如有問題請聯絡管理員."
response.end
end if
end if
%>
<![CDATA[<body>
</body>]]>