<%
'基本參數
APPID = request.cookies("INAPPID") '來源代碼(WEB GAME 倒過來時會帶在網址後面)
GAME = LCase(request.cookies("INGAME")) '遊戲別(WEB GAME 倒過來時會帶在網址後面)
GameID = Request.Cookies("INGAME_ID") ' 遊戲帳號
GameServer = Request.Cookies("INSERVER_ID") ' 遊戲伺服器
TS = Request.Cookies("INTS") ' TimeStamp
Token = Request.Cookies("INTOKEN") ' Token
PlatformID = Request.Cookies("INPTID") ' 平台ID
' 使用者IP
RemoteIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If RemoteIP = "" Then
RemoteIP = Request.ServerVariables("Remote_ADDR")
Else
ResultArray = Split(RemoteIP,",")
RemoteIP = ResultArray(0)
End If
'If Request.ServerVariables("HTTP_Client_IP") = "" Then
' RemoteIP = Request.ServerVariables ("Remote_ADDR")
'Else
' RemoteIP = Request.ServerVariables("HTTP_Client_IP")
'End If
'測試用
'game = "lv"
set obj1 = server.CreateObject("GSClient.GSPoint")
if Game = "" then
'if Game = "gyo" or Game = "" then%>
<%
Response.Redirect "http://www.gameflier.com"
end if
if Game = "" then
if request.cookies("Test") = "GameflierTest1234" then
%>
<%else%>
<%
Response.Redirect "http://www.gameflier.com"
end if
end if
if Game = "LV" or Game = "lv" then
response.redirect "/billing/ONLINE_SERVICES/under_construction.htm"
response.end
end if
%>
帳號申請
<% '取的品項,GameFacId //MYCARD提供廠商代碼
If ProductId <> "" then%>
<%
else
If APPID = "711" Then
Response.Write("此品項尚未開放")
Else
Response.Write("讀取發生錯誤，請稍後再試。")
End If
end if
%>
MyCard銷售點
