📄 add.cgi
字号:
{alert(\"请填写至少一首歌曲!\");return false;}if(document.theform.link1.value==\"\")
{alert(\"请填写至少一首歌曲链接地址!\");return false;}if(document.theform.kindin.value==\"\")
{alert(\"请选择歌手!\");return false;}if(document.theform.kindin.value==\"#\")
{alert(\"您选择的不是歌手，而是分类，请重新选择!\");return false;}}</script></BODY></HTML>
EOF
}
#############################
sub addin{&jumplist;
$name=$FORM{'name'};
$kindin=$FORM{'kindin'};
$temp=0;
open(RECORED,"$datahead/$kindin\.txt"); @oldrecored=<RECORED>; close (RECORED); $oldrecored=$oldrecored[0];
if ($oldrecored eq ""){ $savefile="$kindin\-0|$name|$FORM{'imgurl'}|$FORM{'name1'}|$FORM{'link1'}|$FORM{'name2'}|$FORM{'link2'}|$FORM{'name3'}|$FORM{'link3'}|$FORM{'name4'}|$FORM{'link4'}|$FORM{'name5'}|$FORM{'link5'}|$FORM{'name6'}|$FORM{'link6'}|$FORM{'name7'}|$FORM{'link7'}|$FORM{'name8'}|$FORM{'link8'}|$FORM{'name9'}|$FORM{'link9'}|$FORM{'name10'}|$FORM{'link10'}|$FORM{'name11'}|$FORM{'link11'}|$FORM{'name12'}|$FORM{'link12'}|$FORM{'name13'}|$FORM{'link13'}|$FORM{'name14'}|$FORM{'link14'}|$FORM{'name15'}|$FORM{'link15'}|$FORM{'name16'}|$FORM{'link16'}|$FORM{'name17'}|$FORM{'link17'}|$FORM{'name18'}|$FORM{'link18'}\n";
&addgsname;
$new="$kindin\-$temp|新增$gs_name专辑【$name】|$date|$FORM{'imgurl'}\n"; &savefile}
else{ foreach $oldrecored (@oldrecored){ $oldrecored=~ s/\n//g; @one_oldrecored = split(/\|/,$oldrecored); @a_one_oldrecored = split(/\-/,$one_oldrecored[0]); if ($temp < $a_one_oldrecored[3]){$temp=$a_one_oldrecored[3];}}
$temp++; $savefile="$kindin\-$temp|$name|$FORM{'imgurl'}|$FORM{'name1'}|$FORM{'link1'}|$FORM{'name2'}|$FORM{'link2'}|$FORM{'name3'}|$FORM{'link3'}|$FORM{'name4'}|$FORM{'link4'}|$FORM{'name5'}|$FORM{'link5'}|$FORM{'name6'}|$FORM{'link6'}|$FORM{'name7'}|$FORM{'link7'}|$FORM{'name8'}|$FORM{'link8'}|$FORM{'name9'}|$FORM{'link9'}|$FORM{'name10'}|$FORM{'link10'}|$FORM{'name11'}|$FORM{'link11'}|$FORM{'name12'}|$FORM{'link12'}|$FORM{'name13'}|$FORM{'link13'}|$FORM{'name14'}|$FORM{'link14'}|$FORM{'name15'}|$FORM{'link15'}|$FORM{'name16'}|$FORM{'link16'}|$FORM{'name17'}|$FORM{'link17'}|$FORM{'name18'}|$FORM{'link18'}\n";
&addgsname;
$new="$kindin\-$temp|新增$gs_name专辑【$name】|$date|$FORM{'imgurl'}\n"; &savefile
}
print <<EOF;
<HTML><HEAD><TITLE>添加专辑</TITLE><META content=text/html; charset=gb2312 http-equiv=Content-Type><STYLE type=text/css>TD { FONT-FAMILY: 宋体; FONT-SIZE: 9pt } BODY { FONT-FAMILY: 宋体; FONT-SIZE: 9pt } SELECT { FONT-FAMILY: 宋体; FONT-SIZE: 9pt } A { COLOR:blue; FONT-FAMILY: 宋体; FONT-SIZE: 9pt; TEXT-DECORATION: none } A:hover { COLOR:red; FONT-FAMILY: 宋体; TEXT-DECORATION: underline; font-site: 9pt --> }</STYLE></HEAD><BODY bgColor=#ffffdf leftMargin=4 topMargin=5 onLoad=><p align=center><font size=3><b>添加专辑</b></font>
<div align=center><br>
<table width=100% border=0 cellspacing=0 cellpadding=0 align=center> <tr> <td> <div align=center>$bannershow</div> </td> </tr> <tr bgcolor=#FFFFDF> <td>
</td> </tr> <tr> <td> <table width=100% border=0 cellspacing=0 cellpadding=0 align=center> <tr bgcolor=#FFFFDF> <td>
<table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td>
<form method=post action=$adminurl name=theform onsubmit=\"return formCheck()\"> <table width=500 border=0 cellspacing=5 cellpadding=0><p>专辑名称：<input type="text" name="name"> 图片：<input type="text" name="imgurl" value="$images/no.jpg" size="30"></p>
<p> 歌曲 1：<input type="text" name="name1"> 地址：<input type="text" name="link1" size="30"></p>
<p> 歌曲 2：<input type="text" name="name2"> 地址：<input type="text" name="link2" size="30"></p>
<p> 歌曲 3：<input type="text" name="name3"> 地址：<input type="text" name="link3" size="30"></p>
<p> 歌曲 4：<input type="text" name="name4"> 地址：<input type="text" name="link4" size="30"></p>
<p> 歌曲 5：<input type="text" name="name5"> 地址：<input type="text" name="link5" size="30"></p>
<p> 歌曲 6：<input type="text" name="name6"> 地址：<input type="text" name="link6" size="30"></p>
<p> 歌曲 7：<input type="text" name="name7"> 地址：<input type="text" name="link7" size="30"></p>
<p> 歌曲 8：<input type="text" name="name8"> 地址：<input type="text" name="link8" size="30"></p>
<p> 歌曲 9：<input type="text" name="name9"> 地址：<input type="text" name="link9" size="30"></p>
<p> 歌曲10：<input type="text" name="name10"> 地址：<input type="text" name="link10" size="30"></p>
<p> 歌曲11：<input type="text" name="name11"> 地址：<input type="text" name="link11" size="30"></p>
<p> 歌曲12：<input type="text" name="name12"> 地址：<input type="text" name="link12" size="30"></p>
<p> 歌曲13：<input type="text" name="name13"> 地址：<input type="text" name="link13" size="30"></p>
<p> 歌曲14：<input type="text" name="name14"> 地址：<input type="text" name="link14" size="30"></p>
<p> 歌曲15：<input type="text" name="name15"> 地址：<input type="text" name="link15" size="30"></p>
<p> 歌曲16：<input type="text" name="name16"> 地址：<input type="text" name="link16" size="30"></p>
<p> 歌曲17：<input type="text" name="name17"> 地址：<input type="text" name="link17" size="30"></p>
<p> 歌曲18：<input type="text" name="name18"> 地址：<input type="text" name="link18" size="30"></p>
<div align=center> <input type=submit name=Submit value=将此电影歌曲添加进库记录><input type=hidden value=addin name=menu><input type=hidden value=$id name=id><input type=hidden value=$password name=password> </div> </td> </tr> <tr> <td><p>$upload_html</p></td> </tr> </table>
</td><td valign=top><select name=kindin size=30><option>选择类型</option>$kindsigno</select></td></tr></table></form>
</td> </tr> </table> </td> </tr> <tr> <td></td> </tr> <tr> <td> <div align=center><font color=#0054a8 class=bfont>$bqsm</font></div> </td> </tr> <tr> <td> <div align=right></div> <div align=center></div> </td> </tr></table><script language=\"JavaScript\">
function formCheck()
{if(document.theform.name.value==\"\")
{alert(\"请填写专辑名称!\");return false;}if(document.theform.imgurl.value==\"\")
{alert(\"请填写图片链接地址!\");return false;}if(document.theform.name1.value==\"\")
{alert(\"请填写至少一首歌曲!\");return false;}if(document.theform.link1.value==\"\")
{alert(\"请填写至少一首歌曲链接地址!\");return false;}if(document.theform.kindin.value==\"\")
{alert(\"请选择歌手!\");return false;}if(document.theform.kindin.value==\"#\")
{alert(\"您选择的不是歌手，而是分类，请重新选择!\");return false;}}</script></BODY></HTML>
<script language=\"JavaScript\">
<!--
alert(\"添加记录动作已经完成，请继续添加或进行其他动作。\");
// -->
</script>
EOF
}
##################################
sub jumplist{ open(JUMPLIST,"$listfile"); @jumplist=<JUMPLIST>; close (JUMPLIST);
foreach $jumplist (@jumplist) { @onejumplist = split(/\#/,$jumplist);
foreach $onejumplist (@onejumplist) {$onejumplist=~ s/\n//g; @onejumplisttemp = split(/\|/,$onejumplist);
if($onejumplisttemp[0] =~/^[a-zA-Z]/){$kindin=$onejumplisttemp[0]; $outjumplist.="<option value=#><=$onejumplisttemp[1]=></option>\n"; }
else {
if ($FORM{'kindin'} eq "$kindin\-$onejumplisttemp[0]") { $outjumplist.="<option value=$kindin\-$onejumplisttemp[0] selected>$onejumplisttemp[1]</option>\n";
}else{ $outjumplist.="<option value=$kindin\-$onejumplisttemp[0]>$onejumplisttemp[1]</option>\n"; }}
} }$kindsigno=$outjumplist;
}
##################################
sub savefile{
open(SAVEFILE,"$datahead/$kindin\.txt"); @savefilefix=<SAVEFILE>; close (SAVEFILE);
foreach $savefilefix (@savefilefix){$savefilefix=~ s/\n//g; if ($savefilefix ne ""){$savefiles.="$savefilefix\n";}}$savefiles.=$savefile;
open(SAVEFILE,">$datahead/$kindin\.txt"); print SAVEFILE $savefiles; close (SAVEFILE);
open(SAVENEW,"$newdata"); @new_temp=<SAVENEW>; close (SAVENEW);
@newxz=$new;
$news=$news-1;
while($i<$news){
@newxz=(@newxz,$new_temp[$i]);
$i++;
}
open(SAVENEW,">$newdata"); print SAVENEW @newxz; close (SAVENEW);}
#################################
sub filelist{ open(JUMPLIST,"$listfile"); @jumplist=<JUMPLIST>; close (JUMPLIST);
foreach $jumplist (@jumplist) { @onejumplist = split(/\#/,$jumplist);
foreach $onejumplist (@onejumplist) {$onejumplist=~ s/\n//g; @onejumplisttemp = split(/\|/,$onejumplist);
if($onejumplisttemp[0] =~/^[a-zA-Z]/){$kindin=$onejumplisttemp[0]; $kindtemp=$onejumplisttemp[1]; }
else { $outjumplist.="<option value=$adminurl?files=$kindin\-$onejumplisttemp[0]&menu=modshow&id=$id&password=$password>$kindtemp==>$onejumplisttemp[1]</option>\n"; }
} }
}
###################################
sub modshow{
&filelist;
$files=$FORM{'files'};
open(LIST,"$datahead/$files\.txt"); @kindlist=<LIST>; close (LIST);
foreach $one_kindlist (@kindlist) { $one_kindlist=~ s/\n//g; @one_kindlist = split(/\|/,$one_kindlist); $kingsoftlist.="<br><div align=center><table width=25% border=0 cellspacing=0 cellpadding=0 align=center> <tr> <td width=25%><div=center><a href=$adminurl?menu=mod&mod=$one_kindlist[0]&id=$id&password=$password>$one_kindlist[1]</a></div></td></tr></table></div>";}
print <<EOF;
<HTML><HEAD><TITLE>修改专辑</TITLE><META content=text/html; charset=gb2312 http-equiv=Content-Type><STYLE type=text/css>TD { FONT-FAMILY: 宋体; FONT-SIZE: 9pt } BODY { FONT-FAMILY: 宋体; FONT-SIZE: 9pt } SELECT { FONT-FAMILY: 宋体; FONT-SIZE: 9pt } A { COLOR:blue; FONT-FAMILY: 宋体; FONT-SIZE: 9pt; TEXT-DECORATION: none } A:hover { COLOR:red; FONT-FAMILY: 宋体; TEXT-DECORATION: underline; font-site: 9pt --> }</STYLE>
<script language=\"JavaScript\">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+\".location='\"+selObj.options[selObj.selectedIndex].value+\"'\");
if (restore) selObj.selectedIndex=0;
}
//-->
</script>
</head>
<body bgcolor=#FFFFdF><p align=center><font size=3><b>修改记录</b></font><div align=center>
<select name=\"menu1\" onChange=\"MM_jumpMenu(\'parent.frames[\\'main\\']'\,this\,0)\">
<option selected>请选择你欲修改的歌手</option>$outjumplist
</select></div>
EOF
print $kingsoftlist;
print "<br><br><br><br><br><br><br><br><br><div align=center><font color=#0054a8 class=bfont>$bqsm</font></div></body></html>";
exit;
}
##################
sub mod{
$mod = $FORM{'mod'};
@mod = split(/\-/,$mod);
open(MODDATA,"$datahead/$mod[0]\-$mod[1]\-$mod[2]\.txt"); @moddata=<MODDATA>; close (MODDATA);
foreach $moddata (@moddata) { @moddata_mod = split(/\|/,$moddata);if ($moddata_mod[0] eq $mod) { &modout; } }
}
sub modout{
print <<EOF;
<HTML><HEAD><TITLE>修改专辑</TITLE><META content=text/html; charset=gb2312 http-equiv=Content-Type><STYLE type=text/css>TD { FONT-FAMILY: 宋体; FONT-SIZE: 9pt } BODY { FONT-FAMILY: 宋体; FONT-SIZE: 9pt } SELECT { FONT-FAMILY: 宋体; FONT-SIZE: 9pt } A { COLOR:blue; FONT-FAMILY: 宋体; FONT-SIZE: 9pt; TEXT-DECORATION: none } A:hover { COLOR:red; FONT-FAMILY: 宋体; TEXT-DECORATION: underline; font-site: 9pt --> }</STYLE></HEAD><BODY bgColor=#ffffdf leftMargin=4 topMargin=5 onLoad=><p align=center><font size=3><b>修改专辑</b></font>
<div align=center><br>
<table width="100%" border="0" cellspacing="0" cellpadding="0"> <tr> <td><p align=center>
<form method=post action=$adminurl name=theform onsubmit=\"return formCheck()\"> <table width=500 border=0 cellspacing=5 cellpadding=0><p>专辑名称：<input type="text" name="name" value=$moddata_mod[1]> 图片：<input type="text" name="imgurl" size="30" value=$moddata_mod[2]></p>
<p> 歌曲 1：<input type="text" name="name1" value=$moddata_mod[3]> 地址：<input type="text" name="link1" size="30" value=$moddata_mod[4]></p>
<p> 歌曲 2：<input type="text" name="name2" value=$moddata_mod[5]> 地址：<input type="text" name="link2" size="30" value=$moddata_mod[6]></p>
<p> 歌曲 3：<input type="text" name="name3" value=$moddata_mod[7]> 地址：<input type="text" name="link3" size="30" value=$moddata_mod[8]></p>
<p> 歌曲 4：<input type="text" name="name4" value=$moddata_mod[9]> 地址：<input type="text" name="link4" size="30" value=$moddata_mod[10]></p>
<p> 歌曲 5：<input type="text" name="name5" value=$moddata_mod[11]> 地址：<input type="text" name="link5" size="30" value=$moddata_mod[12]></p>
<p> 歌曲 6：<input type="text" name="name6" value=$moddata_mod[13]> 地址：<input type="text" name="link6" size="30" value=$moddata_mod[14]></p>
<p> 歌曲 7：<input type="text" name="name7" value=$moddata_mod[15]> 地址：<input type="text" name="link7" size="30" value=$moddata_mod[16]></p>
<p> 歌曲 8：<input type="text" name="name8" value=$moddata_mod[17]> 地址：<input type="text" name="link8" size="30" value=$moddata_mod[18]></p>
<p> 歌曲 9：<input type="text" name="name9" value=$moddata_mod[19]> 地址：<input type="text" name="link9" size="30" value=$moddata_mod[20]></p>
<p> 歌曲10：<input type="text" name="name10" value=$moddata_mod[21]> 地址：<input type="text" name="link10" size="30" value=$moddata_mod[22]></p>
<p> 歌曲11：<input type="text" name="name11" value=$moddata_mod[23]> 地址：<input type="text" name="link11" size="30" value=$moddata_mod[24]></p>
<p> 歌曲12：<input type="text" name="name12" value=$moddata_mod[25]> 地址：<input type="text" name="link12" size="30" value=$moddata_mod[26]></p>
<p> 歌曲13：<input type="text" name="name13" value=$moddata_mod[27]> 地址：<input type="text" name="link13" size="30" value=$moddata_mod[28]></p>
<p> 歌曲14：<input type="text" name="name14" value=$moddata_mod[29]> 地址：<input type="text" name="link14" size="30" value=$moddata_mod[30]></p>
<p> 歌曲15：<input type="text" name="name15" value=$moddata_mod[31]> 地址：<input type="text" name="link15" size="30" value=$moddata_mod[32]></p>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -