記事No | : 5380 |
投稿日 | : 2009/02/03(Tue) 16:39:17 |
タイトル | : Web Patioにて画像以外のファイルを |
ID情報 | : tattat |
投稿者 | : tattat |
URL | : http://hpcgi2.nifty.com/bbkyoto/offmbbs.cgi |
Web Patioにて、画像ファイルとともに、画像以外のファイル(pdfやMS-Wordファイルなど)を添付できるようにすることが出来ますでしょうか?
過去ログにもありましたが、リンク先が切れており追跡不能でした。
どうぞよろしくお願い致します。
記事No | : 5387 |
投稿日 | : 2009/02/04(Wed) 10:24:08 |
タイトル | : Re: Web Patioにて画像以外のファイルを |
ID情報 | : viola |
投稿者 | : スガラボット |
URL | : http://vmorita.com/bbs/patio/ |
tattat さん、こんにちは。
KENTさんのWeb Patioの「■お勧めページ」にも紹介されているForum Patioを主宰するスガラボットと申します。
> Web Patioにて、画像ファイルとともに、画像以外のファイル(pdfやMS-Wordファイルなど)を添付できるようにすることが出来ますでしょうか?
少し余分な機能があり過ぎかも知れませんが、僕のホームページで配布しているForum Patioをお使い頂くことも選択肢の一つに入れて頂ければと。使わない機能はinit.cgiで設定できますから…。よろしくお願いします。
記事No | : 5396 |
投稿日 | : 2009/02/05(Thu) 10:39:05 |
タイトル | : Re^2: Web Patioにて画像以外のファイルを |
ID情報 | : tattat |
投稿者 | : tattat |
スガラポットさん、ご返信ありがとうございます。
非常に、高機能で使い勝手のあるものですね。
今回は、ここまでの機能が必要ないのと、インターフェースをあまり変えたくないというところから、BALさんに教えていただいた方法で対応させていただきました。
別のWEBで使用も合わせて考えさせていただきます。
どうもありがとうございました。m(..)m
記事No | : 5390 |
投稿日 | : 2009/02/04(Wed) 13:25:39 |
タイトル | : Re: Web Patioにて画像以外のファイルを |
ID情報 | : Fuyuki |
投稿者 | : BAL |
URL | : http://f43.aaa.livedoor.jp/~sumure/ |
> Web Patioにて、画像ファイルとともに、画像以外のファイル(pdfやMS-Wordファイルなど)を添付できるようにすることが出来ますでしょうか?
>
> 過去ログにもありましたが、リンク先が切れており追跡不能でした。
>
> どうぞよろしくお願い致します。
upload.plに以下のように項目を追加してください。
#-------------------------------------------------
# アップロード
#-------------------------------------------------
-- 省略 --
# Content-Typeヘッダからファイル種類を認識
local($ex);
if ($ctype{$i} =~ m|image/gif|i) {
$ex = '.gif';
} elsif ($ctype{$i} =~ m|image/p?jpeg|i) {
$ex = '.jpg';
} elsif ($ctype{$i} =~ m|image/png|i) {
$ex = '.png';
} elsif ($ctype{$i} =~ m|pdf|i) {
$ex = '.pdf';
} elsif ($ctype{$i} =~ m|msword|i) {
$ex = '.doc';
} elsif ($ctype{$i} =~ m|ms-excel|i) {
$ex = '.xls';
}
# Content-Typeでは不明のときは拡張子からファイル種類を認識
if (!$ex) {
if ($fname{$i} =~ /\.gif$/) {
$ex = '.gif';
} elsif ($fname{$i} =~ /\.jpe?g$/) {
$ex = '.jpg';
} elsif ($fname{$i} =~ /\.png$/) {
$ex = '.png';
} elsif ($fname{$i} =~ /\.pdf$/) {
$ex = '.pdf';
} elsif ($fname{$i} =~ /\.doc$/) {
$ex = '.doc';
} elsif ($fname{$i} =~ /\.xls$/) {
$ex = '.xls';
}
}
# ファイル認識できたときは書き込む
記事No | : 5397 |
投稿日 | : 2009/02/05(Thu) 10:45:20 |
タイトル | : Re^2: Web Patioにて画像以外のファイルを |
ID情報 | : tattat |
投稿者 | : tattat |
早速にありがとうございます。m(..)m
試してみたところ、うまくアップロードできるようになりました。
ただ、サーバーの関係で、アップロードファイルを読み込むことが出来ませんでした。これは、ディレクトリー設定変更すれば済むことだと思います。
どうもありがとうございました。