<%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》游戏点卡   kefu@kalonline.com.cn  
17game密码保护卡 010-64961717    
17game一卡通
 010-64961717    
3Q1OL充值卡
 021-54263600 service@jjclub.com.cn  
51wan一卡通
 021-50504728 leifeng@51wan.com 在线客服：http://user.51wan.com/
客服专区：
http://bbs.51wan.com/forumdisplay.php?fid=56
91充值卡
 0591-87085777  
CT飚车游戏卡
 021-61206611 ctcs@joyzone.com.cn  
RFONLINE游戏卡(流星花园/RF行会战/炎黄传说)
 020-87063273
020-87049273		 gm_service@joypark.com.cn  
T2一卡通游戏卡15元（街头篮球/魔法飞球2/蒸汽幻想）
 021-34289630
服务时间：9:00~21:00x7 		help@timez.com.cn  
边锋游戏卡
 021-50504721 gameabc@shanba.com.cn  
彩虹岛新浪专区卡
 021-50504720    
大海战Ⅱ游戏点卡
 010--85655517    
道道一卡通（合金战记、布鲁布鲁卡卡）

客服热线：010-58752058
客服传真：010-58753300		 service@eounion.com  
渡口一卡通
（天机/天羽）游戏卡
 021-52980786或0571-86674117    
钢甲洪流游戏卡
 024-62504261
024-62504262		 icegame_kf@icegame.com  
光明与黑暗OL游戏卡
 021-58992108    
光通一卡通（神泣/星战前夜·EVE）
 021-54644949-3    
光宇游戏一卡通
 客服电话：010－58858855
客服传真：050－58858877－6001		 问道邮箱：wd_service@gyyx.cn
希望邮箱：service@sealonline.com.cn		  
海之乐章游戏卡
 24小时客服专线：0592-5291398、5391818
24小时客服传真：0592-5291605		 services@game.35.com  
航海世纪点卡
 0512-67631800 vcgm@snailgame.net  
很好记一卡通（梦想世界）
 020-61016870    
宏象淘淘卡
 010-62692688 kfservice@ages.com.cn  
狐游游戏一卡通(刀剑·英雄)
 客服电话:010-58511155
客服传真:010-62702953		 service@ko.sohu.com  
华义石器时代超级来吉卡
 客服专线：010-84542288 84485885
客服传真：010-84543156 84485503		 客服信箱：service@wayi.com.cn
投诉信箱：tousu@wayi.com.cn		  
欢乐龙币
 028-84399455    
街头蓝球
 021-6495788 gm@fsjoy.com  
金酷一卡通（新魔界/战神光辉）
 021-61276626 kefu@mwo.cn  
金庸群侠传月费卡
 北京：
(010)62960623
(010)62960624
(010)62960625
(010)62961403
上海：
(021)64855615
(021)64855616
(021)64855304
(021)64855305
(021)64855569		 tsgm@online-game.com.cn  
紧急升空游戏点卡
 (010)85861609    
劲舞世界
 客服电话:021-24088199
客服传真:021-24088101		    
精灵复兴
 021-51879655    
九城卡奇迹MU
 021-52564528 gm@muchina.com  
久游休闲游戏卡
 劲乐团:021-61361865
劲舞团:021-61361860		 o2jam@staff.9you.com  
可乐吧奇域点卡
 电话：010-82390801
传真：010-82390907		 qiyu@kele8.com  
蓝港一卡通（倚天剑与屠龙刀）
 010-64858301
010-64851175		 pr@linekong.com  
联众游戏卡
 029-87669595    
恋爱超值包月卡
恋爱酷炫双月卡
 北京：(010)62960623 62960624 62960625 62961403
上海：(021)64855615 64855616 64855304 64855305 64855569
广州：(020)82600720 82600721 82600722 82601275
成都：(028)85134587 85136397 85131353		    
大话战国
 010-88389110    
猫游记
 010-51401880 pay@dudu-inc.com  
美丽世界(N-age)
 010-82390801 service@edu-inf.com  
米票（iGame一卡通）
 95105670转2人工转6    
摩力游一卡通
 021－61271177    
魔兽世界游戏卡
 021-51189999 GM@wowchina.com  
目标一卡通(新天骄/天骄2/傲世online)
 010-82306868
010-82306610
（7*24小时为您服务）		    
泥巴潭一卡通(新龙族/暗黑世界)
 客服热线：010-62979306
MSN:
dongyupeng@hotmail.com		 gm@mud2u.com  
奇迹世界游戏卡
 021-51729108    
上游棋牌积分卡
 021-96861-3 sv@gamesh.com  
盛大数字绿卡
 021-50504740    
世模一卡通（丝路）
 010-88577058 service_sro@cimo.cn  
水浒Q传
 028-85437733 help@kingsoft.com  
腾仁一卡通
 021-61454815
021-61454816
021-61454817
服务传真：021-61454819		 wok@tengwu.com.cn  
腾讯Q币卡
 0755-83765566(7×24小时) pay@tencent.com  
天骄II游戏卡
 010-82306868 tj2@objonline.com  
天堂点卡(天堂Ⅰ)
 021-61006222 help@lineage.com.cn  
天堂一卡通(天堂Ⅱ)
 021-61454815
021-61454816
021-61454817
服务传真：021-51381122		 cs@lineage2.com.cn  
天之游侠包月卡
 021-34289630 t2ucs@t2cn.com  
挑战游戏卡
 021-64078787 cs@dkonline.com.cn  
突袭OL(神通卡)游戏卡
 010-95130111或010-95130000    
完美一卡通
 24小时客服专线：010-58858889
24小时客服传真：010-58858265		 service@world2.cn  
网易一卡通(大话/梦幻)
 客服热线：020-83568090  85551557
《梦幻西游》客服热线：020-85543820
《大话西游onlineII》《大话西游onlineIII》客服热线：020-83918161		    
网域一卡通游戏卡
 0755-26544680    
武林外传游戏点卡
 24小时客服专线：010-58858889
24小时客服传真：010-58858265		 service@world2.cn  
希望online游戏卡
 010-62978855    
新《江湖OL》点卡
 热线:010-58691378传真:010-58690971    
新《魔界》游戏卡
 021-61276626 kefu@mwo.cn  
新破天一剑
 010-59059083    
新天上碑游戏卡
 021-54487268    
英雄2游戏点卡
 客服电话：022-85685225
客服传真：022-85685226		    
悠游一卡通
 (021)64959798 sgservices@iyoyo.com.cn  
游龙世界（金庸/三国/吞食/恋爱）
 北京：(010)62960623 62960624 62960625 62961403
上海：(021)64855615 64855616 64855304 64855305 64855569		 tsgm@online-game.com.cn  
游艺卡
 020-85573370、85573376 cs@yoyigame.com  
战国英雄卡
 0775-86168110 service@powerleader.com.cn  
征途/巨人游戏卡
 021-61205656    
中广网一卡通(破天一剑/倚天2)
 010-63938220    
中国游戏中心点值卡
 0755-28810101 service@chinagames.net  
 
关于我们 | 商务合作 | 地方商城 | 连锁加盟 | 云网之链 | 支付网关
北京云网公司 客户服务电话: 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