<%filename="zx_6"%> <% '---将全角数字替换为半角 Function replaceNUMS(rNUM) rNUM = Replace(rNUM,"０","0") rNUM = Replace(rNUM,"１","1") rNUM = Replace(rNUM,"２","2") rNUM = Replace(rNUM,"３","3") rNUM = Replace(rNUM,"４","4") rNUM = Replace(rNUM,"５","5") rNUM = Replace(rNUM,"６","6") rNUM = Replace(rNUM,"７","7") rNUM = Replace(rNUM,"８","8") rNUM = Replace(rNUM,"９","9") replaceNUMS = rNUM End Function '---验证身份证--- function checkIdno(str) str_long=len(str) if str_long<>15 and str_long<>18 then checkIdno=False exit function else if str_long=15 then if not IsNumeric(str) then checkIdno=False exit function else checkIdno=True end if elseif str_long=18 then if not IsNumeric(left(str,17)) then checkIdno=False exit function else if not IsNumeric(right(str,1)) then if right(str,1)<>"x" and right(str,1)<>"X" then checkIdno=False exit function else checkIdno=True end if else checkIdno=True end if end if end if end if end function '---验证必须在规定长度内--- function checkStrLong(str,sD,sH) 'sD长度下限 'sH长度上限 if len(str)sH then checkStrLong=False exit function else checkStrLong=True end if end function '---验证省份和城市 function checkCity(str,sConn) set rscity = sConn.execute ("select top 1 city from city where city='" & str &"'") if rscity.eof then checkCity=False exit function else checkCity=True end if rscity.close set rscity=nothing end function '---验证两项信息必须相同，如密码和确认密码 function checkAccord(str1,str2) if str1<>str2 then checkAccord=False exit function else checkAccord=True end if end function '---验证电话信息是否正确 function checkTel(str) str=replace(str,"-","") str=replace(str,"－","") if not IsNumeric(str) then checkTel=False exit function else checkTel=True end if end function '---验证Email function checkEmail(strEmail) checkEmail=true if isnull(strEmail) then tmpStr="" else tmpStr=trim(strEmail) end if if tmpStr="" then checkEmail=false exit function end if pos1=instr(tmpStr,"@") if pos1<=0 then checkEmail=false exit function end if str1=mid(tmpStr,1,pos1-1) str2=mid(tmpStr,pos1+1,len(tmpStr)) if str1="" then checkEmail=false exit function end if if str2="" then checkEmail=false exit function end if pos2=instr(str2,".") if pos2<=0 then checkEmail=false exit function end if str21=mid(str2,1,pos2-1) str22=mid(str2,pos2+1,len(str2)) if str21="" or str22="" then checkEmail=false exit function end if checkEmail = CheckEmailFormat(strEmail) end function '---替换危险字符--- function getReDangerStr(ByVal nums) sErrStr="=0x|char(| and | And |dec|select|IS_SRVROLEMEMBER|truncate|update|delete|insert|drop|create|dbcc|exec|/*|+|'|--|master|count|;|*|chr(|mid|%2|xp_|sp_|replace|sysobjects|create|syscolumns|declare" errStr=split(sErrStr,"|") psourceStr = lcase(replace(nums," ","")) for curErrNums=0 to ubound(errStr) if instr(1,psourceStr,ErrStr(curErrNums),1)>0 then insertStatus=true exit for else insertStatus=false end if next if nums="" or isnull(nums) then getReDangerStr="" else getReDangerStr=trim(nums) IsHaveDrange = True while IsHaveDrange = True for curErrNums=0 to ubound(errStr) getReDangerStr=replacedanstr(getReDangerStr,errstr(curErrNums)) next curErrNums = 0 for curErrNums=0 to ubound(errStr) if instr(1,getReDangerStr,ErrStr(curErrNums),1)>0 then IsHaveDrange=true exit For End If IsHaveDrange = false next Wend if insertStatus then set DrangeConn=server.CreateObject("Adodb.Connection") DrangeConn.open Application("DrangeStrConn") url= request.ServerVariables("HTTP_HOST")&request.ServerVariables("url") & "?" & request.querystring url = changeDangerStr(url) nums = changeDangerStr(nums) userip=request.ServerVariables("remote_addr") sql="insert into ReStr_log (bstr,restr,sessionid,ip,url) values ('|"& nums &"|','"& getReDangerStr &"',"& session.sessionid &",'"& userip &"','"& url &"')" 'response.write sql DrangeConn.execute (sql) DrangeConn.close set DrangeConn=nothing end if end if end function function replacedanstr(source,errstr) dim pos,repstr,ls,p p=1 pos=InStr(1,source, errstr, 1) while pos>0 repstr = mid(source,pos,len(errstr)) source = replace(source,repstr,"") pos=InStr(p,source, errstr, 1) wend source = replace(source,"&","") replacedanstr = source end function '---只能在下列字符串内才是合法字符--- function checkInstr(str) grant="0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ" for i=1 to len(str) if instr(1,grant,mid(str,i,1))<=0 then checkInstr=False exit function '如包含未知字符，返回出错标记 end if next checkInstr=True end function '---替换一些危险字符，但并不去掉 function getReStr(str) if str="" or isnull(str) then getReStr="" else getReStr=trim(str) getReStr=replace(getReStr,"vbnewline","
") getReStr=replace(getReStr,">",">") getReStr=replace(getReStr,"<","<") getReStr=replace(getReStr,CHR(32)," ") getReStr=replace(getReStr,CHR(9)," ") getReStr=replace(getReStr,CHR(34),""") getReStr=replace(getReStr,CHR(39),"'") getReStr=replace(getReStr,CHR(13),"") end if end function function changeDangerStr(pstr) if pstr="" or isnull(pstr) then changeDangerStr="" exit function end if tempstr = replace(pstr,"'","‘") tempstr = replace(tempstr," ","　") tempstr = replace(tempstr,"&","—") tempstr = replace(tempstr,"e","Ｅ") tempstr = replace(tempstr,";","；") tempstr = replace(tempstr,"/","／") tempstr = replace(tempstr,"=","＝") changeDangerStr = tempstr end function FUNCTION CheckEmailFormat(str) if right(str,1)="." or right(str,1)="．" then CheckEmailFormat = False EXIT FUNCTION end if Dim Res Set Res=New Regexp '建立对象 Res.Pattern="^\w+((-\w+)|(\.\w+))*\@[A-Za-z0-9]+((\.|-)[A-Za-z0-9]+)*\.[A-Za-z0-9]+$" Res.IgnoreCase=true '不区分大小写 if Res.Test(str) then '匹配 CheckEmailFormat = True else '不匹配 CheckEmailFormat = False end if Set Res=nothing 'response.write CheckEmailFormat 'response.end END FUNCTION %> <% Set conn_log=Server.CreateObject("ADODB.Connection") conn_log.Open Application("theConnection") servUrl=request.ServerVariables("URL") USER_AGENT = request.ServerVariables("HTTP_USER_AGENT") ServIP = request.servervariables("LOCAL_ADDR") ServIP = right(ServIP,3) userip = request.servervariables("remote_addr") reqstr="ReqGetStr="& getRedangerStr(request.querystring) &"||ReqPostStr="& getRedangerStr(request.Form) opid=session("opid") esalerid=session("uesalerid") sql_log="insert into Sys_View_Log (esalerid,opid,site,url,reqstr,USER_AGENT,ip,servip) values ('"& esalerid &"','"& opid &"','.com','"& servUrl &"','"& reqstr &"','"& USER_AGENT &"','"& userip &"','"& servip &"')" 'response.write sql_log conn_log.execute(sql_log) Set conn_log=Nothing if session("opid")="" or isnull(session("opid")) Or session("oplogin")="" Or session("ulevelid")="" Or session("IsEditPrice")="" then ' if trim(destURL)<>"" then ' response.redirect "/corp/resale/errorPage.asp?errorflag=3&destUrl=" & destURL ' else ' response.redirect "/corp/resale/errorPage.asp?errorflag=3&destUrl=" & Request.ServerVariables("URL") ' end if response.write "" response.end else if session("uesalerid")="" or isnull(session("uesalerid")) then response.write "" response.end end if end if %> <% if session("newsystem")<>"1" then response.write "" response.end end if %> <% Response.Buffer = True Set theConnection=Server.CreateObject("ADODB.Connection") theConnection.Open Application("theConnection") %> 网游充值信息
首页 | 网游装备交易 | 连锁加盟 | 云网之链 | 销售系统 | 云网Resale | 我的云网 | 客户服务 | 帮助 |  
   
网游充值信息
网络游戏名称 充值地址
《刀online》游戏点卡 http://member.kalonline.com.cn/Billing/RegisterCard.aspx
17game密码保护卡 http://card.security.17game.com/
17game一卡通 http://rxjh.17game.com/svr/RegCardSave051120.asp
3Q1OL充值卡 http://www.3q1.com.cn
51wan一卡通 http://pay.51wan.com/
91充值卡 http://168.91.com
CT飚车游戏卡 http://ctr.member.joyzone.com.cn/
RF ONLINE游戏卡(流星花园/RF行会战/炎黄传说)
行会战争:http://war.5u56.com//ql.html
流星花园充值: http://billing2046.5u56.com/PayPointSelect.aspx
炎黄传说:http://billingyh.5u56.com/PayPointSelect.aspx
T2一卡通游戏卡15元（街头篮球/魔法飞球2/蒸汽幻想） http://pay.t2uu.com
边锋游戏卡 http://pay.sdo.com/index.aspx#
彩虹岛新浪专区卡 http://pay.sdo.com/index.aspx?type=card&game=39
大海战Ⅱ游戏点卡 http://www.navyfield.com.cn/2006CardReg/index.htm
道道一卡通（合金战记、布鲁布鲁卡卡） http://passport.ddtone.com/card_login.jsp
渡口一卡通（天机/天羽）游戏卡 http://passport.ferrygame.com/page/paymentKind.aspx
钢甲洪流游戏卡 http://www.woh.com.cn
光明与黑暗OL游戏卡 http://register.guanghei.com/reg/pass_Login.asp
光通一卡通（神泣/星战前夜·EVE） http://www.gtgame.com.cn
光宇游戏一卡通 http://www.gyyx.cn/pay/
海之乐章游戏卡 http://pay.sea.35.com
航海世纪点卡 http://www.hanghai.com/
很好记一卡通（梦想世界） http://www.henhaoji.com
宏象淘淘卡 http://www.gametower.com.cn/index.aspx
狐游游戏一卡通(刀剑·英雄) http://sde.game.sohu.com/payment/tl.jsp
华义石器时代超级来吉卡 http://www.wgs.com.cn/win/wgs_win_ljk_new.asp
欢乐龙币 http://218.89.168.22/happy_charge.asp
街头蓝球 http://pay.fsjoy.com
金酷一卡通（新魔界/战神光辉） http://passport.12ha.com/passport/index.aspx?type=pmenu
金山一卡通 http://pay.kingsoft.com/
金庸群侠传月费卡 http://www.online-game.com.cn/card1.asp
紧急升空游戏点卡 http://www.jjflying.com/Fictitious_Card.aspx
劲舞世界 http://ipass.higame.com.cn/billing/Billing_payforcard.aspx
精灵复兴 http://pt.yetime.cn/common/default.htm
九城卡奇迹MU https://member.muchina.com/Login/?sCL=https%3A%2F%2Fpayment%
2Emuchina%2Ecom%2F%2Fpayment%2Fprocess%2FpaymentSelect%2Easp%3F
久游休闲游戏卡 http://pay.9you.com/funpay/
可乐吧奇域点卡 http://www.kele8.com
蓝港一卡通（倚天剑与屠龙刀） http://pay.linekong.com/
联众游戏卡 http://www.ourgame.com/
恋爱超值包月卡 登录游戏客户端充值
恋爱酷炫双月卡
大话战国 http://zg.mop.com/service/index.html
猫游记 http://pay.mop.com
美丽世界(N-age) http://home.nage.com.cn/gamebank/registernage/memlogin.asp
米票（iGame一卡通） http://igameport.sina.com.cn/
摩力游一卡通 http://pay.moliyo.com/
魔兽世界游戏卡

用点卡换取CD-KEY
请登录:http://passport.the9.com/active/ctl_active.php?action=buycdkey&gameType=WOW

充值游戏:
请登录http://passport.the9.com/payment/ctl_payment.php 选择魔兽充值即可
目标一卡通(新天骄/天骄2/傲世online) 《傲世OnLine》与《新天骄》用户可以到一号通网站（http://acc.object.com.cn/）进行充值.
由于《天骄II》数据结构与上述产品不同，目前暂时不包括在一号通中。其用户须使用《天骄II》专用帐户站（http://acc.tj2.com.cn/）
泥巴潭一卡通(新龙族/暗黑世界) http://account.mud2u.com/Login.aspx
奇迹世界游戏卡 https://passport.the9.com/payment/ctl_payment.php?action=paymethod&GameType=SUN
上游棋牌积分卡 http://qipai.gamesh.com/gc/gc.htm
盛大数字绿卡 http://pay.sdo.com/index.aspx
世模一卡通（丝路） http://passport.srocn.com/accountappend.asp
水浒Q传 http://pay.kingsoft.com
腾仁一卡通 http://pay.gamall.net
腾讯Q币卡 http://pay.qq.com/
天骄II游戏卡 http://www.tj2.com.cn
天堂点卡(天堂Ⅰ) http://secure.lineage.com.cn/Common/Login.asp?ReturnURL=/payment/paymain.asp
天堂一卡通(天堂Ⅱ) http://www.lineage2.com.cn
天之游侠包月卡 http://member.t2uu.com/pay/card/card_step1.aspx
挑战游戏卡 http://center.dkonline.com.cn/Thruway/PayPoint.aspx
突袭OL(神通卡)游戏卡 登陆https://jh.shentongka.com/,先激活神通卡(交易密码是自己设置的,要记清楚),然后登陆http://www.tuxi.com.cn/payment/index.htm登陆自己游戏账号之后选择绑定-选择付费充值-选神通卡充值,按步骤操作即可.
完美一卡通 http://pay.wanmei.com/e/index.htm
网域一卡通游戏卡 http://www.szdomain.com/index.html
武林外传游戏点卡 http://pay.wanmei.com/e/jsp/setup_3_yikatong.jsp?gametype=2
希望online游戏卡 http://www.gyyx.cn/index.aspx
新《江湖OL》点卡 http://www.jianghuol.com/index.asp
新《魔界》游戏卡 http://member.mwo.cn/userinfo/userlogin.aspx/
新破天一剑 http://card.pcikchina.com/cncard/charge-new.php
新天上碑游戏卡 http://www.game176.com/new1003b/card/account_cnpcz.aspx
英雄2游戏点卡 http://www.herochina.com.cn/index.html
悠游一卡通 https://billing.iyoyo.com.cn/Account/Login.aspx?
游龙世界（金庸/三国/吞食/恋爱） http://www.online-game.com.cn/card1.asp
游艺卡 http://xs.yyge.com/
战国英雄卡 http://card.7hero.com/
征途/巨人游戏卡 http://pay.ztgame.com:81/qfillcard.php
中广网一卡通(破天一剑/倚天2) http://ucard.catv.net/GameCard/Charge/Charge.htm
中国游戏中心点值卡 http://epay.chinagames.net/paycenter/
 
关于我们 | 商务合作 | 地方商城 | 连锁加盟 | 云网之链 | 支付网关
北京云网公司 客户服务电话: 010-82888778 传真: 010-84851407
地址: 北京市朝阳区北苑路172号欧陆大厦1501室 邮编:100101
京ICP证040275号
云网 数字卡 游戏卡 网络游戏 支付 点卡 月卡 充值卡 充值 网易一卡通 电话卡 在线充值 邮箱 实时 网上购物 在线支付 便宜 网上支付 网关 网上支付系统 虚拟交易平台 超值 游戏 闪电购买 网易一卡通 一卡通 网易 大话 大话西游 梦幻 梦幻西游 天堂 天堂II 盛大 充值 腾讯 QQ 网星 魔力 轩辕剑 金山一卡通 剑侠 封神 剑侠Online sohu 搜狐 仙境传说 RO 天骄 天骄II 九城 奇迹 MU 天外 破天 破天一剑 91充值卡 幻灵 千年 华义 WGS 游龙 航海世纪 星际家园 神州行 神州行充值卡 充值卡 可乐吧 决战 联通 17910 墨香 骑士 美丽世界 Nage 传奇 传奇3 命运 天翼之链 M2 神甲奇兵 神之领域 橘子卡 GASH 新浪通行币 joypark cheap card game shop ip web online payment mobile ctoc btoc 云网 数字卡 游戏卡 网络游戏 支付 点卡 月卡 充值卡 充值 网易一卡通 电话卡 在线充值 邮箱 实时 网上购物 在线支付 便宜 网上支付 网关 网上支付系统 虚拟交易平台 超值 游戏 闪电购买 网易一卡通 一卡通 网易 大话 大话西游 梦幻 梦幻西游 天堂 天堂II 盛大 充值 腾讯 QQ 网星 魔力 轩辕剑 金山一卡通 剑侠 封神 剑侠Online sohu 搜狐 仙境传说 RO 天骄 天骄II 九城 奇迹 MU 天外 破天 破天一剑 91充值卡 幻灵 千年 华义 WGS 游龙 航海世纪 星际家园 神州行 神州行充值卡 充值卡 可乐吧 决战 联通 17910 墨香 骑士 美丽世界 Nage 传奇 传奇3 命运 天翼之链 M2 神甲奇兵 神之领域 橘子卡 GASH 新浪通行币 joypark cheap card game shop ip web online payment mobile ctoc btoc 云网 数字卡 游戏卡 网络游戏 支付 点卡 月卡 充值卡 充值 网易一卡通 电话卡 在线充值 邮箱 实时 网上购物 在线支付 便宜 网上支付 网关 网上支付系统 虚拟交易平台 超值 游戏 闪电购买 网易一卡通 一卡通 网易 大话 大话西游 梦幻 梦幻西游 天堂 天堂II 盛大 充值 腾讯 QQ 网星 魔力 轩辕剑 金山一卡通 剑侠 封神 剑侠Online sohu 搜狐 仙境传说 RO 天骄 天骄II 九城 奇迹 MU 天外 破天 破天一剑 91充值卡 幻灵 千年 华义 WGS 游龙 航海世纪 星际家园 神州行 神州行充值卡 充值卡 可乐吧 决战 联通 17910 墨香 骑士 美丽世界 Nage 传奇 传奇3 命运 天翼之链 M2 神甲奇兵 神之领域 橘子卡 GASH 新浪通行币 joypark cheap card game shop ip web online payment mobile ctoc btoc