📄 change_htm.cgi

📁 信息管理系统
💻 CGI
字号:
#!/perl/bin/perl
require "./setup.pl";
use CGI;
my $co=CGI->new();
my $id=$co->cookie('id');
my $key=$co->cookie('key');
print "Content-type: text/html\n\n";
unless (($id eq $supername)&&($key eq $superkey))  
{&error("error(040)");}
$name2=$co->param('name2');
$filename=$co->param('mydir');
&check($name2,$filename);
unless (-e "$realpath/data/$name2/$filename.dat") {&error("file not found");}
open (f,"$realpath/content/$name2/$filename.ctt");  
$protext=<f>;
close f;
open (f,"$realpath/data/$name2/$filename.dat"); 
@tempinfo=split(/=/,<f>);
close f;
open (f,"$realpath/intro/$name2/$filename.itd"); 
($product1,$product2)=split(/=/,<f>);
close f;
open (f,"$realpath/price/$name2/$filename.pie"); 
($price1,$price2,$price3,$price4,$price5)=split(/=/,<f>);
close f;
($price51,$price52)=split(/-/,$price5);
open (f,"$realpath/count/$name2/$filename.cnt"); 
$procount=<f>;
close f;
print qq~
<html>
<head><title>change</title></head>
<body>
<pre>
<form action=data.cgi>
name:                         <input type="text" name="product1" size="12" value="$product1" onfocus="if (value =='$product1'){value =''}" onblur="if (value ==''){value='$product1'}"><br>  
pic path:                     <input type="text" name="product2" size="12" value="$product2" onfocus="if (value =='$product2'){value =''}" onblur="if (value ==''){value='$product2'}"><br>  
Recording Format:             <input type="text" name="info2" maxlength="20" size="12" value="$tempinfo[0]" onfocus="if (value =='$tempinfo[0]'){value =''}" onblur="if (value ==''){value='$tempinfo[0]'}"><br>
CCD Quantity:                 <input type="text" name="info3" maxlength="20" size="12" value="$tempinfo[1]" onfocus="if (value =='$tempinfo[1]'){value =''}" onblur="if (value ==''){value='$tempinfo[1]'}"><br> 
CCD Pixels:                   <input type="text" name="info4" maxlength="20" size="12" value="$tempinfo[2]" onfocus="if (value =='$tempinfo[2]'){value =''}" onblur="if (value ==''){value='$tempinfo[2]'}"><br> 
Recording System:             <input type="text" name="info5" maxlength="20" size="12" value="$tempinfo[3]" onfocus="if (value =='$tempinfo[3]'){value =''}" onblur="if (value ==''){value='$tempinfo[3]'}"><br>
Optical Zoom:                 <input type="text" name="info6" maxlength="20" size="12" value="$tempinfo[4]" onfocus="if (value =='$tempinfo[4]'){value =''}" onblur="if (value ==''){value='$tempinfo[4]'}"><br>
LCD Panel Size:               <input type="text" name="info7" maxlength="20" size="12" value="$tempinfo[5]" onfocus="if (value =='$tempinfo[5]'){value =''}" onblur="if (value ==''){value='$tempinfo[5]'}"><br>
Audio Format:                 <input type="text" name="info8" maxlength="20" size="12" value="$tempinfo[6]" onfocus="if (value =='$tempinfo[6]'){value =''}" onblur="if (value ==''){value='$tempinfo[6]'}"><br>
Type:                         <input type="text" name="info9" maxlength="20" size="12" value="$tempinfo[7]" onfocus="if (value =='$tempinfo[7]'){value =''}" onblur="if (value ==''){value='$tempinfo[7]'}"><br> 
Digital Zoom:                 <input type="text" name="info10" maxlength="20" size="12" value="$tempinfo[8]" onfocus="if (value =='$tempinfo[8]'){value =''}" onblur="if (value ==''){value='$tempinfo[8]'}"><br> 
Lens Focal Length:            <input type="text" name="info11" maxlength="20" size="12" value="$tempinfo[9]" onfocus="if (value =='$tempinfo[9]'){value =''}" onblur="if (value ==''){value='$tempinfo[9]'}"><br>
LCD Display:                  <input type="text" name="info12" maxlength="20" size="12" value="$tempinfo[10]" onfocus="if (value =='$tempinfo[10]'){value =''}" onblur="if (value ==''){value='$tempinfo[10]'}"><br> 
Color Viewfinder:             <input type="text" name="info13" maxlength="20" size="12" value="$tempinfo[11]" onfocus="if (value =='$tempinfo[11]'){value =''}" onblur="if (value ==''){value='$tempinfo[11]'}"><br>
Image Stabilizer:             <input type="text" name="info14" maxlength="20" size="12" value="$tempinfo[12]" onfocus="if (value =='$tempinfo[12]'){value =''}" onblur="if (value ==''){value='$tempinfo[12]'}"><br>
Digital Still Shot Mode:      <input type="text" name="info15" maxlength="20" size="12" value="$tempinfo[13]" onfocus="if (value =='$tempinfo[13]'){value =''}" onblur="if (value ==''){value='$tempinfo[13]'}"><br>
Multimedia Card:              <input type="text" name="info16" maxlength="20" size="12" value="$tempinfo[14]" onfocus="if (value =='$tempinfo[14]'){value =''}" onblur="if (value ==''){value='$tempinfo[14]'}"><br>
Low Lux:                      <input type="text" name="info17" maxlength="20" size="12" value="$tempinfo[15]" onfocus="if (value =='$tempinfo[15]'){value =''}" onblur="if (value ==''){value='$tempinfo[15]'}"><br>
Recommended Illumination:     <input type="text" name="info18" maxlength="20" size="12" value="$tempinfo[16]" onfocus="if (value =='$tempinfo[16]'){value =''}" onblur="if (value ==''){value='$tempinfo[16]'}"><br>
Recording Speed:              <input type="text" name="info19" maxlength="20" size="12" value="$tempinfo[17]" onfocus="if (value =='$tempinfo[17]'){value =''}" onblur="if (value ==''){value='$tempinfo[17]'}"><br>
MPEG Movie Mode:              <input type="text" name="info20" maxlength="20" size="12" value="$tempinfo[18]" onfocus="if (value =='$tempinfo[18]'){value =''}" onblur="if (value ==''){value='$tempinfo[18]'}"><br>
Outputs:                      <input type="text" name="info21" maxlength="20" size="12" value="$tempinfo[19]" onfocus="if (value =='$tempinfo[19]'){value =''}" onblur="if (value ==''){value='$tempinfo[19]'}"><br> 
Video In/Out:                 <input type="text" name="info22" maxlength="20" size="12" value="$tempinfo[20]" onfocus="if (value =='$tempinfo[20]'){value =''}" onblur="if (value ==''){value='$tempinfo[20]'}"><br>
Audio In/Out:                 <input type="text" name="info23" maxlength="20" size="12" value="$tempinfo[21]" onfocus="if (value =='$tempinfo[21]'){value =''}" onblur="if (value ==''){value='$tempinfo[21]'}"><br>
DV Terminal:                  <input type="text" name="info24" maxlength="20" size="12" value="$tempinfo[22]" onfocus="if (value =='$tempinfo[22]'){value =''}" onblur="if (value ==''){value='$tempinfo[22]'}"><br>
Interface Type:               <input type="text" name="info25" maxlength="20" size="12" value="$tempinfo[23]" onfocus="if (value =='$tempinfo[23]'){value =''}" onblur="if (value ==''){value='$tempinfo[23]'}"><br>
Battery Type:                 <input type="text" name="info26" maxlength="20" size="12" value="$tempinfo[24]" onfocus="if (value =='$tempinfo[24]'){value =''}" onblur="if (value ==''){value='$tempinfo[24]'}"><br>
Weight:                       <input type="text" name="info27" maxlength="20" size="12" value="$tempinfo[25]" onfocus="if (value =='$tempinfo[25]'){value =''}" onblur="if (value ==''){value='$tempinfo[25]'}"><br> 
Depth:                        <input type="text" name="info28" maxlength="20" size="12" value="$tempinfo[26]" onfocus="if (value =='$tempinfo[26]'){value =''}" onblur="if (value ==''){value='$tempinfo[26]'}"><br> 
Height:                       <input type="text" name="info29" maxlength="20" size="12" value="$tempinfo[27]" onfocus="if (value =='$tempinfo[27]'){value =''}" onblur="if (value ==''){value='$tempinfo[27]'}"><br>
Width:                        <input type="text" name="info30" maxlength="20" size="12" value="$tempinfo[28]" onfocus="if (value =='$tempinfo[28]'){value =''}" onblur="if (value ==''){value='$tempinfo[28]'}"><br>
product introduce:<br><textarea cols="40" rows="20" name="protext">$protext</textarea><br>
your price:                   <input type="text" name="price51" maxlength="20" size="6" value="$price51" onfocus="if (value =='$price51'){value =''}" onblur="if (value ==''){value='$price51'}">-<input type="text" name="price52" maxlength="20" size="6" value="$price52" onfocus="if (value =='$price52'){value =''}" onblur="if (value ==''){value='$price52'}"><br>
Comet price:                  <input type="text" name="price1" maxlength="20" size="12" value="$price1" onfocus="if (value =='$price1'){value =''}" onblur="if (value ==''){value='$price1'}"><br>
Currys price:                 <input type="text" name="price2" maxlength="20" size="12" value="$price2" onfocus="if (value =='$price2'){value =''}" onblur="if (value ==''){value='$price2'}"><br>
Dixons price:                 <input type="text" name="price3" maxlength="20" size="12" value="$price3" onfocus="if (value =='$price3'){value =''}" onblur="if (value ==''){value='$price3'}"><br>
Tesco price:                  <input type="text" name="price4" maxlength="20" size="12" value="$price4" onfocus="if (value =='$price4'){value =''}" onblur="if (value ==''){value='$price4'}"><br>
<input type=hidden name=id value=$id>
<input type=hidden name=name2 value=$name2>
<input type=hidden name=procount value=$procount>
<input type=hidden name=action value=$filename>
<input type=hidden name=key value=$key>
<input type="submit" name="Submit" value=" OK ">
</form> 
</pre>
</body>
</html>
~;
⌨️ 快捷键说明

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