当前位置: 首页 > 图文教程 > 网络编程 > ASP > Display data From database into 2 Column

ASP
用ASP编写图片计数器
最简洁的多重查询的解决方案
披着羊皮的大野狼 ASP中Session技巧
简单入门ASP变量
简单入门ASP子程序
几款Access 在线管理工具(ASP)比较
ASP实例教程:Form集合
ASP实例教程:FileSystemObject对象
关于ASP Recordset 分页出现负数解决方法及建议
sdcms添加在线提交功能
如何配置IIS既可以运行ASP又可以运行PHP
Asp获取当日文章并支持前一天后一天的方法
ASP动态include文件
用ASP开发网页需要牢记的注意事项
利用ASP发送和接收XML数据的处理方法
Session对象失效的客户端解决方法
通过数组给您的文件排序
一次性下载远程页面上的所有内容
ASP生成不重复随机数字的另类思路
asp模板引擎终结者(WEB开发之ASP模式)

ASP 中的 Display data From database into 2 Column


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 145 ::
收藏到网摘: n/a

  <%
Conn_String = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("link.mdb")
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open Conn_String
sql = "select * from cat order by ID"
set rs = Conn.Execute (sql)
'Connect to database
%>



<table border="0" width="300">

<%
Do while NOT rs.EOF
ColNum = 1
 Do while ColNum < 3
%>

<!-- First column-->
<TD ALIGN=LEFT VALIGN=middle WIDTH="150"><a href="showlink.asp?CatID=<%=rs("id")%>"><%=rs("cat")%>
</a></TD>

<%
if NOT rs.EOF then
rs.MoveNext
end if
ColNum = ColNum + 1
if NOT rs.EOF then
%>

<!-- second column-->
<TD ALIGN=LEFT VALIGN=middle WIDTH="150"><a href="showlink.asp?CatID=<%=rs("id")%>"><%=rs("cat")%></a></TD>

<%
end if
ColNum = ColNum + 1
Loop
%>

</TR>



<%
if NOT rs.EOF then  
rs.MoveNext  
end if
Loop
%>

</TABLE>

<% rs.close
Conn.Close
set Conn = nothing
%>