以純文字方式查看主題

- 周氏家族:::...Chous family (https://chous.100webspace.net/bbs/cgi-bin/leobbs.cgi)
-- 『 家 族 視 聽 娛 樂 間 』 (https://chous.100webspace.net/bbs/cgi-bin/forums.cgi?forum=18)
--- 『 雷傲論壇討論區 』 (https://chous.100webspace.net/bbs/cgi-bin/forums.cgi?forum=19)
---- [求助]補充文章功能&寵物中心 (https://chous.100webspace.net/bbs/cgi-bin/topic.cgi?forum=19&topic=1034)


-- 作者: mama
-- 發表時間: 2011/07/15 04:49pm

1、我覺得 [補充此文章...] 的功能只讓作者補文而已有點可惜,
能改成給版主以上的管理員當作快速回覆用嗎?
小女子學淺,大概只知道在topic.cgi和addpost.cgi裡要修改,
貼上這些檔案相關的代碼,請高人指點迷津.....

topic.cgi裡...
[code] if ((lc($inmembername) eq lc($membername))&&($inmembername ne "訪客")&&(($threadstate ne "closed")&&($threadstate ne "pollclosed")&&($postopen ne "no"))){
$post.="<br><br><br><span id=postnum$editpostnumber><span style=cursor:hand onClick=javascript:addpost('$editpostnumber');><font color=$fonthighlight><b>[補充此文章...]</b></span></span><br>";
   }[/code]


addpost.cgi裡...
[code] my $filetoopen = "$lbdir" . "forum$inforum/$intopic.thd.cgi";
&winlock($filetoopen) if ($OS_USED eq "Nt");
   open(FILE, "$filetoopen");
   flock(FILE, 1) if ($OS_USED eq "Unix");
   my @threads = <FILE>;
   close(FILE);
   &winunlock($filetoopen) if ($OS_USED eq "Nt");
   my ($postermembername, $topictitle, $postipaddress, $showemoticons, $showsignature ,$postdate, $post, $posticon, $water) = split(/\t/, $threads[$num-1]);
   if(lc($postermembername) ne lc($inmembername)){&error("發生錯誤&文章$LeoBBS_E_CHT者不是你,你不能在此基礎上$LeoBBS_L_CHT續編寫");}[/code]
以上是我所知道的,若有不完全的地方再請補充~~~~感謝!!

2、請問一下,那個"寵物中心"要怎麼開啟使用?
我的論壇設施裡沒有"寵物中心"耶~~~


-- 作者: POP
-- 發表時間: 2011/07/15 11:04pm

[quote][b]下面引用由[u]mama[/u]在 [i]2011/07/15 04:49pm[/i] 發表的內容:[/b]
我覺得 [補充此文章...] 的功能只讓作者補文而已有點可惜,
能改成給版主以上的管理員當作快速回覆用嗎?
[/quote]
加入條件判斷涵蓋版主以上等級即可, ad=壇主/smo=總版主/mo=版主/cmo=分類區版主
$inmembmod eq "yes"則表示若為該版版主則...
修改並加入藍字即可
if [color=blue]([/color]((lc($inmembername) eq lc($membername))&&($inmembername ne "訪客")&&(($threadstate ne "closed")&&($threadstate ne "pollclosed")&&($postopen ne "no"))[color=blue])||($membercode eq "ad")||($membercode eq 'smo')||($membercode eq 'cmo')||($membercode eq 'mo')[/color]){

  if([color=blue]([/color]lc($postermembername) ne lc($inmembername)[color=blue])&&($membercode ne "ad")&&($membercode ne 'smo')&&($membercode ne 'cmo')&&($membercode ne 'mo')[/color]){&error("發生錯誤&文章$LeoBBS_E_CHT者不是你,你不能在此基礎上$LeoBBS_L_CHT續編寫");}

[quote][b]下面引用由[u]mama[/u]在 [i]2011/07/15 04:49pm[/i] 發表的內容:[/b]
我的論壇設施裡沒有"寵物中心"
[/quote]
http://www.memorybbs.com/cgi-bin/topic.cgi?forum=80&topic=631[br][br][color=#990000][b]-=-=-=- 以下內容由 [i]POP[/i] 在 [i]2011年07月15日 11:08pm[/i] 時新增 -=-=-=-[/b][/color]
如果要限定該版版主才可以續寫該版文章時

改($membercode eq 'mo')
為($inmembmod eq "yes")


改($membercode ne 'mo')
為($inmembmod ne "yes")


© 周氏家族:::...Chous family Since 2002 繁體版權所有:摩尼網  程式翻譯:auron  版本: LeoBBS X Build090208