日期:2014-05-16 浏览次数:21072 次
<div style="text-align:center;color:red" >
<h2>
<% if not rs.EOF then %>
<%=rs("A字段") %>
<%
rs.moveNext
end if
%>
</h2>
<table style="font-size:16px" ><tr>
<%
do until rs.EOF
Response.Write( "<td>" & rs("A字段") & "</td>" )
rs.moveNext
loop
%>
</tr></table>
</div>
Sql="Select top 3 * From 表"
Set Rs=Server.Createobject("adodb.recordset")
Rs.open Sql,Conn,1,1
i=1
Do While Not Rs.Eof
If i=1 Then
Response.write "<h3>第一条记录"&Rs("A")&"</h3>"
Else
Response.write "<span>第"&i&"条记录"&Rs("A")&"</span>"
End If
Rs.MoveNext
i=i+1
Loop
Rs.Close:Set Rs=Nothing