【 スクリプト改造工房 PART 6 】
■ このスレッドは過去ログ倉庫に格納されています
00011
03/03/16 18:28ID:vOOsWTxU# スレッドの説明
#================================
「スクリプトを改造したいけどやりかたわかんないよー」という人がいましたら
ここで聞いてください。ひょっとしたらアドバイス出来るかもしれません。
質問するときは以下の点に注意して書いて下さい
(1) そのスクリプトの内容と置いてある場所を明記する (txtファイルでUPすればなお良い)
(2) どんな風に改造して欲しいのか？ (完成イメージHTMLを用意すればなお良し)
(3) 出来るだけ詳しく書くこと。少しは自分で考えること。できれば御礼も言ったほうが良い
※答えてくれないからといって逆ギレする厨はお断り
#================================
# 過去のスレッド
#================================
【PART1】行方不明
【PART2】http://pc.2ch.net/test/read.cgi/perl/986986227/
【PART3】http://pc.2ch.net/php/kako/988/988808396.html (HTML化済み)
0002AR
03/03/16 18:32ID:vOOsWTxUAll Clear (^-^)v > () と名前のところにそのALL Clearとでて文字のところに()とでます。
後その自分の発言を削除を押した後発言をするとAll Clear (^-^)v > () が消えてしまいます。
援助お願いします。
0003前田
03/03/16 18:42ID:KSrtergbこちらのｻｲﾄのポップアップ式の掲示板を使ってるのですが
開示版に書かれた最後の記事の時間をindexページに表示したいのですが
どのようにすればよろしいのでしょうか？
教えてください
↓こんなｻｲﾄみたいにです。
http://www.ayapro.com/board.html
0004nobodyさん
03/03/16 23:51ID:???sub deleteme{
#自分の発言消去
open (IO,"+<$logfile");
eval{flock(IO,2)};
while (<IO>){
if ($_ =~ /<>$ip/){
@y2=split(/<>/,$_);
if ($y2[6] ne $ip){
push(@log,$_);
}else{
$y2[0] = 'All Clear (^-^)v'; #消去後の名前
$y2[5] = 'All Clear (^-^)v'; #消去後のメッセージ
push(@log,"$y2[0]<>$y2[1]<>$y2[2]<>$y2[3]<>$y2[4]<>$y2[5]<>$y2[6]<>$y2[7]<>\n");
}
}else{
push(@log,$_);
}
}
truncate(IO,0);
seek(IO,0,0);
print IO @log;
close (IO);
&reload2;
}
消去後の名前とメッセージをそれぞれ好きなのに変えれ。
消去しないほうはコメントアウトしれ。
■ このスレッドは過去ログ倉庫に格納されています