<% @ Language=VBScript CodePage=65001%>
<% Session.CodePage = 65001
response.charset="utf-8"%>
<!-- #include virtual ="/MDBInfo.asp" -->
<!-- #include virtual ="/kaguya.asp" -->
<%
gametype = reqtxt(request("gametype"))
ID = reqnum(request("ID"))

sql_game = "SELECT MainTain, Link FROM Index_Game_Ch WHERE Subject2 = '" & gametype & "'"
'response.Write(sql_game)
'response.end
Set rs_game = conn.Execute( sql_game )  
if rs_game.bof and rs_game.eof then ShowMsgClose("無此遊戲!")
if rs_game("MainTain")="y" then
	response.Redirect("/include/maintain/maintain.html")
	response.End()
else
	if ID = "" then
		response.Redirect reqdata2(rs_game("Link"))
		response.End()
	else
		response.Redirect "/include/CountByDay.asp?CType=10&ID="&ID
		response.End()
	end if
end if
%>