links.asp

来自「日记本（多用户版）V3.0 主要功能： 1、日记本基本功能：添加、修改日记等。」· ASP 代码 · 共 52 行

ASP
52 行
字号 
<!--#include file="conn.asp"-->
<LINK href="../images/style.css" type=text/css rel=stylesheet>
<body background="../images/bg_dot.gif">

<%
set rs=conn.execute("select id,n1,n2,n3 from setos where id=1")
tt=rs("n2")
whow=rs("n3")
rs.close
set rs=server.createobject("adodb.recordset")
if whow then
sql="select * from links where ok=true order by webtop,id"
else
sql="select * from links order by webtop,id"
end if
rs.open sql,conn,3,1
%>


                      <MARQUEE align=center direction=right behavior=alternate onmouseout=this.start() onmouseover=this.stop() 
                        scrollAmount=4 width="778" border="0" style="color: #8CCF9C">
                              <TABLE background="../images/bg_dot.gif" cellSpacing=3 cellPadding=0 width=778 
                              align=center border=0>
                                <TBODY><TR>

<%
i=0
do while i<tt
%>
							<TD>
                              <TABLE background="../images/bg_dot.gif" cellSpacing=3 cellPadding=0 width=88 
                              align=center border=0>
                                <TBODY>
                                <TR>
<%
if rs("weblogo")<>"" then
response.write("<TD align=middle bgColor=#ffffff height=31><a href=goto.asp?id="&rs("id")&" target=_blank><img src="&rs("weblogo")&" border=0 width=88 height=31 title="&rs("webbio")&"></a></td>")
else
response.write("<TD align=middle bgColor=#ffffff height=31><a href=goto.asp?id="&rs("id")&" target=_blank title="&rs("webbio")&">"&rs("webname")&"</a></td>")
end if
%>

                                  </TR>
                                <TBODY></TBODY></TABLE>
						 	  </TD>
<%
i=i+1
rs.movenext
if rs.eof then exit do
loop
%>
                                </TR><TBODY></TBODY></TABLE></MARQUEE>

links.asp - 源码说明

本页面展示了「日记本（多用户版）V3.0 主要功能： 1、日记本基本功能：添加、修改日记等。 2、日记加密：当日记添加时」中的 links.asp 源码文件，采用 ASP 编程语言编写，共 52 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

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

⌨️ 快捷键说明

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