KENT-WEB サポートコーナー 過去ログ [ 0195 ]


記事No: 5380
投稿日: 2009/02/03(Tue) 16:39:17
タイトルWeb Patioにて画像以外のファイルを
ID情報: tattat
投稿者: tattat
URLhttp://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
投稿者: スガラボット
URLhttp://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
URLhttp://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

試してみたところ、うまくアップロードできるようになりました。
ただ、サーバーの関係で、アップロードファイルを読み込むことが出来ませんでした。これは、ディレクトリー設定変更すれば済むことだと思います。

どうもありがとうございました。


[検索ページ]