| 記事No | ： 11783 |
| 投稿日 | ： 2013/04/24(Wed) 22:25:15 |
| タイトル | ： WEB FORUM(init.cgi line 328) |
| ID情報 | ： turemote |
| 投稿者 | ： MLM |
| URL | ： http://lfn.kill.jp/manage/wforum/wforum.cgi |
WEB FORUM Ver: 7.1 を使用させて頂きました。
ありがとうございます。
設置も済み、投稿も問題なく書き込めたのですが
▼新規スレ nameA No.1
○Re:新規スレ nameB No.2
■Re^2: 新規スレ nameA No.5
○Re:新規スレ nameC No.3
○Re:新規スレ nameB No.4
■Re: 新規スレ nameC No.6
No.5に返信した場合、下のようなエラーが出ます。
Illegal division by zero at ./init.cgi line 328.
管理画面から読み込むとエラーが無く読み込めるのですが
line 328 は「画像リサイズ」とコメントがありますが
私には解りません。
よろしくお願いします。
設置先にはアクセス制限を掛けています。
guest/guest
| 記事No | ： 11791 |
| 投稿日 | ： 2013/04/28(Sun) 05:41:11 |
| タイトル | ： Re: WEB FORUM(init.cgi line 328) |
| ID情報 | ： kent |
| 投稿者 | ： KENT |
> WEB FORUM Ver: 7.1 を使用させて頂きました。
> ありがとうございます。
>
> 設置も済み、投稿も問題なく書き込めたのですが
>
> ▼新規スレ nameA No.1
> ○Re:新規スレ nameB No.2
> ■Re^2: 新規スレ nameA No.5
> ○Re:新規スレ nameC No.3
> ○Re:新規スレ nameB No.4
> ■Re: 新規スレ nameC No.6
>
> No.5に返信した場合、下のようなエラーが出ます。
>
> Illegal division by zero at ./init.cgi line 328.
>
> 管理画面から読み込むとエラーが無く読み込めるのですが
> line 328 は「画像リサイズ」とコメントがありますが
> 私には解りません。
>
> よろしくお願いします。
>
> 設置先にはアクセス制限を掛けています。
> guest/guest
質問なのですが、エラーの出る記事は、画像はアップされたものですか？
| 記事No | ： 11796 |
| 投稿日 | ： 2013/04/28(Sun) 21:50:32 |
| タイトル | ： Re^2: WEB FORUM(init.cgi line 328) |
| ID情報 | ： turemote |
| 投稿者 | ： MLM |
| URL | ： http://lfn.kill.jp/manage/wforum/wforum.cgi |
返信ありがとうございます。
画像はアップしていません。
全ての投稿に画像アップしいません。
画像なしアイコン(？)がサムネイル表示されています。
よろしくお願いします。
| 記事No | ： 11798 |
| 投稿日 | ： 2013/04/29(Mon) 23:50:35 |
| タイトル | ： Re^3: WEB FORUM(init.cgi line 328) |
| ID情報 | ： turemote |
| 投稿者 | ： MLM |
| URL | ： http://lfn.kill.jp/manage/wforum/wforum.cgi |
追記
No.5 の投稿に画像アップしていると
返信時エラーになりませんでした。
| 記事No | ： 11800 |
| 投稿日 | ： 2013/04/30(Tue) 15:27:30 |
| タイトル | ： Re^4: WEB FORUM(init.cgi line 328) |
| ID情報 | ： turemote |
| 投稿者 | ： MLM |
| URL | ： http://lfn.kill.jp/manage/wforum/wforum.cgi |
init.cgi # 画像表示縮小の前に
if文でnull(未定義？)を判定し代入したら
エラーを回避出来ました。
今のところ問題なく投稿出来ています。
ありがとうございました。
#---------------------------------
# 画像リサイズ
#---------------------------------
sub resize {
my ($w,$h) = @_;
if (!$w) { $w = 1; }
if (!$h) { $h = 1; }
# 画像表示縮小
if ($w > $cf{max_img_w} || $h > $cf{max_img_h}) {
my $w2 = $cf{max_img_w} / $w;
my $h2 = $cf{max_img_h} / $h;
my $key;
if ($w2 < $h2) { $key = $w2; } else { $key = $h2; }
$w = int ($w * $key) || 1;
$h = int ($h * $key) || 1;
}
return ($w,$h);
}