新短信MSN弹出窗口的修改

下载文件在下面。

说明（已经打包在下载文件里）

1、复制两个目录到原CMS根目录下，不会覆盖原来的文件。
2、打开include/skin.asp文件
查找
dim

online_num,login_msg,num_topic,num_data,num_reg,new_username,total_coun

ter,max_online,max_tim,start_tim,new_num,today_tim,stamp_num

下面插入
dim msg_id,msg_name,msg_topic,msg_num
msg_id=0
msg_name=""
msg_topic=""

再往下查找
sql="select count(id) from user_mail where

accept_u='"&login_username&"' and types=1 and isread=0"
set rs=joekoe_cms.exec(sql,1)
login_msg=rs(0)
rs.close
下面插入
if login_msg>0 then
  sql="select top 1 id,send_u,topic from user_mail where

accept_u='"&login_username&"' and types=1 and isread=0"
  set rs=joekoe_cms.exec(sql,1)
  msg_id=int(rs(0))
  msg_name=rs(1)
  msg_topic=rs(2)
  rs.close
end if

再往下查找

if login_msg>0 then
response.write "<bgsound

src='"&joekoe_cms.web_dir_skin&"mail/message.wav'><a

href='user_mail.asp'><img src='"&joekoe_cms.web_dir_skin&"mail/new.gif'

align=absmiddle border=0> 我的短信箱（<font

class=red>"&login_msg&" 新</font>）</a>"


替换成

if login_msg>0 then
response.write "<bgsound

src='"&joekoe_cms.web_dir_skin&"mail/message.wav'><a

href='user_mail.asp'><img src='"&joekoe_cms.web_dir_skin&"mail/new.gif'

align=absmiddle border=0> 我的短信箱（<font

class=red>"&login_msg&" 新</font>）</a>"&joekoe_cms.js_put

("document.write(msg_go

('"&joekoe_cms.web_dir&"',"&login_msg&",'"&msg_topic&"',"&msg_id&",'"&m

sg_name&"'));",1)

再往下查找

sub web_js()
response.write joekoe_cms.js_put("style/joekoe_functions.js",0)

下面插入
response.write joekoe_cms.js_put("style/joekoe_msn.js",0)
http://www.joekoe.com/forum_view.asp?forum_id=7&view_id=50751

文章来自: Original
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志: