⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 indexroompassword.htm

📁 这是基于网络编程的
💻 HTM
字号:
<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta http-equiv=refresh content=600>
<!--多少秒钟后刷新本页-->
<TITLE>MeChat语音视频聊天服务器</TITLE>
<SCRIPT LANGUAGE=javascript>
<!--
/*以下为系统变量和函数库,可以灵活调用,但不推荐修改*/
var StartTime= <!--$StartTime-->
var StartDays= <!--$StartDays-->
var StartHours= <!--$StartHours-->
var StartMinutes= <!--$StartMinutes-->
var StartSeconds= <!--$StartSeconds-->

/*以下为功能模块,允许调整界面时适当修改*/
var iOpenWindowName="MeChat1";
var nRecord=1;
function OnLoginLockedRoom()
{

	if(!validstr(login.Alias))return ;
	var Room = Server.GetRoomObject(nRecord);	
	if(Room.State == -1)
	{//when room is full ,administrator is allowed to login
		if(login.Password.value.length <1)
		{
		  alert("已经满员,谢绝登录") ;
		  return;
		}
		//If not guest,let server check it;
	}
	var strBox = "" ;
	strBox = "&boxfunc=off" ;
	var strSex = "&Sex=" + login.Sex.value ;

	//iOpenWindowName+=1;//new
	window.open("about:blank", iOpenWindowName, "toolbar=no,location=no,directories=no,menubar=no,resizable=yes") ;
	login.target = iOpenWindowName ;
	login.action = Room.URL + "Login" ;
	login.RoomID.value=Room.RoomID;
	login.submit();
	return;
	
}

function OnLogin(n) // 登录聊天室
{
	if(!validstr(login.Alias))return ;
	var Room = Server.GetRoomObject(n);
	if(Room.State == -1)
	{//when room is full ,administrator is allowed to login
		if(login.Password.value.length <1)
		{
		  alert("已经满员,谢绝登录") ;
		  return;
		}
		//If not guest,let server check it;
	}
	var strBox = "" ;
	strBox = "&boxfunc=off" ;
	var strSex = "&Sex=" + login.Sex.value ;
	//iOpenWindowName+=1;//new
	nRecord=n;	
	/*
	if( Room.Locked==1)
	{
        	window.open("/inputroompasword.htm", "inputroompassword", "toolbar=no,location=no,directories=no,menubar=no,resizable=yes") ;
        	return;
	}*/
	var w = screen.availWidth ;
	var h = screen.availHeight-20 ;
	var strPos = "toolbar=no,location=no,directories=no,menubar=no,resizable=yes,top=0,left=0,width=" + w + ",height=" + h ;	

	if(1==1)
	{	
		var pwin = window.open("about:blank", iOpenWindowName, strPos);
		if(pwin != null)
			pwin.resizeTo(screen.availWidth, screen.availHeight) ;
	}
	else
	{
		window.open("about:blank", iOpenWindowName, "toolbar=no,location=no,directories=no,menubar=no,resizable=yes") ;
	}	
	login.target = iOpenWindowName ;
	login.action = Room.URL + "Login" ;
	login.RoomID.value=Room.RoomID;
	login.submit() ;		

	//window.open(Room.URL+"Login?RoomID="+Room.RoomID+"&Alias="+login.user.value+"&Password="+escape(login.pass.value) + strSex + strBox + "&r=" + Math.random(),iOpenWindowName,"toolbar=no,location=no,directories=no,menubar=no,resizable=yes");
	//window.open(Room.URL+"Login?roomid="+Room.RoomID+"&user="+login.user.value+"&pass="+escape(login.pass.value) + strSex + strBox + "&r=" + Math.random(),"MeChatMain","toolbar=no,location=no,directories=no,menubar=no,resizable=yes");
}

function OnRegister() // 注册呢称 
{	window.open("/regist.htm","regist","toolbar=no,location=no,directories=no,menubar=no,scrollbars=no,resizable=yes,width=270,height=500");
}
function OnPrivate() // 打开自建聊天室窗口
{	
	//if(Server.RoomsCount() > 0)
	window.open("/buildprivate.htm","_Private","toolbar=no,location=no,directories=no,menubar=no,scrollbars=yes,resizable=yes");
}

function OnAllUsers() // 显示在线用户总列表
{
	if(Server.RoomsCount() > 0)
	window.open(Server.GetRoomObject(0).URL+"AllUsers?r=" + Math.random(),"_AllUsers","toolbar=no,location=no,directories=no,menubar=no,scrollbars=yes,resizable=yes");
}
function OnFindUser() // 显示在线用户总列表
{
	if(Server.RoomsCount() <= 0)	return;
	var strUserName = prompt("请输入您要查找的用户名?", "找谁?") ;
	if(strUserName == null || strUserName == "找谁?" || strUserName.length <1)	return ;
	window.open("/finduser.htm?FindUser="+strUserName,"_FindUser","toolbar=no,location=no,directories=no,menubar=no,scrollbars=yes,resizable=yes");
}
function validstr(str) // 验证用户名
{ var s,i,j; s=" +=|'#&<>%*`^/\\\";,."; str1=str.value.toString();
  if (str.value.length <1){alert("用户名不能为空!");str.focus(); return false;}
  for (i=0; i<str1.length; i++)
  {	for(j=0;j<s.length;j++)
	{if (str1.charAt(i) == s.charAt(j))
     {	alert("名字中不能包含特殊字符: +=|'#&<>%*`^/\\\";,.空格.");
 		str.focus(); return false;
  }}}return true;
}
function OnUserList(n) // 查询在线用户列表
{	
	var Room = Server.GetRoomObject(n);
}
function OnClick(str)
{
	alert(str);
}

/** 系统用脚本定义开始,普通用户不建议修改 **/

function ChatRoom()
{
	this.RoomID		;       //房间RoomID
	this.RoomName		;	// 房间名称
	this.URL		;	// 登录地址
	this.UserCount	;	// 在线人数
	this.MaxOnline	;	// 最高在线
	this.State		;	// 满员状态	0=正常 1=热闹 -1=满员禁止登录
	this.Topic		;	// 当前话题
	this.AdminNames ;	// 管理员名单
	this.RoomArea=0;	//  地区	
	this.RoomType	;	// 房间分类ID
	this.Private = 0 ; // 是否自建  1:是,0:否
	this.Locked = 0 ;  // 是否加锁  1:是,0:否
	this.SupportAudio=0;// 是否支持语音  1:是,0:否
	this.SupportVideo=0;// 是否支持视频  1:是,0:否	
	this.RoomDisplay=1;
	this.Other=0;		
	this.Reserve="";
	this.UserList = null;	
}
function ChatServer()
{
	this.MaxOnline = 0 ;	// 最高在线
	this.RegUsers = 0 ;		// 总注册人数
	this.TotalUsers = 0 ;	// 当前在线人数
	
	this.m_pChatRoom	= new Array();
	this.RoomsCount = function(){return this.m_pChatRoom.length;}	// 房间数
	this.GetRoomObject = function(n) // 取得房间对象
	{	if(n < this.RoomsCount()) return this.m_pChatRoom[n];
		return null;
	}
	this.SortRule= function(a, b)
	{	var n1 = a.UserCount ;
		var n2 = b.UserCount ;
		if(n1 == n2)	return 0 ;
		if(n1 > n2)		return -1 ;
		if(n1 < n2)		return 1;
	}
	this.Sort= function(){this.m_pChatRoom.sort(this.SortRule);}
	this.Add = function(nRoomID,strRoomName, strURL, nUserCount, nMax, nState, strTopic, strAdmins, nRoomArea,nRoomType, bPrivate, bLocked,nSupportAudio,nSupportVideo,nRoomDisplay,nOther,strReserve)
	{
		var obj = new ChatRoom() ;
		obj.RoomID		= nRoomID ;	// 房间名称
		obj.RoomName		= strRoomName ;	// 房间名称
		obj.URL			= strURL;		// 登录地址
		obj.UserCount	= nUserCount ;	// 在线人数
		obj.MaxOnline	= nMax ;		// 最高在线
		obj.State		= nState ;		// 满员状态	0=正常 1=超员 -1=满员禁止登录
		obj.Topic		= strTopic ;	// 当前话题
		obj.AdminNames	= strAdmins ;	// 管理员名单
		obj.RoomArea = nRoomArea;		
		obj.RoomType	= nRoomType ;	// 房间分类ID
		obj.Private		= bPrivate ;	// 是否自建
		obj.Locked		= bLocked ;		// 是否加锁
		obj.SupportAudio = nSupportAudio;
		obj.SupportVideo = nSupportVideo;
		obj.RoomDisplay = nRoomDisplay;
		obj.Other = nOther;	
		obj.Reserve = strReserve		
		this.m_pChatRoom[this.RoomsCount()] = obj ;
	}
	this.SetCount = function(nMax, nReg, nTotal)
	{	this.MaxOnline	= nMax ;
		this.RegUsers	= nReg ;
		this.TotalUsers = nTotal ;
	}
} 
var Server = new ChatServer() ;
<!--$RoomList-->
/*脚本定义完毕*/
//-->
</SCRIPT>
<style type="text/css">
<!--
body {  font-size: 11pt}
table {  font-size: 10.5pt}
a {  text-decoration: none}
a:visited {  color: #0000FF; text-decoration: none}
a:hover {  color: #FF0033; text-decoration: none}
-->
</style>
<meta name="keywords" content="语音聊天">
<meta name="keywords" content="视频聊天">
<meta name="keywords" content="语音视频聊天">
<meta name="keywords" content="可视语音聊天">
</HEAD>
<BODY bgcolor="#eeeeff" Language="JavaScript" onload="login.Alias.focus();">
<h1 align="center"><font color="#FF6666">欢迎使用MeChat&reg;聊天室</font></h1>
<!--
<A href="http://www.MeChat.com/cn/" target=_blank> mechat语音视频聊天室</A>
-->
<form name="login" action="/" method="post" onsubmit="return false;">
<TABLE cellSpacing=0 cellPadding=2 width="95%" border=0 align=center>
<TR>
      <TD align="right">[<a href="javascript:OnPrivate();">自建聊天室</a>][<a href="javascript:OnRegister();">用户注册</a>] 
[<a href="javascript:OnFindUser();">聊友查寻</a>] [<a href="allusers.htm">在线用户列表</a>][<a href="userhelp.htm" target="_blank">帮助</a>][<a href="top.htm" target="_blank">聊神榜</a>][<a href="userguide.htm" target="_blank">功能说明</a>] 
        [<a href="getpassword.htm" target="_blank">取回密码</a>][<a href="javascript:window.location.reload();">刷新列表</a>][<a href="admin/index.htm" target="_blank">后台管理</a>] 
      </TD>
    </TR>
</TABLE>
  <table cellspacing=0 cellpadding=2 width="95%" border=1 align=center class="c1">
    <tr bgcolor=#CCCCFF> 
      <td colspan=5 align=center> 本系统开放[<font color=red>
        <script>document.write(Server.RoomsCount());</script>
        </font>]个聊天室 总在线人数[<font color=red>
        <script>document.write(Server.TotalUsers);</script>
        </font>]人 最高在线[<font color=red>
        <script>document.write(Server.MaxOnline);</script>
        </font>]人 </td>
    </tr>
    <tr align=center> 
      <td width="39%"> 用户名: 
        <input type="text" name="Alias" maxlength=10 size=10>
        密码:
        <input type="password" name="Password" maxlength=10 size=10><BR>
		房间密码
        <input type="password" name="RoomPassword" maxlength=10 size=10 value="">
        <input type="hidden" name="RoomID" >
        <input type="hidden" name="boxfunc"  value="off">
      </td>
      <td width="36%"> 
        <input type="hidden" name="Sex">
        性别: 
        <input type="radio" name="radio1" onClick="login.Sex.value=0;">
        <input type="radio" name="radio1" onClick="login.Sex.value=1;">
        <input type="radio" name="radio1" onClick="login.Sex.value=2;">
        保密
      </td>
      <td width="15%"><font color="FF3366">游客登录无须密码</font></td>
      <a href="javascript:login.boxfunc.click();"></a> </tr>
  </table>
  <p>
    <!--********************************************************************************************-->
  <TABLE cellSpacing=0 cellPadding=3 width="95%" border=1 align=center>
  <TR align=middle>
	<TD><FONT face=Webdings color=#000000 size=3>6</FONT>序号</TD>
    <TD><FONT face=Webdings color=#000000 size=3>6</FONT>聊天室名称</TD>
    <TD><FONT face=Webdings color=#000000 size=3>6</FONT>在线人数</TD>
    <TD><FONT face=Webdings color=#000000 size=3>6</FONT>管理团队</TD>
    <TD><FONT face=Webdings color=#000000 size=3>6</FONT>当前话题</TD>
  </TR>
	
	<script> 
	Server.Sort() ; // 让房间按在线人数多少排序
	var Room = null;
	/*请仔细分析这段代码*/
	var j=0;
	for(var i = 0; i < Server.RoomsCount(); i ++) // 循环写房间列表
	{
		Room = Server.GetRoomObject(i) ;
		if(Room.RoomDisplay==0)
		{
			continue;
		}
		j++;
		document.write("<TR>\r\n<TD align=center>"+(j)+"</TD><TD align=left>");//写序号
		document.write("<a href='javascript:OnLogin(" + i + ");' title=点击房间名称即可进入聊天室>");
		if(Room.RoomName.length > 13)
			document.write(Room.RoomName.substring(0,10) + "</a><a href='#' onclick='OnClick(\"" + Room.RoomName + "\")'><font color=black>...</font></a>");
		else
			document.write(Room.RoomName+"</a>");		//房间名称
				
		if(Room.Private==1)document.write("[自建]");
		if(Room.Locked==1)document.write("[加锁]");
		if(Room.SupportVideo==1)document.write("[视频]");
		document.writeln("</TD><TD align=center>");
		document.writeln("<a href='javascript:OnUserList(" + i + ");' >") ;
		document.write(Room.UserCount +"/" + Room.MaxOnline+ "人"); //写房间人数
		if(Room.State==-1)document.write("(满员)") ; //写是否满员
		document.write("</a></TD>") ;
		
		document.write("<TD align=left>&nbsp;") ; // 管理员名单
		if(Room.AdminNames == "")	document.write("&nbsp;") ;
		if(Room.AdminNames.length > 13) 
			document.write("<a href='#' onclick='OnClick(\"" + Room.AdminNames + "\")'+  title="+ Room.AdminNames + ">" + Room.AdminNames.substring(0,8) + "<font color=black>...</font></a>");// 管理员
		else
			document.write(Room.AdminNames); 
		document.writeln("</TD>")		
		// 房间话题
		document.write("<TD align=left>&nbsp;") ;
		if(Room.Topic.length > 20) 
			document.write("<a href='#' onclick='OnClick(\"" + Room.Topic + "\")'  title=查看完整话题>" + Room.Topic.substring(0,10) + "<font color=red>...</font></a>"); // 房间话题
		else
			document.write(Room.Topic); // 房间话题
			
		document.writeln("</TD>\r\n</TR>");		
	}
    </script>
</TABLE>
</form>
<p align=center>&nbsp;</p>
<p align=center>MeChat开始运行时间<font color=red> 
  <script>document.write(StartTime);</script>
  </font>, 共运行了
   <script>document.write(StartDays);</script>
   <script>document.write(StartHours);</script>
  小时
   <script>document.write(StartMinutes);</script>
  <script>document.write(StartSeconds);</script>
  </p>
<p align=center>Copyright&copy; 2001 All right reserved.<br>
  <A href="http://www.mechat.com/cn/" target=_blank>MeChat&reg;语音视频聊天室</a><br>
</p>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -