<%
for i=1 to rs.recordCount '变量i从1循环到数据库中的全部记录数
if (i mod 1 =1) then '每个tr即每行显示1个记录,可根据需要自行修改, 将左边的1修改为2即显示两行。
response.write "<tr align='center'>"
end if
%>
此处为要循环的内容
<%if (i mod 1 = 0) then '每个tr即每行显示1个记录,可根据需要自行修改, 将左边的1修改为2即显示两行。
response.write "</tr>"
end if
rs.movenext
next
rs.close
%>
备注：
如果要输出序号，在ASP中使用<%=i%>标记即可，则 i 对应输出的内容为1、2、3、4……100、101、102……
本例中只要将<%=i%>放在腰循环的内容中就可以
一个ASP替换函数img里面多余的代码
<%
Response.Write(Server.HTMLEncode(FixImg("<img onclick=""if(this.width>screen.width-461) window.open('qq/20082181405371.jpg');"" alt="""" border=""0"" src=""qq/20082181405371.jpg"" />")))
%>
<%
'功能:将IMG代码格式化为<img src= ......
Flash中的XML对象也有方法可以将XML数据向服务器发送。即send和sendAndLoad。send方法向某个 URL 传递 XML 对象，返回的信息都被发送到另外一个浏览器窗口；sendAndLoad 方法向某个 URL 发送一个 XML 对象。返回的信息都放在一个XML对象中。
在某种程度上， XML的send方法和sendAndLoad方法类似于loadVars对象的send方法和 ......
ActiveX控件运行在客户端。我们可以获得客户端的一些信息，如IC卡的信息,客户端的验证等等。但是ActiveX控件也有许多缺点：客户端的部署很困难，如客户端不能正确下载，下载了以后不能正确执行，下载的时候需要设置IE的安全级别等等。
更多的时候，我都在使用COM组件来扩展ASP的功能。准确地说，是服务端运行的Activex Dll ......
<%
Const New_img=10
set rs_Product=server.createobject("adodb.recordset")
sqltext="select top " & New_img & " * from 0791idc_Product order by ID"
rs_Product.open sqltext,conn,1,1
if not rs_Product.EOF then%>
<div align='center' id='demo' style='o ......
