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


記事No: 6989
投稿日: 2010/02/04(Thu) 18:30:40
タイトルTopics boardのpdf表示の仕方教えてください
ID情報: yoshi123
投稿者: yoshi
URLhttp://cm-creation.net/yoshida/topicboard/topics.cgi

cgi初心者です。topic boardから添付画像としてpdfファイルを
選んだのですが表示されません。jpagなどは表示されます。
pdfを表示させるにはどうすればよいでしょうか?
すいませんが教えていただければと願います。

よろしくお願いします。


記事No: 6991
投稿日: 2010/02/05(Fri) 05:06:10
タイトルRe: Topics boardのpdf表示の仕方教えてくだ
ID情報: onair
投稿者: onair.jp
URLhttp://onair.jp/

> cgi初心者です。topic boardから添付画像としてpdfファイルを
> 選んだのですが表示されません。jpagなどは表示されます。
> pdfを表示させるにはどうすればよいでしょうか?

GIF,JPEG,PNG 以外のファイルを添付しても無視されるようになっています。


記事No: 6992
投稿日: 2010/02/05(Fri) 10:52:23
タイトルRe^2: Topics boardのpdf表示の仕方教えてくだ
ID情報: yoshi123
投稿者: yoshi
URLhttp://cm-creation.net/yoshida/topicboard/topics.cgi

> > cgi初心者です。topic boardから添付画像としてpdfファイルを
> > 選んだのですが表示されません。jpagなどは表示されます。
> > pdfを表示させるにはどうすればよいでしょうか?
>
> GIF,JPEG,PNG 以外のファイルを添付しても無視されるようになっています。

返信ありがとうございます。
過去ログにTopics Bord にpdfを添付できたとあったのですが、
ログが古くてその方法のトピックが見当たりませんでした。
下記参照
http://www.kent-web.com/support/oldlog/0001/0480.html

設定方法おわかりでしたらば教えていただければと思うのですが、よろしくお願いします。


記事No: 6994
投稿日: 2010/02/05(Fri) 11:30:16
タイトルRe^3: Topics boardのpdf表示の仕方教えてくだ
ID情報: liberty8
投稿者: KK

> > > cgi初心者です。topic boardから添付画像としてpdfファイルを
> > > 選んだのですが表示されません。jpagなどは表示されます。
> > > pdfを表示させるにはどうすればよいでしょうか?
> >
> > GIF,JPEG,PNG 以外のファイルを添付しても無視されるようになっています。
>
> 返信ありがとうございます。
> 過去ログにTopics Bord にpdfを添付できたとあったのですが、
> ログが古くてその方法のトピックが見当たりませんでした。
> 下記参照
> http://www.kent-web.com/support/oldlog/0001/0480.html
>
> 設定方法おわかりでしたらば教えていただければと思うのですが、よろしくお願いします。
>
>

topics.cgi

■130行目辺りを修正

if ($t[$i] =~ /\.pdf$/) { # ←追加
$msg =~ s|$image|\[<a href=\"$imgurl$no-$j$t[$i]\" target=\"_blank\">$no-$j$t[$i]</a>\]|i; # ←追加
} else { # ←追加
$msg =~ s|$image|<a href=\"$imgurl$no-$j$t[$i]\" target=\"_blank\"><img src=\"$imgurl$no-$j$t[$i]\" border=0 align=top $wh></a>|i;
} # ←追加


■600行目辺りを修正

if ($tail[$_] =~ /image\/gif/i) { $tail=".gif"; $flag=1; }
elsif ($tail[$_] =~ /image\/jpeg/i) { $tail=".jpg"; $flag=1; }
elsif ($tail[$_] =~ /image\/x-png/i) { $tail=".png"; $flag=1; }
elsif ($tail[$_] =~ /application\/pdf/i) { $tail=".pdf"; $flag=1; $app=1; } # ←追加
if (!$flag) {
if ($fnam[$_] =~ /\.gif$/i) { $tail=".gif"; $flag=1; }
elsif ($fnam[$_] =~ /\.jpe?g$/i) { $tail=".jpg"; $flag=1; }
elsif ($fnam[$_] =~ /\.png$/i) { $tail=".png"; $flag=1; }
elsif ($fnam[$_] =~ /\.pdf$/i) { $tail=".pdf"; $flag=1; $app=1; } # ←追加
}

■640行目辺りを修正

# 画像表示縮小
if (!$app && ($W > $MaxW || $H > $MaxH)) { # ←修正


多分これで大丈夫かと。


* 追記

一部間違いがあったので修正しました。
130行目修正箇所の頭を

if ($t[$i] !~ /\.(gif|jpe?g|png)$/) {

とした方が後々楽かもしれません。


記事No: 6996
投稿日: 2010/02/05(Fri) 20:06:20
タイトルRe^4: Topics boardのpdf表示の仕方教えてくだ
ID情報: yoshi123
投稿者: yoshi
URLhttp://cm-creation.net/yoshida/topicboard/topics.cgi

> > > > cgi初心者です。topic boardから添付画像としてpdfファイルを
> > > > 選んだのですが表示されません。jpagなどは表示されます。
> > > > pdfを表示させるにはどうすればよいでしょうか?
> > >
> > > GIF,JPEG,PNG 以外のファイルを添付しても無視されるようになっています。
> >
> > 返信ありがとうございます。
> > 過去ログにTopics Bord にpdfを添付できたとあったのですが、
> > ログが古くてその方法のトピックが見当たりませんでした。
> > 下記参照
> > http://www.kent-web.com/support/oldlog/0001/0480.html
> >
> > 設定方法おわかりでしたらば教えていただければと思うのですが、よろしくお願いします。
> >
> >
>
> topics.cgi
>
> ■130行目辺りを修正
>
> if ($t[$i] =~ /\.pdf$/) { # ←追加
> $msg =~ s|$image|\[<a href=\"$imgurl$no-$j$t[$i]\" target=\"_blank\">$no-$j$t[$i]</a>\]|i; # ←追加
> } else { # ←追加
> $msg =~ s|$image|<a href=\"$imgurl$no-$j$t[$i]\" target=\"_blank\"><img src=\"$imgurl$no-$j$t[$i]\" border=0 align=top $wh></a>|i;
> } # ←追加
>
>
> ■600行目辺りを修正
>
> if ($tail[$_] =~ /image\/gif/i) { $tail=".gif"; $flag=1; }
> elsif ($tail[$_] =~ /image\/jpeg/i) { $tail=".jpg"; $flag=1; }
> elsif ($tail[$_] =~ /image\/x-png/i) { $tail=".png"; $flag=1; }
> elsif ($tail[$_] =~ /application\/pdf/i) { $tail=".pdf"; $flag=1; $app=1; } # ←追加
> if (!$flag) {
> if ($fnam[$_] =~ /\.gif$/i) { $tail=".gif"; $flag=1; }
> elsif ($fnam[$_] =~ /\.jpe?g$/i) { $tail=".jpg"; $flag=1; }
> elsif ($fnam[$_] =~ /\.png$/i) { $tail=".png"; $flag=1; }
> elsif ($fnam[$_] =~ /\.pdf$/i) { $tail=".pdf"; $flag=1; $app=1; } # ←追加
> }
>
> ■640行目辺りを修正
>
> # 画像表示縮小
> if (!$app && ($W > $MaxW || $H > $MaxH)) { # ←修正
>
>
> 多分これで大丈夫かと。
>
>
> * 追記
>
> 一部間違いがあったので修正しました。
> 130行目修正箇所の頭を
>
> if ($t[$i] !~ /\.(gif|jpe?g|png)$/) {
>
> とした方が後々楽かもしれません。


ありがとうございました!
上記のようにスクリプト編集しましたらpdfをアップできるようになりました。
お世話になりました。


[検索ページ]