[外掛](ALL)管理員&GM訊息
發表於 : 2005-05-28 11:21 am
此外掛主要是配合New-TypeChobits所開發的後台外掛來使用
所以安裝此外掛前必須先安裝後台外掛才能使用
範例圖片
※以下程序皆以更新為最新內容
在您的資料庫中輸入下列語法
儲存,關閉所有檔案
因為這篇外掛寫出來之後就直接拿出來分享了,還沒有簡化&DEBUG....
所以有問題的話請提出吧....完畢。
所以安裝此外掛前必須先安裝後台外掛才能使用
範例圖片
※以下程序皆以更新為最新內容
在您的資料庫中輸入下列語法
- 代碼: 選擇全部
ALTER TABLE `wog_message` ADD `p_userlv` INT( 11 ) UNSIGNED DEFAULT '0' NOT NULL ;
[size=134]開啟檔案[/size]wog/wog.js 寫:
尋找
- 代碼: 選擇全部
function system_view(s)
{
..........
..........
..........
}
覆蓋為
- 代碼: 選擇全部
function system_view(s,s_2)
{
message_cls();
var view_name=parent.wog_view;
if(s_2)
{
view_name.document.write(temp_table1);
view_name.document.write('<tr bgcolor=#5f5f5f><td colspan=8>管理員訊息</td></tr>');
if(s_2!="")
{
view_name.document.write('<tr><td width=65%>內容</td><td width=35%>發生時間</td></tr>');
var s1=s_2.split(";");
for(var i=0;i<s1.length;i++)
{
var s2=s1[i].split(",");
view_name.document.write('<tr><td>'+s2[0]+'</td><td>'+s2[1]+'</td></tr>');
}
}else
{view_name.document.write('<tr><td colspan="8" >尚未發生任何事件</td></tr>');}
view_name.document.write(''+temp_table2+'<br>');
}
view_name.document.write(temp_table1);
view_name.document.write('<tr bgcolor=#5f5f5f><td colspan=8>玩家訊息</td></tr>');
if(s!="")
{
view_name.document.write('<tr><td width=65%>內容</td><td width=35%>發生時間</td></tr>');
var s1=s.split(";");
for(var i=0;i<s1.length;i++)
{
var s2=s1[i].split(",");
view_name.document.write('<tr><td>'+s2[0]+'</td><td>'+s2[1]+'</td></tr>');
}
}else
{
view_name.document.write('<tr><td colspan="8" >尚未發生任何事件</td></tr>');
}
view_name.document.write(temp_table2);
}
[size=134]開啟檔案[/size]wog/class/wog_act_message.php 寫:
尋找
- 代碼: 選擇全部
function system_view1($user_id)
{
..........
..........
..........
}
覆蓋為
- 代碼: 選擇全部
function system_view1($user_id)
{
global $DB_site,$lang;
$DB_site->query("delete from wog_message where dateline < ".(time()-(10*24*60*60))." ");
$sql="select title,dateline from wog_message where p_id=".$user_id." and p_userlv=0 order by m_id desc LIMIT 10";
$pack=$DB_site->query($sql);
$s="";
while($packs=$DB_site->fetch_array($pack))
{
$s=$s.";".$packs[title].",".date("Y/m/d g:i a",$packs[dateline]);
}
$s=substr($s,1,strlen($s));
$sql="select title,dateline from wog_message where p_id=".$user_id." and p_userlv>0 order by m_id desc LIMIT 10";
$pack2=$DB_site->query($sql);
$s2="";
while($packs2=$DB_site->fetch_array($pack2))
{
$s2=$s2.";".$packs2[title].",".date("Y/m/d g:i a",$packs2[dateline]);
}
$s2=substr($s2,1,strlen($s2));
$DB_site->free_result($pack);
$DB_site->free_result($pack2);
showscript("parent.system_view('$s','$s2')");
unset($s);
unset($packs);
unset($s2);
unset($packs2);
}
[size=134]開啟檔案[/size]wog/acpleft.php 寫:
尋找
- 代碼: 選擇全部
<tr>
<td align="left">
<p><font size="1" face="新細明體">
<input class="text" type="submit" value="管理員列表" name="actions"></font></td>
</tr>
後面,加上
- 代碼: 選擇全部
<tr>
<td align="left">
<p><font size="1" face="新細明體">
<input class="text" type="submit" value="傳送玩家訊息" name="actions"></font></td>
</tr>
[size=134]開啟檔案[/size]wog/acpmain.php 寫:
尋找
- 代碼: 選擇全部
case "管理員列表":
print_header();
view_admin();
print_footer();
break;
後面,加上
- 代碼: 選擇全部
case "傳送玩家訊息":
print_header();
letter_write();
print_footer();
break;
case "更新訊息資料庫":
print_header();
letter_sub();
print_footer();
break;
尋找
- 代碼: 選擇全部
function admin_player()
前面,加上
- 代碼: 選擇全部
function letter_write()
{
global $DB_site;
?>
<form action="acpmain.php" method="post" target="_self">
<table width="97%" border="1" cellspacing="0" cellpadding="2" align="center" bordercolor="#4B689E">
<tr><td>對象帳號</td><td class="b1"><input type="text" name="name" size="12"></td></tr>
<tr><td>內容</td><td class="b1"><textarea cols="30" rows="7" name="body"></textarea></td></tr>
<tr><td colspan="2"><input type="submit" value="送出"></td></tr>
<input type="hidden" name="actions" value="更新訊息資料庫">
<input type="hidden" name="sid" value="<?=$_SESSION["SID"];?>">
</form>
<?
}
function letter_sub()
{
global $DB_site,$_POST;
if(!$_POST["name"] || $_POST["name"]==""){alertWindowMsg('沒有輸入對象名稱');}
$to_name=$DB_site->query_first('select p_id from wog_player where p_name="'.$_POST["name"].'"');
if(!$to_name || $to_name==""){alertWindowMsg('對象不存在');}
$to_body=$_POST["body"];
$to_user_id=$_SESSION["ADMINID"];
if($_SESSION["ADMIN_LV"]==1){$to_user="管理員";}else{$to_user="GM";}
$DB_site->query("insert into wog_message(p_id,title,dateline,p_userlv)values(".$to_name[0].",'".$to_user." ".$to_user_id."寫道:".$to_body."',".time().",".$_SESSION["ADMIN_LV"].")");
echo ("訊息送出成功");
}
儲存,關閉所有檔案
因為這篇外掛寫出來之後就直接拿出來分享了,還沒有簡化&DEBUG....
所以有問題的話請提出吧....完畢。