如何显示一个表的字段信息（ACCESS）

最新推荐文章于 2025-02-10 01:24:21 发布

原创最新推荐文章于 2025-02-10 01:24:21 发布 · 1.8k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#access #border #table

ASP 专栏收录该内容

5 篇文章

订阅专栏

此博客给出一段代码，用于展示表格数据。代码中定义了一个名为Col_show的子程序，通过连接数据库获取指定表的列信息，并将其以表格形式展示，设置了表格边框等样式。

<%sub Col_show(tablename)%>
   <table border="1" cellspacing="0" cellpadding="3" style='border-collapse:collapse;' bordercolor="#006699">
   <%
   tablename=trim(tablename)
   const adSchemaColumns=4
   set rs=Conn.openSchema(adSchemaColumns,Array(empty, empty,tablename,empty))
   rs.movefirst
   %>
     <tr>
   <%for i=0 to rs.fields.count-1%>
    <td><%=rs.fields(i).name%></td>
   <%next%>
     </tr>
   <%do while not rs.eof%>

     <tr>
   <%for i=0 to rs.fields.count-1%>
    <td>
     <%=rs(i)%>
    </td>
   <%next%>
     </tr>

   <%rs.movenext
   loop
   rs.close
   set rs=nothing%>
   </table>
<%end sub%>