XMLHTTP+Javascript+Asp写得聊天室,无刷新实现(二)

################main.asp######################

 1Response.Buffer=true   
 2Response.Expires=0   
 3userName=Request.Form("username")   
 4if username="" then Response.Redirect "index.asp"   
 5session("u_name")=username   
 6if Request.Form("sx")="1" then   
 7session("u_sx")="1"   
 8else   
 9session("u_sx")="0"   
10end if   
 1<html>
 2<head>
 3<meta content="text/html; charset=utf-8" http-equiv="Content-Type"/>
 4<link rel="SHORTCUTICON" url="images/Bluenote.ico"/>
 5<title>蓝蝶聊天室::欢迎您! Www.ChinaOk.net .............蓝蝶精品网.............Www.ChinaOk.net</title>
 6<style>   
 7.fbd{BORDER-BOTTOM-COLOR: #3A5C9F; BORDER-BOTTOM-STYLE: solid; BORDER-LEFT-COLOR: #3A5C9F; BORDER-LEFT-STYLE: solid; BORDER-RIGHT-COLOR: #3A5C9F; BORDER-RIGHT-STYLE: solid; BORDER-TOP-COLOR: #3A5C9F; BORDER-TOP-STYLE: solid}   
 8.topc{bgcolor:#ffff00}   
 9</style>
10<script language="JavaScript">   
11self.onerror=null;   
12var nullframe = '<HTML><BODY BGCOLOR=#003366 text=#ffffff><center><H3 color=#ffffff>正在读取资料, 请稍候 ......</h3></center></BODY></HTML>';   
13</script>
14</head>
15<frameset class="topc" cols="*,0" rows="*">
16<frameset border="0" cols="*" frameborder="1" framespacing="0" rows="*,75">
17<frameset border="1" class="topc" cols="*" frameborder="YES" framespacing="1" name="content" rows="45%,*">
18<frame frameborder="1" name="pub" scrolling="auto" src="javascript:parent.nullframe"/>
19<frame frameborder="1" name="my" scrolling="auto" src="javascript:parent.nullframe"/>
20</frameset>
21<frame name="sd" noresize="" scrolling="no" src="send.asp"/>
22</frameset>
23<noframes>
24<p>此网页使用了框架,但您的浏览器不支持框架。</p>
25
26</noframes>
27</frameset>
28</html>
Published At
Categories with Web编程
Tagged with
comments powered by Disqus