📄 link.asp
字号:
<!--#include file="conn.asp"-->
<LINK href="css.css" type=text/css rel=stylesheet>
<%
dim rs_new,sqlwto,j
'最新样品的显示:
Set rs_new = Server.CreateObject("ADODB.Recordset")
sqlwto="select * from link where yanz=1 order by jrsj desc "
'response.write sqltext
'response.end
rs_new.open sqlwto,conn,3,2
%>
<div align="center">
<table border="0" width="44%">
<%
while not rs_new.eof
%>
<tr>
<%for j=0 to 4
if rs_new.eof then
exit for
end if
%>
<td width="81%">
<p align="center"><span style="font-size: 9pt">
<%if rs_new("logo")<>"" and rs_new("logo")<>"http://" then %>
<a target="_blank" title="<%=rs_new("web")%>-<%=rs_new("webabout")%>" href="<% =rs_new("url") %>">
<img src="<%=rs_new("logo")%>" width='88' height='31' style="border: 0px solid #C0C0C0; padding: 0" ></a><a target="_blank" title="<%=rs_new("webabout")%>" href="<% =rs_new("url") %>"><br><% =rs_new("web") %></a>
<%else%>
<a target="_blank" title="<%=rs_new("web")%>--暂时没有图片" href="<% =rs_new("url") %>"><img src="img/nologo.gif" width='88' height='31' style="border: 0px solid #C0C0C0; padding: 0" ></a><a href="<% =rs_new("url") %>" target="_blank"><br><%=rs_new("web")%></a>
<%end if%></span></td>
<%rs_new.movenext
next
%>
</tr>
<%
wend
rs_new.close
%>
</table> </div>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -