<% server.Execute "/NoHACK1.asp" dim AutoID, sql, rs, Mo_Type, Mo_Title, rs_F_Title, rs_F_Data, Errh, MenuID AutoID = ReqTxt(ReqNum(Request("ID"))) Mo_Type = ReqTxt(ReqKeng(Request("Type"))) sql = "SELECT * from GM_Faq Where AutoID=" & AutoID set rs = GetRecordset( sql ) if not(rs.BOF and rs.EOF) then rs_F_Title = rs("F_Title") rs_F_Data = rs("F_Data") ' 加點閱數 sql = "update GM_Faq set F_Count=(select F_Count from GM_Faq where AutoID =" & AutoID & ")+1 where AutoID =" & AutoID Errh = DoCommand(sql) end if rs.close set rs = nothing select case Mo_Type case "A" Mo_Title = "會員帳號" MenuID = "0" case "B" Mo_Title = "遊戲安裝與執行" MenuID = "0" case "C" Mo_Title = "遊戲操作 - 基本操作" MenuID = "1" case "D" Mo_Title = "遊戲操作 - 遊戲介面" MenuID = "1" case "E" Mo_Title = "遊戲操作 - 戰鬥 / PK" MenuID = "1" case "F" Mo_Title = "遊戲操作 - 生產技能" MenuID = "1" case "G" Mo_Title = "遊戲操作 - 道具 / 拍賣" MenuID = "1" case "H" Mo_Title = "種族職業 - 武俠 / 法師" MenuID = "2" case "I" Mo_Title = "種族職業 - 妖精 / 妖獸" MenuID = "2" case "J" Mo_Title = "種族職業 - 羽靈 / 羽芒" MenuID = "2" case "K" Mo_Title = "遊戲任務 - 新手任務" MenuID = "3" case "M" Mo_Title = "遊戲任務 - 修真任務" MenuID = "3" case "L" Mo_Title = "遊戲任務 - 主線任務" MenuID = "3" case "N" Mo_Title = "遊戲副本" MenuID = "0" case else Mo_Title = "會員帳號" MenuID = "0" end select Mo_Title = Mo_Title & "問題" %>

<%=Mo_Title%>

	<%=rs_F_Title%>
	<%=rs_F_Data%>
	-返回-