以純文字方式查看主題

- 周氏家族:::...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)
---- [轉貼]論壇加入Facebook臉書、twitter推特、Plurk噗浪「分享按鈕」 (https://chous.100webspace.net/bbs/cgi-bin/topic.cgi?forum=19&topic=1026)


-- 作者: POP
-- 發表時間: 2011/04/18 10:02pm

1. 右鍵另存本站文章標題旁Facebook、twitter、Plurk小圖示gif
http://myweb.hinet.net/home6/chous-family/non-cgi/images/share_icon_facebook.gif http://myweb.hinet.net/home6/chous-family/non-cgi/images/share_icon_plurk.gif http://myweb.hinet.net/home6/chous-family/non-cgi/images/share_icon_twitter.gif

2. 將圖檔放入non-cgi/images 下

3. topic.cgi
找到
[code]if ($topicad ne "") {
   $topicad = &HTML("$topicad");
   $topicad =~ s/\$imagesurl/$imagesurl/isg;
   $topicad =~ s/\$tablebordercolor/$tablebordercolor/isg;
   $topicad =~ s/\$forumcolorone/$forumcolorone/isg;
   $topicad =~ s/\$forumcolortwo/$forumcolortwo/isg;
   $topicad =~ s/\[br\]/\n/isg;
}[/code]
加上(全形 須改為半形"&")
[code]###Share icon_S###
my $share_fb     = qq~ <a href="javascript: void(window.open('http://www.facebook.com/share.php?u='.concat(encodeURIComponent(location.href)) ));"><img src=$imagesurl/images/share_icon_facebook.gif border=0 width=16 alt="分享至Facebook" align=absmiddle></a>&nbsp;~;
my $share_pl     = qq~ <a href="javascript: void(window.open('http://www.plurk.com/?qualifier=shares&status=' .concat(encodeURIComponent(location.href)) .concat(' ') .concat('(') .concat(encodeURIComponent(document.title)) .concat(')')));"><img src=$imagesurl/images/share_icon_plurk.gif border=0 width=16 alt="分享至噗浪" align=absmiddle></a>&nbsp;~;
my $share_tw     = qq~ <a href="javascript: void(window.open('http://twitter.com/home/?status='.concat(encodeURIComponent(document.title)) .concat(' ') .concat(encodeURIComponent(location.href))));"><img src=$imagesurl/images/share_icon_twitter.gif border=0 width=16 alt="分享至推特" align=absmiddle></a>&nbsp;~;
###Share icon_E###[/code]
找到並加上藍字(全形&nbsp;須改為半形"&")
[code]<table cellpadding=0 cellspacing=1 width=100%><tr><td><font color=$titlefontcolor>&nbsp;<b>* 文章主題</b>: $topictitletemp[color=blue]&nbsp;$share_fb$share_pl$share_tw[/color]</td>[/code]
PS.語法轉載自[url=http://briian.com/?p=6313]重灌狂人[/url]


-- 作者: sky9gm
-- 發表時間: 2011/05/07 03:17pm

請問 第三 步驟裡 須加入的語法 是要加在 IF裡嗎?
if ($topicad ne "") {
  $topicad = &HTML("$topicad");
  $topicad =~ s/\$imagesurl/$imagesurl/isg;
  $topicad =~ s/\$tablebordercolor/$tablebordercolor/isg;
  $topicad =~ s/\$forumcolorone/$forumcolorone/isg;
  $topicad =~ s/\$forumcolortwo/$forumcolortwo/isg;
  $topicad =~ s/\[br\]/\n/isg;
###Share icon_S###
my $share_fb     = qq~ <a href="javascript: void(window.open('http://www.facebook.com/share.php?u='.concat(encodeURIComponent(location.href)) ));"><img src=$imagesurl/images/share_icon_facebook.gif border=0 width=16 alt="分享至Facebook" align=absmiddle></a>&nbsp;~;
my $share_pl     = qq~ <a href="javascript: void(window.open('http://www.plurk.com/?qualifier=shares&status=' .concat(encodeURIComponent(location.href)) .concat(' ') .concat('(') .concat(encodeURIComponent(document.title)) .concat(')')));"><img src=$imagesurl/images/share_icon_plurk.gif border=0 width=16 alt="分享至噗浪" align=absmiddle></a>&nbsp;~;
my $share_tw     = qq~ <a href="javascript: void(window.open('http://twitter.com/home/?status='.concat(encodeURIComponent(document.title)) .concat(' ') .concat(encodeURIComponent(location.href))));"><img src=$imagesurl/images/share_icon_twitter.gif border=0 width=16 alt="分享至推特" align=absmiddle></a>&nbsp;~;
###Share icon_E###
}[br][br][color=#990000][b]-=-=-=- 以下內容由 [i]sky9gm[/i] 在 [i]2011年05月07日 03:17pm[/i] 時新增 -=-=-=-[/b][/color]
因為測試測不出來....[br][br][color=#990000][b]-=-=-=- 以下內容由 [i]sky9gm[/i] 在 [i]2011年05月08日 00:14am[/i] 時新增 -=-=-=-[/b][/color]
^^~謝謝您

可以在問問您

雷傲可以 在文章 自動加入讚 的選項嗎?


-- 作者: POP
-- 發表時間: 2011/05/07 04:30pm

[quote][b]下面引用由[u]sky9gm[/u]在 [i]2011/05/07 03:17pm[/i] 發表的內容:[/b]
請問 第三 步驟裡 須�/\n/isg;
###Share icon_S###
my $share_fb     = qq~ <a href="javascript: void(window.open('(www.facebook.com/share.php?u='.con ...
[/quote]
是加在IF的大括號外面喔

if ($topicad ne "") {
...(省略)
}

<<加在這裡>>


-- 作者: sky9gm
-- 發表時間: 2011/05/08 00:16am

<p><iframe src="http://www.facebook.com/plugins/like.php?href=http://chous.100webspace.net/bbs/cgi-bin/topic.cgi?forum=19%26topic=1026%26show=0&show_faces=true&width=450&action=like&font=arial&colorscheme=light&height=35" scrolling="no" frameborder="0" style="width: 450px; height: 100px; overflow: hidden;"></iframe></p><p>[br][br][color=#990000][b]-=-=-=- 以下內容由 [i]sky9gm[/i] 在 [i]2011年05月08日 08:24am[/i] 時新增 -=-=-=-[/b][/color]
^^~謝謝您

可以在問問您

雷傲可以 在文章 自動加入讚 的選項嗎?


-- 作者: POP
-- 發表時間: 2011/05/08 11:39pm

[quote][b]下面引用由[u]sky9gm[/u]在 [i]2011/05/08 00:16am[/i] 發表的內容:[/b]
<p><iframe src="http://www.facebook.com/plugins/like.php?href=http://chous.100webspace.net/bbs/cgi-bin/topic.cgi?forum=19%26topic=1026%26show=0&show_faces=true&width=450& ...
[/quote]
有語法就簡單多了
只是你認為要放在哪裡比較適當呢?


-- 作者: POP
-- 發表時間: 2011/05/09 06:43pm

[quote][b]下面引用由[u]sky9gm[/u]在 [i]2011/05/08 00:16am[/i] 發表的內容:[/b]
雷傲可以 在文章 自動加入讚 的選項嗎? ...
[/quote]

topic.cgi

找到
[code]
### 每篇文章簽名檔只顯示一次!
   if(",$signature_check"=~/,$membername{$membername},/){
       $showsignature = 'no';
   }else{
       $signature_check.=$membername{$membername}.',';
   }
### 每篇文章簽名檔只顯示一次![/code]

後面加上
[code]
   #加入FB讚按鈕
   if ($editpostnumber eq 1) {
       $fb_like = qq~ <script src="http://connect.facebook.net/zh_TW/all.js#xfbml=1"></script><fb:like show_faces="true" width="450" href="$boardurl/topic.cgi?forum=$inforum&topic=$intopic"></fb:like><br><br>~;
   }
   else { $fb_like = "";}[/code]

找到並加入藍色文字
[code]
   if (($signature{$membername}) and ($showsignature eq 'yes') and ($nodispsign eq "no"||$mynodispsign eq "no") and ($posticon !~/<br>/i)) {
       if ($signature{$membername} ne "") { $post = qq([color=blue]$fb_like[/color]$post<br></td><td width=16></td></tr><tr><td></td><td valign=bottom><br><br><br><br>$postcopyright<img src=$imagesurl/images/none.gif width=1 height=3><br><img src=$imagesurl/images/signature.gif height=12><br><img src=$imagesurl/images/none.gif width=1 height=5><br>$signature{$membername}<br>$pet_show); $post.="$pet{$membername}<br>" if ($pet{$membername} ne ''); }
                else { $post = qq([color=blue]$fb_like[/color]$post<br></td><td width=16></td></tr><tr><td></td><td valign=bottom><br><br><br><br>$postcopyright<br>$pet_show); $post.="$pet{$membername}<br>" if ($pet{$membername} ne ''); }
   }
   else { $post = qq([color=blue]$fb_like[/color]$post<br></td><td width=16></td></tr><tr><td></td><td valign=bottom><br><br><br><br>$postcopyright<br>); }[/code]

只有第一篇第一行會顯示讚
回覆文章不會顯示


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