view.asp

来自「Active Server Pages 网页制作教程看之前请传到ASP空间。或者」· ASP 代码 · 共 41 行

ASP
41 行
字号 
<!-- #include virtual="/kjasp/func/DB.fun" -->
<%
  Name=Request.Cookies( "Name" )
  Freq=Request.Cookies( "Freq" )
  If Freq = "" Then Freq = 30
  URL=Request.ServerVariables("PATH_INFO")
  
  SQL = "Select Top 10 * From ChatRoom"
  SQL = SQL & " Order By 时间 Desc"
  Set rs = GetMdbRecordset( "Chatroom.mdb", SQL )
%>

<HTML>
<HEAD>
<META HTTP-EQUIV="refresh" CONTENT="<%=Freq%>";URL="<%=URL%>">
</HEAD>
<BODY BACKGROUND="../b01.jpg">
<H2 Align=Center>聊天看板<HR></H2>
<TABLE>

<%
While Not rs.EOF
%>

  <TR Valign=Top>
  <TD><FONT COLOR=BLUE><%=FormatDateTime(rs("时间"), vbShortTime)%>
  </FONT></TD>
  <TD><FONT COLOR=BLUE>[<%=rs("姓名")%>]说：</FONT> </TD>
  </TR>
  <TR><TD></TD>
  <TD><%=Replace("" & rs("内容"), vbCrLf, "<BR>")%></TD>
  </TR>
<%
  rs.MoveNext
Wend
%>

</TABLE>
<HR>
</BODY>
</HTML>

view.asp - 源码说明

本页面展示了「Active Server Pages 网页制作教程看之前请传到ASP空间。或者本地用iis。或安装pws内有说明」中的 view.asp 源码文件，采用 ASP 编程语言编写，共 41 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与Active相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?