△▲　WebProg 初心者の質問 Part8　▼▽

△▲　WebProg 初心者の質問 Part8　▼▽at PHP

△▲　WebProg 初心者の質問 Part8　▼▽ - 暇つぶし2ch■コピペモード
□スレを通常表示
□オプションモード
□このｽﾚｯﾄﾞのURL
■項目テキスト

850:836
 04/05/26 17:37 
>>837 
>>840 
皆さま 
レスありがとうございました。 
参考になるサイト等ございましたら、引き続きご教示願います。

851:nobodyさん
 04/05/26 17:40 
>>844 
<?php 
header("Content-type: application/zip"); 
header("Content-Disposition: attachment; filename=001.zip"); 
readfile("001.zip"); 
exit; 
?>

852:838
 04/05/26 18:48 
>>844 >>851 
ありがとです。Perl、PHP共なんとか出来ました。 
追加質問で、PHPでMIMEタイプを自動的に取得するにはどうしたらいいのでしょうか？ 
mime_content_typeを使わずに判別するには…。

853:nobodyさん
 04/05/27 14:41 fquSccy3
日替わりでリンク先を替えるCGIなんすけど 
日替わりで替わらないんです　どこか間違っているんでしょうか？ 
#!/usr/local/bin/perl 
$datafile="hoge.dat"; 
 
@lines=&in_file($datafile); 
($log_date,$num)=split(/\s/,shift(@lines)); 
$now_date=&get_time; 
if($now_date ne $log_date){ 
if(++$num>$#lines){$num=0;} 
&out_file_open($datafile); 
print OUT "$now_date\t$num\n"; 
foreach(@lines){print OUT;} 
&out_file_close; 
} 
&location($lines[$num]); 
 
sub location{print "Location: $_[0]\n\n";exit;} 
sub get_time{ 
$ENV{'TZ'}="JST-9"; 
local($sec,$min,$hour,$mday,$mon,$year,$wday,$dmy,$dmy)=localtime(time); 
$year+=1900;$mon++; 
if($mon <10){$mon ="0$mon"; } 
if($mday<10){$mday="0$mday";} 
if($hour<10){$hour="0$hour";} 
if($min <10){$min ="0$min"; } 
if($sec <10){$sec ="0$sec"; } 
"$year$mon$day"; 
}

次ページ