ASP网站制作之在红蜻蜓中完成多房间
由于ASP还是一种Script语言所没除了大量使用组件外,没有办法提高其工作效率。它必须面对即时编绎的时间考验,同时我们还不知其背后的组件会是一个什么样的状况; 在global中完成两件事新居间在耳目员名单的初始化(application_onstart)
Dim nameindex(0)
useronlinename=" "
onliners=0
Application("hxf_c_onlinelist")=nameindex
Application("hxf_c_useronlinename")=useronlinename
Application("hxf_c_chatrs")=onliners
将这一段提早在rs.close setrs=nothing
然后到场
rs.Close
rs.Open "select id from reginfo where grade>6",conn
do while not (rs.EOF or rs.BOF)
--chatroomsn=rs("id")
--Application("hxf_c_onlinelist"&chatroomsn)=nameindex
--Application("hxf_c_useronlinename"&chatroomsn)=useronlinename
--rs.MoveNext
loop
关于Session_OnEnd的修正应当在前面说才对
然后就是到场聊天室了hqtchat.asp关于这儿的挪用咱们应当加两个参数
chatroomsn和chatroomname聊天室的房间号和聊天室的称号
chatroomsn=request.querystring("chatroomsn")
chatroomname=request.querystring("chatroomname")
创立session("hxf_c_mylocale")=chatroomsn
换聊天室的称号
chatroomname=Application("hxf_c_chatroomname")
为chatroomname=Application("hxf_c_chatroomname")&mychatroomname
换
crm="<%=Application("hxf_c_chatroomname")%>";
为crm="<%=Application("hxf_c_chatroomname")&mychatroomname%>";
然后就是交换了找出你一切文件中的application("hxf_c_useronlinename")为application("hxf_c_useronlinename"&session("hxf_c_mylocale"))
交换application("hxf_c_onlinelist")为application("hxf_c_onlinelist"&session("hxf_c_mylocale"))固然Application_OnStrat中的局部除外
现实是我是在chatroomsn=session("hxf_c_mylocale")以后用chatroomsn换失落了下面的session("hxf_c_mylocale")在轮回中如许挪用session并非一个好主张
如许每一个房间有了本人的自力的在线名单了
下一步是甚么?我只能对我本人地点聊天室中的人措辞并且也只能收到统一房间中的人说的话是的那咱们应当在咱们说的每句话中到场一个关于房间号的信息,可是我其实不想再加一个sd信息如许会好费事的,因而我看中了syscolor,先改syscolor中的blue和black由于这两个值 是不定长的欠好处置,改成0000ff和000000好了有甚么 变更呢没有只是也是六个字符长的了如许更优点理好了下一步吧
那咱们说的话就是newsd(537)=addwordcolor&cstr(chatroomsn)了
机械人吗?它是如许说的autonewsd(537)=sayscolor&cstr(chatroomsn)
个中的chatroomsn=session("hxf_c_mylocale")
好了,咱们说的话中有了咱们的房间信息了若何吸收呢
在t.asp中
Select Case sift
Case "0","1","2"
中的每个case中咱们都在if判 断中多加一个检测
and mid(sd(i+5),7)=chatroomsn
色彩住信息中多出的房间号如今不处置出没有关系的
javascript注释RGB信息时会本人去除的
假如想也能够是 show(j+5)=left(sd(i+5),6)
好了,如今看起来没有事了咱们切实其实有了分歧的房间了只是好象没有进口罢了
如许好了你可以本人加我是在hqtchat中另加了一个框架我加在f3的上方你可以自便
<frame src="selectchatroom.asp?chatroomsn=<%=chatroomsn%>" name="chatroomfrm" scrolling="NO" noresize marginwidth="0" marginheight="0">
个中的selectchatroom.asp为
<%Response.Expires=0
mychatroomsn=session("hxf_c_mylocale")
chatroomsn=Request.QueryString("chatroomsn")
%>
<form name=form1>
<select name=chatroomselect +chatroomname;
</script>
如许就好了不是很复杂吗
新的房间在线名单不会更新
你可以用refresh 和settimeout 然而我想或许不会有几何人关怀,而老是重读数据库并非个好的主张假如你要用 refresh的话我建议是三分钟
现实上如许的房间只要六级的人能开假如你的办事器再的足够好,你可让每一个人都能开固然你应当在限制了房间数目以后及时更新,如许会更风趣些,一切的房间都没有新的办理功效?恰是由于如许我才只让六级的人才网能有本人的房间,固然他不在线就!!
好象就如许了,应当没有错了,本人做了呀
现实上我已调试经由过程了,也算了我给人人的元宵礼品吧
</p>对于中小型web应用来说,php有很强的竞争力,linux+apache+mysql+php(lamp)的组合几乎可以胜任绝大多数网站的解决方案,对于大型应用来讲,对于系统架构要求更高,需要有成熟的框架支持,jsp的struts是个不错的框架,国内介绍它的资料也非常多,应用逐渐广泛起来。asp就不用说了, 最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。 我想问如何掌握学习节奏(先学什么再学什么)最好详细点? 多看多学多思。多看一些关于ASP的书籍,一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人,向同学老师多多学习,不论知识的大小;多思则是要将学到的知识灵活运用。 弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。 哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的? 不能只是将它停留在纸上谈兵的程度上。 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: 弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。 运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。 它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。 Application:这个存储服务端的数据,如果不清除,会直到web应用程序结束才清除(例如重启站点) 弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。 从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了 学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点: 虽然ASP也有很多网络教程。但是这些都不系统。都是半路出家,只是从一个例子告诉你怎么用。不会深入讨论,更不会将没有出现在例子里的方法都一一列举出来。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。 ASP(ActiveServerPages)是Microsfot公司1996年11月推出的WEB应用程序开发技术,它既不是一种程序语言,也不是一种开发工具,而是一种技术框架,不须使用微软的产品就能编写它的代码,能产生和执行动态、交互式、高效率的站占服务器的应用程序。 不能只是将它停留在纸上谈兵的程度上。 封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。
页:
[1]