📄 msg_inbox.cgi
字号:
$pagetitle="短讯中心";
sub msg_inbox {
print qq~
<script>
ie = (document.all)? true:false
if (ie){
function ctlent(eventobject){if(event.ctrlKey && window.event.keyCode==13){this.document.FORM.submit();}}
}
function HighlightAll(theField) {
var tempval=eval("document."+theField)
tempval.focus()
tempval.select()
therange=tempval.createTextRange()
therange.execCommand("Copy")}
function openscript(url, width, height) {
var Win = window.open(url,"openwindow",'width=' + width + ',height=' + height + ',resizable=1,scrollbars=yes,menubar=yes,status=yes' );
}
function enable(btn){
btn.filters.gray.enabled=0;}
function disable(btn){
btn.filters.gray.enabled=1;}
function CheckAll(form)
{
for (var i=0;i<form.elements.length;i++)
{
var e = form.elements[i];
e.checked = true;
}
}
function FanAll(form)
{
for (var i=0;i<form.elements.length;i++)
{
var e = form.elements[i];
if (e.checked == true){
e.checked = false;
}
else {
e.checked = true;
}
}
}
</script>
<style>
.gray {CURSOR:hand;filter:gray}
</style>
<body bgcolor=#ffffff topmargin=10 leftmargin=10>
<table cellpadding=0 cellspacing=0 border=0 width=95% bgcolor=#000000 align=center>
<tr><td>
<table cellpadding=3 cellspacing=1 border=0 width=100%>
<form action="$indexurl?job=msg_delete$userinfo" method=post>
<tr>
<td bgcolor=#e8f4ff align=center colspan=4><font color=#333333><b>欢迎您的来到短讯中心，<font face=Verdana>$uname</font></b></td>
</tr>
<tr>
<td bgcolor=#c8e4ff align=center colspan=4><a href="$indexurl?job=msg_inbox$userinfo"><img src=images/inboxpm.gif border=0 alt="收件箱" class="gray" onmouseover="enable(this)" onmouseout="disable(this)" width=50 height=40></a> <a href="$indexurl?job=msg_send$userinfo"><img src=images/newpm.gif border=0 alt="发送消息" class="gray" onmouseover="enable(this)" onmouseout="disable(this)" width=50 height=40></a> <img src=images/replypm.gif border=0 alt="回复消息" class="gray" onmouseover="enable(this)" onmouseout="disable(this)" width=50 height=40></a> <img src=images/deletepm.gif border=0 alt="删除消息" class="gray" onmouseover="enable(this)" onmouseout="disable(this)" width=50 height=40></a></td>
</tr>
<tr>
<td bgcolor=#c8e4ff align=center><font color=#333333><b>发件人</b></td>
<td bgcolor=#c8e4ff align=center><font color=#333333><b>主题</b></td>
<td bgcolor=#c8e4ff align=center><font color=#333333><b>是否已读</b></td>
<td bgcolor=#c8e4ff align=center><font color=#333333><b>删除标记</b></td>
</tr>
~;
open(FILE, "${userhead}info/$uid.cgi");
foreach (<FILE>) {
($mid,$mgzt,$msid,$msname,$msemail,$msubject,$mcontent,$mstime,$msmode,$mtemp1,$mtemp2,$mtemp3,$end) = split(/\‖/,$_);
if ($mgzt eq new) {$get_read="<img src=images/unread.gif border=0 alt=未读 width=16 height=12>";}
else {$get_read="<img src=images/read.gif border=0 alt=已读 width=16 height=14>";}
print qq~
<tr>
<td bgcolor=#c8e4ff align=center><font color=#333333><img src=images/88.gif align=absmiddle><a href='$indexurl?job=msg_send&touser=$msid$userinfo' title='给[$msname]发送一条短信息！'>$msname\[$mid]</a></td>
<td bgcolor=#c8e4ff><font color=#333333><a href="$indexurl?job=msg_read&msg=$mid$userinfo">$msubject</a></td>
<td bgcolor=#c8e4ff align=center>$get_read</td>
<td bgcolor=#c8e4ff align=center><font color=#333333><b><input type="checkbox" name="msg" value="$mid"></b></td>
</tr>
~;
}
close(FILE);
print qq~
<tr>
<td bgcolor=#e8f4ff align=center colspan=4><font color=#333333><a href='$indexurl?job=msg_deleteall$userinfo'>[删除所有]</a> <input type="button" name="chkall" value="全选" onclick="CheckAll(this.form)" class=input>
<input type="button" name="clear2" value="反选" onclick="FanAll(this.form)" class=input>
<input type="reset" name="Reset" value="重置" class=input>
<input type="submit" name="delete" value="删除" class=input></td>
</tr>
</table></td></tr></table>
~;
}⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -