| 記事No | ： 7896 |
| 投稿日 | ： 2010/08/28(Sat) 14:22:49 |
| タイトル | ： 圧縮ファイルのプロテクトについて。 |
| ID情報 | ： evsxdrfw |
| 投稿者 | ： 熊本 儒仙 |
| URL | ： http://熊本はり治療院.com |
６０歳を超えて、始めた、初心者です。
今回、Web Protectを利用させてもらいました。
Web Protectで、圧縮ファイルのプロテクトは、可能でしょうか。
MEMBERに、圧縮した資料を、ダウンロードしてもらおうと思っています。
よろしくお願いします。
| 記事No | ： 7897 |
| 投稿日 | ： 2010/08/30(Mon) 16:40:48 |
| タイトル | ： Re: 圧縮ファイルのプロテクトについて。 |
| ID情報 | ： Fuyuki |
| 投稿者 | ： BAL |
| URL | ： http://f43.aaa.livedoor.jp/~sumure/ |
> ６０歳を超えて、始めた、初心者です。
> 今回、Web Protectを利用させてもらいました。
> Web Protectで、圧縮ファイルのプロテクトは、可能でしょうか。
>
> MEMBERに、圧縮した資料を、ダウンロードしてもらおうと思っています。
> よろしくお願いします。
以下の修正を行ってください。
●secret.htmlへの記述
<!-- ZIPデータ記述例：xxx.zip -->
<a href="./protect.cgi?zip=xxx">xxx.zip</a>
●protect.cgi
# 基本処理定義
$buf = &decode;
if (!$buf) { &enter; }
if ($in{'gif'} || $in{'jpeg'} || $in{'pdf'} || $in{'excel'} || $in{'zip'}) { &binOut; } ## ★修正
elsif ($page eq 'top') { &pageTop; }
elsif ($mode eq "check") { ✓ }
&pwCheck;
#-------------------------------------------------
# 認証後表示
#-------------------------------------------------
-- 省略 --
# リンク部及び画像にID/PASS情報付加
s/\?page=/\?id=$in{'id'}&pw=$in{'pw'}&page=/g;
s/\?gif=/\?id=$in{'id'}&pw=$in{'pw'}&gif=/g;
s/\?jpeg=/\?id=$in{'id'}&pw=$in{'pw'}&jpeg=/g;
s/\?excel=/\?id=$in{'id'}&pw=$in{'pw'}&excel=/g;
s/\?pdf=/\?id=$in{'id'}&pw=$in{'pw'}&pdf=/g;
s/\?zip=/\?id=$in{'id'}&pw=$in{'pw'}&zip=/g; ## ★追加
s/<form([^>]*$temp[^>]*)?>/<form $1>\n<input type=hidden name=id value=\"$in{'id'}\">\n<input type=hidden name=pw value=\"$in{'pw'}\">/ig;
#-------------------------------------------------
# バイナリ出力
#-------------------------------------------------
-- 省略 --
# ファイル名&出力ヘッダ定義
if ($in{'gif'}) {
$in{'gif'} =~ s/\W//g;
$file = "$in{'gif'}\.gif";
$head = "image/gif";
} elsif ($in{'jpeg'}) {
$in{'jpeg'} =~ s/\W//g;
$file = "$in{'jpeg'}\.jpg";
$head = "image/jpeg";
} elsif ($in{'pdf'}) {
$in{'pdf'} =~ s/\W//g;
$file = "$in{'pdf'}\.pdf";
$head = "application/pdf";
} elsif ($in{'excel'}) {
$in{'excel'} =~ s/\W//g;
$file = "$in{'excel'}\.xls";
$head = "application/ms-excel";
#▼ここから▼
} elsif ($in{'zip'}) {
$in{'zip'} =~ s/\W//g;
$file = "$in{'zip'}\.zip";
$head = "application/zip";
#▲ここまで追加▲
} else {
die "No Data";
}
| 記事No | ： 7901 |
| 投稿日 | ： 2010/08/31(Tue) 09:16:05 |
| タイトル | ： Re^2: 圧縮ファイルのプロテクトについて。 |
| ID情報 | ： evsxdrfw |
| 投稿者 | ： 熊本 儒仙 |
| URL | ： http://http://熊本はり治療院.com/ |
> 以下の修正を行ってください。
>
> ●secret.htmlへの記述
> <!-- ZIPデータ記述例：xxx.zip -->
> <a href="./protect.cgi?zip=xxx">xxx.zip</a>
>
> ●protect.cgi
>
> # 基本処理定義
> $buf = &decode;
> if (!$buf) { &enter; }
> if ($in{'gif'} || $in{'jpeg'} || $in{'pdf'} || $in{'excel'} || $in{'zip'}) { &binOut; } ## ★修正
> elsif ($page eq 'top') { &pageTop; }
> elsif ($mode eq "check") { ✓ }
> &pwCheck;
>
> #-------------------------------------------------
> # 認証後表示
> #-------------------------------------------------
> -- 省略 --
> # リンク部及び画像にID/PASS情報付加
> s/\?page=/\?id=$in{'id'}&pw=$in{'pw'}&page=/g;
> s/\?gif=/\?id=$in{'id'}&pw=$in{'pw'}&gif=/g;
> s/\?jpeg=/\?id=$in{'id'}&pw=$in{'pw'}&jpeg=/g;
> s/\?excel=/\?id=$in{'id'}&pw=$in{'pw'}&excel=/g;
> s/\?pdf=/\?id=$in{'id'}&pw=$in{'pw'}&pdf=/g;
> s/\?zip=/\?id=$in{'id'}&pw=$in{'pw'}&zip=/g; ## ★追加
> s/<form([^>]*$temp[^>]*)?>/<form $1>\n<input type=hidden name=id value=\"$in{'id'}\">\n<input type=hidden name=pw value=\"$in{'pw'}\">/ig;
>
>
> #-------------------------------------------------
> # バイナリ出力
> #-------------------------------------------------
> -- 省略 --
> # ファイル名&出力ヘッダ定義
> if ($in{'gif'}) {
> $in{'gif'} =~ s/\W//g;
> $file = "$in{'gif'}\.gif";
> $head = "image/gif";
>
> } elsif ($in{'jpeg'}) {
> $in{'jpeg'} =~ s/\W//g;
> $file = "$in{'jpeg'}\.jpg";
> $head = "image/jpeg";
>
> } elsif ($in{'pdf'}) {
> $in{'pdf'} =~ s/\W//g;
> $file = "$in{'pdf'}\.pdf";
> $head = "application/pdf";
>
> } elsif ($in{'excel'}) {
> $in{'excel'} =~ s/\W//g;
> $file = "$in{'excel'}\.xls";
> $head = "application/ms-excel";
> #▼ここから▼
> } elsif ($in{'zip'}) {
> $in{'zip'} =~ s/\W//g;
> $file = "$in{'zip'}\.zip";
> $head = "application/zip";
> #▲ここまで追加▲
> } else {
> die "No Data";
> }
>
ＢＡＬ様有難うございました、頑張ってみます。
今後ともよろしくお願いします。