showimg.asp

来自「用asp制作的大头帖」· ASP 代码 · 共 52 行

ASP
52
字号
<!--#include file="conn.asp"-->
<%Response.Expires = -1
Response.AddHeader "Pragma", "no-cache"
Response.AddHeader "Cache-Control", "no-cache, must-revalidate"%>
<html>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>Aojie在线大头贴</title>
<link href="images\table.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.STYLE1 {font-size: 12px}
-->
</style>
</head>
<body>
大头贴图库:<br />
以下图片由TFOT Photo 5.0生成
<%

call DataConnect
ii=1
sql="select * from [img] order by id desc"
set rs=conn.execute(sql)
%>
<table width="100%" border="0">
        <tr>
		<%
while not rs.eof
'每行显示5个图片
 if (ii mod 5)=0 then
 %>
 <td> <div><img src="<% =rs("myshow") %>"/></div></td></tr><tr>
  
 <%
 else
 %>
  <td> <div><img src="<% =rs("myshow") %>"/></div></td>
 
 <%
  end if
 %>

<%
  ii=ii+1
  rs.movenext
wend
call DataDisConnect
%>
</table>
</body>
</html>

⌨️ 快捷键说明

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