□ 犬山大王 [2003年11月05日17時12分]

僕もインフォシークの設定で相当迷いました。過去ログを調べたり
色々やりまして動作するのに２週間かかりました。
インフォシークで設定に困ってる人が居ましたら参考にして下さい！。

電光　小型掲示板　インフォシークでの設定

　　　
　　　　Ｐｅｒｌ設定　　#!/usr/local/bin/perl

　　　　　　　　# このスクリプトファイルをhttp:からのフルパスで記述
　　　　　　　　$script = "
http://inuydaio.hp.infoseek.co.jp/cgi-bin/denkoh/denkoh.cgi";　←サーバーにＵＰしてるＵＲＬ

　　　　　　　# 作業用ディレクトリ（/temp/フォルダ）
　　　　　　　# 表示するページから見たパスで記述
　　　　　　　$data_dir = "
http://inuydaio.hp.infoseek.co.jp/cgi-bin/denkoh/temp/";　←サーバーにＵＰしてるＵＲＬ

　　　　　　
　　　　　# アイコン用画像

$img_dir = "
http://inuydaio.hp.infoseek.co.jp/cgi-bin/denkoh/image/"; # 画像設置ディレクトリ（http:からのフルパスで記述　


　　$bg = "#ffffff"; # 領域全体の背景色（指定しない場合は ""; にする）
　　$bgimg = "b.gif"; 　　# 領域全体の背景画像（指定しない場合は ""; にする）←　オープションの背景ファイルを指定

elsif ($buffer eq "js") { print "Content-type: text/plain\n\n"; }

else { &error("処理内容が不明です"); }　↑
　　　　　　　　　　　　　　　　　

elsif ($buffer eq "js") { print "Content-type: \n\n"; }　text/plainを削除する。　この文を探す時else { &error("処理内容が不明です"); }　を
目安にすると良い！。３００行より上

注！必ず　ファイルは　imageフォルダーにＵＰする！。


　　　　　　　　　　別ウィンドウ部分（投稿/削除等）の設定


sub menu {

if ($send_mode && $in{'admin'} ne $master) { &gate; }　　この部分でウィンドウの大きさを変える。　　
　　　　　　　　　　　　　　　　　　　　
　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　↓
&header("【メニューにょ！】");　
print "<script>self.focus();self.moveTo(0,0);self.resizeTo(200,210);</script>\n";
print "\[ <a href=\"$script?mode=input&admin=$in{'admin'}\">新規投稿</a> \]<br>\n";

if (! $send_mode && $in{'no'}) {
print "\[ <a href=\"$script?mode=res&no=$in{'no'}\">レス投稿</a> \]<br>\n";
}

print "\[ <a href=\"$script?mode=edit&admin=$in{'admin'}\">一覧/削除</a> \]<br>\n";
print "\[ <a href=\"javascript:window.close()\">閉じるにょ！</a> \]\n";

　この文は下の文から探した方が早いです。

以上の文を変更すれば動作するはずですので頑張って下さい。　犬山大王