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

📄 man_radio.asp

📁 基于ASP开发的聊天室源码
💻 ASP
字号:
<%Response.Expires=0
if not IsArray(Session("info")) then Response.Redirect "err1.asp?kind=01"
info=Session("info")
if InStr(Application("maninfo"),"," & info(0) & ",")<>0 then Response.Redirect "manyou.asp"
gradeinfo=Application("gradeinfo")
if gradeinfo(info(1),16)<>true then Response.Redirect "err1.asp?kind=16"
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>广播群发</title>
<script language="JavaScript">
function checksay()
{
if(document.radio.word.value=="" || document.radio.word.value==" " || document.radio.word.value==" ")
{alert("请指定广播内容!");return false;}
}
function ctlent(eventobject)
{if(event.ctrlKey)
{if(window.event.keyCode==13)
{this.document.radio.B1.click();}
}}
</script>
</head>
<body oncontextmenu="self.event.returnValue=false" style="font-size: 10pt; border: 3px double buttonface" bgcolor="buttonface" topmargin="2" leftmargin="2" link="#0000FF" vlink="#0000FF" alink="#FF0000">
<form method="POST" name="radio" action="man_radiook.asp" onsubmit='return(checksay());'>
<fieldset style="padding: 2">
            <legend><img border="0" src="images/sys.gif">广播群发</legend>
            除了你自己,所有人都将收到此广播。<br>
            <textarea name="word" onkeydown="ctlent()" style="width: 280; height:100" rows="5" cols="20"></textarea>
            </fieldset>
<div> &nbsp;&nbsp; <input type="submit" value="确定" name="B1"><input type="reset" value="重置" name="B2"><input type="button" value="关闭" onclick="javascript:window.close();" name="B3">&nbsp; (Ctrl+回车 发送)</div>
</form>
<script language="javascript">
this.document.radio.word.focus();
        </script>
</body>
</html>

⌨️ 快捷键说明

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