账号通
    

账号  

密码  

11438

查看

24

回复
主题:[分享]QQ右下角弹窗提示效果 [收藏主题] 本贴被认定为精华 转到:  
gyxin123 当前离线

1204

主题

0

广播

0

粉丝
添加关注
级别:九年级

用户积分:9198 分
登录次数:441 次
注册时间:2007/12/23
最后登录:2012/10/16
gyxin123 发表于:2009/1/3 22:13:00   | 显示全部帖子 查看该作者主题 楼主 
科汛智能建站系统

效果请看这个贴子:http://bbs.kesion.com/dispbbs.asp?BoardID=41&ID=64021&replyID=&skin=1


简单说明一下:收件箱上边是会员中心的最新公告


 


实现步骤:


1、在会员中心首页模板最后的</body>前边加上


<div id="ipLocation" style="display:none;"></div>
<script src="qqbar/area_lmt.js" class=" defer"></script>


 


2、将下边的RAR文件解压直接复制到USER文件夹里边即可。


 下载信息  [文件大小:8.49 KB 下载次数: 次]
点击下载文件:qqbar


感觉好就顶一个哈。

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
gyxin123 当前离线

1204

主题

0

广播

0

粉丝
添加关注
级别:九年级

用户积分:9198 分
登录次数:441 次
注册时间:2007/12/23
最后登录:2012/10/16
gyxin123 发表于:2009/1/4 2:07:00   | 显示全部帖子 查看该作者主题 沙发 

说明一下:不要偷懒,上述代码只实现效果,最新公告我是没加链接的,自己也动动手改一下:),链接在QQbar.asp这个文件里改

上述实现步骤不足之处匿名投稿时会在右下角出现一个白框

 

解决方法:将

<div id="ipLocation" style="display:none;"></div>
<script src="qqbar/area_lmt.js" class=" defer"></script>

 

替换成: 

<script>
       getAjax(document.getElementById("userbasicinfo"),"UserAjax.asp?Action=QQbar");
 </script>  

 

然后打开userajax.asp这个文件

Select Case KS.S("Action")下边加上case "QQbar" call getqqbar()

然后在Sub TurnToSpace()前边加上

sub getqqbar()
  IF Cbool(KSUser.UserLoginChecked)=false Then
   Exit Sub
  End If
  response.Write"<div id=""ipLocation"" style=""display:none;""></div>"
  response.Write"<script src=""qqbar/area_lmt.js"" class="" defer""></script>"
end sub

 

这下就完美了

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.07813秒 powered by KesionCMS 9.0