WEB源码(ASP,PHP,...)

开发平台：

HTML/CSS

showmsg.asp：源码内容

							<!--#include file="conn.asp"-->
<HTML>
<HEAD>
<TITLE></TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
<style type="text/css">
<!--
body {
	background-color:#CCCCFF;
}
font {
	font-size: 12px;
	font-weight: lighter;
	text-decoration: none;
}
.style1 {color: #FF0000}
table {
	font-size: 12px;
	font-weight: lighter;
	color: #000000;
	text-decoration: none;
}
-->
</style></HEAD>
<BODY>
<table width="100%" height="30" border="0" >
  <%
   '显示聊天内容
    set rs=Server.CreateObject("ADODB.RecordSet")
    sql="select  * from  ip363net  where id ORDER BY id DESC"
    rs.open sql,conn,1,1
    for i=1 to 10 step 1
	%>
  
 <tr>
    <td align="left"><%response.Write(rs("username"))%></td>
    <td width="2%" align="left" ><span class="style1">对</span></td>
	<td align="left"><%response.Write(rs("rname"))%></td>
	<td width="3%" align="left" ><span class="style1">说</span></td>
	<td width="66%" align="left">
	<%
	response.Write(rs("msg"))
	if len(rs("url"))>0 then
	
	%>
    <a href="topmsg.asp?url=<%=rs("url")%>" target="topmsg"><%response.Write("你有礼物点这里收听")%></a>	
	<%
	end if
	%>
		<%
	
	if len(rs("gif"))>0 then
	
	%>
        给你的<img src="<%=rs("gif")%>">图片漂亮吗?
		<%
	end if
	%>
	</td>
    <td width="14%" align="left">
	<%
	response.Write(rs("posttime")&"<br>")
   %>
	</td>
  </tr>
  <%  rs.movenext
   if rs.EOF Then Exit For
   next
   rs.close()
   set rs=nothing
   %>
</table>
<tr>
 <td align="center"><form name=loading>
<table border=0 cellpadding=0 cellspacing=0 width="100%" height="100%">
<tr>
   <TD align="center" valign="top">
   
   <p><input  type="hidden" name=chart size=46 style="font-family:Arial; font-weight:bolder; color:black; background-color:#EAEAEA; padding:0px; border-style:none;">
<br>
<input type="hidden" name=percent size=46 style="font-family:Arial; color:black; background-color:#EAEAEA;text-align:center; border-width:medium; border-style:none;">
<script>var bar = 0 
var line = "||" 
var amount ="||" 
count() 
function count(){ 
bar= bar+1 
amount =amount + line 
document.loading.chart.value=amount 
document.loading.percent.value=bar+"%" 
if (bar<99) 
{setTimeout("count()",20);} 
else 
{window.location = "showmsg.asp";;}
}
</script></p></TD>
</tr>
</table>
</FORM></td>
<td></td>
<tr>
</table>
<!-- START NNR Site Census V5.1 -->
<!-- COPYRIGHT 2004 Nielsen // Netratings -->
<!-- END NNR Site Census V5.1 --></BODY>
</HTML>

						