灿斌工作室Ajax无刷新聊天室 for BBSXP 2008.1

By admin at 2007-12-10 • 0人收藏 • 1884人看过

灿斌工作室Ajax无刷新聊天室 for BBSXP 2008.1

本插件有灿斌工作室的CEO林灿斌亲自开发,未经许可,禁止修改和转载!
若想转载,请登陆http://cbgzs.8800.org发帖申请!
技术支持:
网站支持:http://cbgzs.8800.org
QQ:517038270


此插件适用与BBSXP 2008.1
若想要其他版本的
请联系林灿斌定做
本插件无须升级数据库
绝对安全


安装步骤
1.打开Loading.asp
找到
 case "Preview"
  Subject=unescape(Request.Form("Subject")&Request.Form("PostSubject"))
  Body=unescape(Request.Form("Body"))
在下面加上
case "response"
Response.ContentType="text/html; charset=gb2312" '//输出简体中文数据
Sql="Select * From ["&TablePrefix&"PrivateMessages] where Subject='群消息' order by MessageID"
Rs.Open Sql, Conn, 1,1
Do While Not Rs.Eof%>
<%if Rs("SenderUserName")=CookieUserName then%>
<p>
&nbsp;&nbsp;&nbsp;<font color=#008040><b><%=Rs("SenderUserName")%></b>&nbsp;&nbsp;(<%=Rs("CreateTime")%>)</font>
<br>&nbsp;&nbsp;&nbsp;&nbsp;<%=BodyEncode(Rs("Body"))%>
</p>
<%else%>
<p>
&nbsp;&nbsp;&nbsp;<font color=#0000FF><b><%=Rs("SenderUserName")%></b>&nbsp;&nbsp;(<%=Rs("CreateTime")%>)</font>
<br>&nbsp;&nbsp;&nbsp;&nbsp;<%=BodyEncode(Rs("Body"))%>
</p>
<%end if
Rs.Movenext
Loop
Rs.Close


case "receive"
if CookieUserName<>empty then
Text=HTMLEncode(Request("Text"))
Sql="Select * From ["&TablePrefix&"PrivateMessages]"
Rs.Open Sql,Conn,1,3
Rs.Addnew
Rs("SenderUserName")=CookieUserName
Rs("Body")=Text
Rs("CreateTime")=Now
Rs("Subject")="群消息"
Rs.Update
Rs.Close
end if

2.打开Setup.asp
找到<a href="Search.asp?ForumID=<%=RequestInt("ForumID")%>">搜索</a>
在下面加上
 | <a href=javascript:BBSXP_Modal.Open('chat.asp',528,320) title=点击在新窗口中打开聊天室 style=cursor:hand>聊天室</a>

3.把chat.asp传上去

完成了
感谢林灿斌吧!!!

[ybbtopic=3]灿斌工作室Ajax无刷新聊天室 for BBSXP 2008.1.rar[/ybbtopic]

[此帖子已被 admin 在 2007-12-10 17:58:25 编辑过]

[此帖子已被 admin 在 2007-12-10 18:03:36 编辑过]

52 个回复 | 最后更新于 2008-06-29
2007-12-10   #1

不要限制回三贴啊

 

2007-12-10   #2

这种做法是给想要的人逼着

灌水

2007-12-10   #3

这是第三贴,该可以了吧

 

2007-12-10   #4
真的可以,这是下载地址

[此帖子已被 admin 在 2008-6-28 14:45:24 编辑过]

2007-12-11   #5

怎么不好用呢?

2007-12-11   #6
大家有用这个插件的吗?
2007-12-11   #7

我安装了怎么不显示用户名呢?

2007-12-11   #8
老大我的怎么不行啊~~  乱套了我的,http://www.mk-sky.com.cn/bbsxp/chat.asp谢谢帮忙看看哇
2007-12-11   #9
区长,能不能做一个适合BBSxp 2007 (Build: 7.3.1)这个版本的聊天室啊?
2007-12-11   #10

这个...有必要吗?

1

2007-12-11   #11

2........

 

2007-12-11   #12
3
2007-12-12   #13

dingmax:
老大我的怎么不行啊~~  乱套了我的,http://www.mk-sky.com.cn/bbsxp/chat.asp谢谢帮忙看看哇

没有问题啊

2007-12-12   #14

你进数据库管理吧

2007-12-12   #15

一定要看看

2007-12-12   #16
怎么下不了?
2007-12-12   #17
还是下不了
2007-12-13   #18
.......................
2007-12-13   #19
.................................

此帖已被锁定,禁止回复

登 录
信息栏
购买PHP虚拟主机 / VPS

Carbon Forum是一个基于话题的高性能轻型PHP论坛

下载地址:Carbon Forum v5.0.1
QQ群:12607708(QQ我不常上)

donate

手机支付宝扫描上方二维码可向本项目捐款

Loading...