如何将记录在表格中横向显示ASP代码

1、1、新建ASP程序

利用电脑自带的IIS目录，新建一个ASP目录，并新建一个index.html文件，单独展示代码。

IIS的配置以及访问，请看经验链接，本处不作重点介绍。如图：

2、2、链接数据库

任何一项需要服务器承载的数据，都需要连接到数据库进行操作查询以及显示。

键入以下代码，连接并打开Access数据库。

<%

dim conn,mdbfile

mdbfile=server.mappath("Asptab.mdb")

set conn=server.createobject("adodb.connection")

conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=123456;dbq="&mdbfile

%>

如图：

3、3、读取数据

接下来就是读取数据库中的数据，并展示在浏览器端浏览。

键入以下代码，循环读取数据：

<table border=1><tr>

<%

for i=0 to rs.fields.count-1

response.write("<td>"&;rs(i).name&;"</td>")

next

%>

</tr>

如图：

4、4、筛选查询

然后对显示的数据进行简单的筛选查询，键入以下代码：

<%

rs.movefirst

while not rs.Eof

response.write("<tr>")

如图：

5、5、排列显示

将数据改变排列方式，进行横向排列，键入以下代码：

for i=0 to rs.fields.count-1

response.write("<td>"&;rs(i)&;"</td>")

next

response.write("</tr>")

rs.movenext

wend

%>

</table>

如图：

6、6、数据展示

完整的将排列后的数据展示在页面上浏览。

如图：