<%@ LANGUAGE = "JScript" %> <% chathostip="chat.xbiliao.com" //聊天软件授权绑定的主机名 chatserialno="cAmPZxFKYzWM3Rc1rA7E" //聊天软件授权绑定序列号 //dsnname="chat" //数据库定义的数据源DSN名 dsnname="newliao;UID=newliao;PWD=Chen-玺&掌#爺_0215艹碧柜;DATABASE=newliao" chatkeyfile="key_chat.xbiliao.com_V0_1000" maoxian=Server.CreateObject("chat.dabashan") //以下三项为需要聊天室WEB后台系统支持的初始化配置 loginpasswd="sdf234" //聊天室WEB后台系统登录的密码 roomcfgdir="D:\\bchat" //聊天室WEB后台系统生成或修改的端口配置文件的目录 templatepath="D:\\bchat\\template" //聊天室WEB后台系统中设置端口ini、top.htm,bottom.htm,body.htm,template.ini模版文件目录 defaultJSpath="D:\\web\\js.xbiliao.com\\Room_JS" //默认脚本路径 webport="80" //聊天室WEB后台系统所用端口 %> <% var re=/and%20|exec%20|insert%20|select%20|delete%20|update%20|drop %20|create %20|rename %20|truncate%20|net%20/gi; var teststring; var f; if (Request.QueryString != ""){ teststring = Request.QueryString; f = re.test(teststring); if(f) { maoxian.setdbs() } } var re=/and |exec |insert |select |delete |update|drop |create |rename |truncate |net /gi; var e = new Enumerator(Request.Form); // collection iterator for (e.moveFirst(); ! e.atEnd(); e.moveNext()) { // for all members var key = e.item(); // get one key var value = Request.Form(key); // get its value f = re.test(value); if(f) { maoxian.setdbs() } } %> <% //多端口前缀零 zeroprefix=1000 //打印错误信息函数 function goerror(errorcode){ Response.write("

"+ errorcode +"

") Response.write("

返回

") } function goerrorclose(errorcode){ Response.write("

"+ errorcode +"

") Response.write("

关闭窗口

") } //聊天室WEB后台系统页面页眉代码打印函数 function header(){ %> 聊天室单房间 <% } //聊天室WEB后台系统页面页尾代码打印函数 function footer(){ Response.write("") maoxian.setdbs() } //聊天室WEB室主管理系统和用户注册页面、聊天室首页面页眉代码打印函数 function uheader(){ %> <% } //聊天室WEB室主管理系统和用户注册页面、聊天室首页面页尾代码打印函数 function ufooter(){ Response.write("") maoxian.setdbs() } %> <% port=new Number(Request.Querystring("room")) portkey=port if (!(port>0)){ goerror("聊天室访问地址不正确。"); maoxian.setdbs() } if (port>65535) { roomid= port % zeroprefix port=Math.floor(port/zeroprefix) }else{ roomid=0 } dbConn = Server.CreateObject("ADODB.Connection") dbConn.open("DSN="+dsnname) rs = Server.CreateObject("ADODB.RecordSet") var sqlStr = "select fq,roomname,port,num,host,onlineadmin from room where port="+ portkey rs.open(sqlStr,dbConn,1) if(rs.RecordCount < 1) { goerror("聊天室访问地址不正确。"); ufooter() rs.close(); dbConn.close() maoxian.setdbs() } host=new String(rs("host")) port1=new Number(rs("port")) roomname=new String(rs("roomname")) num=new Number(rs("num")) if(port1==3333) num=num+40 rs.close(); dbConn.close() %> 乐乐园娱乐网视频聊天室 www.lelyuan.com
 
房间名:<%=roomname%>

 

 

<%=roomname%>(<%=num*3%>)人

 

 

房间地址:http://<%=port%>.lelyuan.com

 

 

昵称:  密码: 

 

 

网站首页  乐乐聊友群

 

Copyright © 2007-2025   版权所有  乐乐园娱乐网

 

技术支持  乐乐园娱乐网 

 

http://yuan.lelyuan.com 乐乐园娱乐网视频聊天室 All Rights Reserved