周氏家族:::...Chous family - 在『雷傲論壇討論區』內發表文章

即時新聞快訊：

>> 歡迎您，訪客：登入論壇

按這裡註冊

忘記密碼

在線會員

文章搜尋

使用說明

>>> 有關雷傲論譠相關問題、下載資訊討論。
周氏家族:::...Chous family → 『家族視聽娛樂間』 → 『雷傲論壇討論區』 → 發表回覆

主題標題： [討論]常見修改問題

您目前的身份是：訪客，要使用其他會員身份，請輸入會員名稱和密碼。未註冊訪客請輸入網名，密碼留空白。

請輸入您的會員名稱

您沒有註冊？

請輸入您的密碼

忘記密碼？

請輸入驗證碼（注意：必需輸入）

一共是四個數字，如果看不清楚，請先複製編輯的文章內容後再重新整理此頁

目前心情

將放在文章的前面

內容　

在此論壇中：

HTML 　標籤: 禁止使用

EMOTE　標籤: 禁止使用

LeoBBS 標籤: 可以使用

貼圖標籤　 : 允許

Flash 標籤 : 允許

音樂標籤　 : 允許

文字大小　 : 允許

文章數標籤 : 允許

積分標籤　 : 允許

保密標籤　 : 允許

允許使用表情符號轉換

『 HTML 編輯器』『 ASCII 字型產生器』『文字內容取代』

模式:使用說明　完全　基本　　>> 複製到剪貼簿 | 查看長度 | 轉換剪貼簿超文字 <<

點選表情圖即可在文章中加入相關的表情

選項

使用 LeoBBS 標籤？
是否顯示您的簽名檔？
您是否希望使用表情符號轉換在您的文章中？
使用字型樣式轉換？
加密此文章，只對部分會員可見，會員威望至少需要
出售此文章，只有付錢才可以查看，售價周元 (收取稅率: 3%)

文章一覽：[討論]常見修改問題 (新回覆在最前面,最多列出 6 個)　 [列出所有回覆]

POP 發表於： 2003/07/19 04:28pm

Ｑ：買入股票----買入股票的價格﹐只能在當前股價的昇降10％這個區間內。
如何能改10%這限制
最好能改至無限制

Ａ：
stock.cgi
if ($form{'spj'}*1.10 < $form{'myjg'}){&error("操$yccc01失敗！&買入價格過高！");exit;}
if ($form{'spj'}*0.9 > $form{'myjg'}){&error("操$yccc01失敗！&買入價格過低！");exit;}

應該是這兩句吧....調整0.9和1.1的值或整段註解或刪除....

POP 發表於： 2003/07/19 04:25pm

Ｑ：怎樣在個人資料中加入"比武狀態"?

Ａ：
比武狀態
topic.cgi
找到
if ($instart < $maxtopics) {$replycounter = $replycounter - 1;}
if ($editpostnumber eq $endarraytemp) { $bottomposition = qq~<a name="bottom"></a>~; }
else{$bottomposition = sprintf('<a name="%d"></a>',$postcountnumber + $instart +1);}
加上
###fight_S###
require "wuplugin.lib.pl";
&getfightplugin;
if ($acc eq "0"){$ra="不允\許\對戰";}else{$ra="允\許\對戰";}
###fight_E###

找到顯示的部份加上
 比武狀態: $ra

PS.比武插件使用useradd7,注意是否有重複使用

POP 發表於： 2003/07/19 04:22pm

Ｑ：怎樣在topic.cgi加入結婚狀態?

Ａ：
是指是否已經結婚嗎??
找到
else{$bottomposition = sprintf('<a name="%d"></a>',$postcountnumber + $instart +1);}

加上
my $faname = $membername;
$faname =~ y/ /_/;
$faname =~ tr/A-Z/a-z/;

if ( -e "$lbdir/church/$faname.cgi"){
$mstatus="已婚";
}else{
$mstatus="未婚";
}

找到顯示部分加上
 婚姻: $mstatus 

POP 發表於： 2003/07/19 04:20pm

Ｑ：要如何提聊天使用的權限啊...???
一定要認證會員以上權限的人才可以使用...而一般註冊的會員是不能用的(看不到內容的)..!
請各位大大幫一下了...!!

Ａ：
geniuschat.cgi
找到
$boardurltemp =$boardurl;
$boardurltemp =~ s/http\:\/\/(\S+?)\/(.*)/\/$2/;
$cookiepath = $boardurltemp;
加上
&getmember("$inmembername");

找到
if ($inmembername eq ""){
$inmembername = "訪客";print header(-cookie=>[$banfreshcookie],-charset=>big5);
改成
if (($membercode ne "ad")&&($membercode ne "smo")&&($membercode ne "cmo")&&($membercode ne "mo")&&($membercode ne "rz")){
$inmembername = "訪客" if ($inmembername eq "");
print header(-cookie=>[$banfreshcookie],-charset=>big5);

找到
print "很抱歉，您目前的身份是訪客，無法參與聊天！ ";
print "請註冊並登入後$yccc03能使用！";
改成(自己修飾錯誤訊息)
print "很抱歉，您不是認證會員或本站管理人員，無法參與聊天！ ";
print "如有問題請洽$boardname壇主或總版主！";

找到
(my $lookfor, my $no) = split(/\(/,$savedusername);
加上
if (($memcod ne "ad")&&($memcod ne "smo")&&($memcod ne "cmo")&&($memcod ne
"mo")&&($memcod ne "rz")){$lookfor="";}

已測試...

POP 發表於： 2003/07/19 04:17pm

Ｑ：請問一下大大...
聊天室內容的更新方式可以改為有新的內容就更新，而不是每隔一個固定的時間才更新..
跟一般網路聊天室的一樣..!

Ａ：
找到
print "Location: $cgiurl?job=view\n\n";
加上
print "Content-type: text/html\n\n";
print "<META HTTP-EQUIV=REFRESH CONTENT='1; URL=$cgiurl?job=view'>\n";

未測試....

POP 發表於： 2003/07/19 04:15pm

Q：有很多插件都出現500Error問題，應該怎樣改？？

Ａ：
請在出錯程式第二行

貼上 use CGI::Carp qw(fatalsToBrowser);

瀏覽器就會顯示錯誤訊息

接下來就是英文程度的問題！（瀏覽器顯示的錯誤訊息，英文語法都很簡單）

本論壇言論純屬發言者個人意見，與 周氏家族:::...Chous family 立場無關

目前頁面執行消耗時間： 130.00 毫秒　[Gzip: On, Level: 9]