代码搜索：cgi
找到约 10,000 项符合「cgi」的源代码
代码结果 10,000
www.eeworm.com/read/159688/10622658
cgi msg_deleteall.cgi
$pagetitle="删除所有短消息";
sub msg_deleteall {
&put_fvar(">${userhead}info/$uid.cgi","");
&redirect("$indexurl?job=msg_inbox$userinfo","短信息已全部删除！");
}
www.eeworm.com/read/159688/10622678
cgi msg_inbox.cgi
$pagetitle="短讯中心";
sub msg_inbox {
print qq~
ie = (document.all)? true:false
if (ie){
function ctlent(eventobject){if(event.ctrlKey && window.event.keyCode==13){this.document.FORM.submi
www.eeworm.com/read/159688/10622681
cgi dbmana_add.cgi
$pagetitle="增加数据库";
&error("您没有执行此操作的权限！") if ($ulevel ne "master");
sub dbmana_add{
&error("请输入数据库说明！如“XX学期学生成绩数据库”") if (!$fields{'dbrem'} || $fields{'dbrem'} eq "在此输入数据库说明");
$setdbname=time.".
www.eeworm.com/read/159688/10622688
cgi pupil_add.cgi
$pagetitle="增加学生档案";
&error("您没有执行此操作的权限！") if ($ulevel ne "master");
sub pupil_add {
if (!$fields{'adduid'} || !$fields{'adduname'} || !$fields{'addusex'} || !$fields{'addumon'} || !$fields{'addul
www.eeworm.com/read/159688/10622700
cgi pupil_del.cgi
$pagetitle="删除学生档案";
&error("您没有执行此操作的权限！") if ($ulevel ne "master");
sub pupil_del {
&error("指定学生档案不存在！") if (!$fields{'did'} || !-e "$userhead$fields{'did'}.cgi");
&error("您没有权限删除这个档案！") if ($fi
www.eeworm.com/read/159688/10622709
cgi msg_read.cgi
$pagetitle="查看短消息";
sub msg_read {
&error("指定信息不存在！") if (!$fields{'msg'});
print qq~
function enable(btn){
btn.filters.gray.enabled=0;}
function disable(btn){
btn.filters.gray.enable
www.eeworm.com/read/159688/10622715
cgi content-type.cgi
%Content_Type = (
'*' => 'application/octet-stream',
'323' => 'text/h323',
'acx' => 'application/internet-property-stream',
'ai' => 'application/postscript',
'aif' => 'audio/x-aiff',
'aifc' => '
www.eeworm.com/read/159688/10622718
cgi msg_send_to.cgi
$pagetitle="发送短消息";
sub msg_send_to {
do "$cgihead/profile.cgi";$gtime=time;
$fields{'touser'}=$MasterID if ($fields{'touser'}=~/管理员/);
&error("错误：输入信息不完整！") if (!$fields{'touser'} || !$fields
www.eeworm.com/read/159688/10622731
cgi setclass_add.cgi
$pagetitle="增加班级";
&error("您没有执行此操作的权限！") if ($ulevel ne "master");
sub setclass_add {
if (!$fields{'classname'} || !$fields{'must1'}) {
&redirect("$indexurl?job=setclass$userinfo","班级名称及必修课不能为空！"
www.eeworm.com/read/159656/10629710
cgi list_nat.cgi
#!/usr/bin/perl
#======================================================================
# Turtle Firewall webmin module
#
# Copyright (c) Andrea Frigido
# You may distribute under the terms of either