📄 chat-func.pl
字号:
sub return_func {
print "<html><head>";
print "<LINK REL=stylesheet HREF='$cssurl' TYPE='text/css'>";
print "<title>Func</title>\n";
print "<script>\n";
print "function likai() {\n";
print "if(confirm('真的要走？')) ";
print "{document.logout.submit();} ";
print "else return;\n";
print "}\n";
print "function openit() {\n";
print "mywin=window.open('about:blank','mytarget','menubar=yes,toolbar=no,location=no,directories=no,status=no,scrollbars=1,resizable=1,width=500,height=300');\n";
#print "mywin.moveTo(100,50)\;";
print "}\n";
print "</script>\n";
print "</head>\n";
print "<body bgcolor=$funcback text=$funcword link=red vlink=lime alink=yellow>\n";
print "<center><form method=POST>\n";
print "<input type=button value=离开 $buttonstyle onclick='likai();'>\n";
print "<input type=button value=排名 $buttonstyle onclick='js:{openit();document.displaycount.submit();}'>\n";
print "<input type=button value='请勿打扰' $buttonstyle onclick='js:{openit();document.dnd.submit();}'>\n";
print "<input type=button value='侃客留言' $buttonstyle onclick='js:{openit();document.guestbook.submit();}'>\n";
print "<input type=button value='资料配置' $buttonstyle onclick='js:{openit();document.chgmypwd.submit();}'>\n";
print "<input type=button value='访问记录' $buttonstyle onclick='js:{openit();document.showcount.submit();}'>\n";
require "$chathead/chat-chkusers.pl";
if (($userlevel>=$level_kick)||(&check_kick eq 1))
{print "<input type=button value=踢人 $buttonstyle onclick='js:{openit();document.setkick.submit();}'>\n";}
print "<input type=button value=帐号管理 $buttonstyle onclick='js:{openit();document.setright.submit();}'>\n" if ($userlevel>=$level_right);
print "<input type=button value=系统日志 $buttonstyle onclick='js:{openit();document.kicklog.submit();}'>\n" if ($userlevel>=$level_kicklog);
print "<input type=button value='踢ＩＰ' $buttonstyle onclick='js:{openit();document.showkickip.submit();}'>\n" if ($userlevel>=$level_kicklog);
print "<input type=button value='录音功能' $buttonstyle onclick='js:{openit();document.showrecord.submit();}'>\n" if ($userlevel>=$level_high);
print "</form>\n";
print "<form method=post name=displaycount action=$cgiurl?job=displaycount target='mytarget'>";
print "<input type=hidden name=username value='$username'>";
print "</form>\n";
print "<form method=get name=guestbook action=$guestbook target='mytarget'>";
print "<input type=hidden name=username value='$username'><input type=hidden name=userpassword value='$userpassword'>";
print "</form>\n";
$changelogouturl="&changelogouturl=$changelogouturl" if ($changelogouturl ne "");
print "<form method=post name=logout action=$cgiurl?job=logout$userinfo2&changelogouturl target=_top>";
print "<input type=hidden name=username value='$username'><input type=hidden name=userpassword value='$userpassword'>";
print "</form>\n";
print "<form method=post name=showkickip action=$cgiurl?job=showkickip$userinfo2 target='mytarget'>";
print "<input type=hidden name=username value='$username'><input type=hidden name=userpassword value='$userpassword'>";
print "</form>\n";
if (($userlevel>=$level_kick)||(&check_kick eq 1))
{
print "<form method=post name=setkick action=$cgiurl?job=setkick$userinfo2 target='mytarget'>";
print "<input type=hidden name=username value='$username'><input type=hidden name=userpassword value='$userpassword'>";
print "</form>\n";
}
print "<form method=post name=setright action=$cgiurl?job=setright$userinfo2 target='mytarget'><input type=hidden name=username value='$username'><input type=hidden name=userpassword value='$userpassword'></form>\n" if ($userlevel>=$level_right);
print "<form method=post name=chgmypwd action=$cgiurl?job=chgmypwd$userinfo2 target='mytarget'><input type=hidden name=username value='$username'><input type=hidden name=userpassword value='$userpassword'></form>\n" if ($userlevel>=$level_chgmypwd);
print "<form method=post name=showrecord action=$cgiurl?job=showrecord$userinfo2 target='mytarget'><input type=hidden name=username value='$username'><input type=hidden name=userpassword value='$userpassword'></form>\n" if ($userlevel>=$level_high);
print "<form method=post name=kicklog action=$cgiurl?job=kicklog$userinfo2 target='mytarget'><input type=hidden name=username value='$username'><input type=hidden name=userpassword value='$userpassword'></form>\n" if ($userlevel>=$level_kicklog);
print "<form method=post name=showcount action=$cgiurl?job=showcount target='mytarget'><input type=hidden name=username value='$username'><input type=hidden name=userpassword value='$userpassword'></form>\n";
print "<form method=post name=dnd action=$cgiurl?job=dnd$userinfo2 target='mytarget'><input type=hidden name=username value='$username'><input type=hidden name=userpassword value='$userpassword'></form>\n";
print "</center></body></html>\n";
}
1;⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -