如何显示一个表的字段信息(ACCESS)

作者:袖梨 2022-06-30
 
<%sub Col_show(tablename)%>
     
     <%
     tablename=trim(tablename)
     const adSchemaColumns=4
     set rs=Conn.openSchema(adSchemaColumns,Array(empty, empty,tablename,empty))
     rs.movefirst
     %> 
    
     <%for i=0 to rs.fields.count-1%> 
    <%=rs.fields(i).name%>
     <%next%> 
    
     <%do while not rs.eof%>
     
    
     <%for i=0 to rs.fields.count-1%> 
    
     <%=rs(i)%>
    
     <%next%> 
    
     
     <%rs.movenext
     loop
     rs.close
     set rs=nothing%> 
          
<%end sub%>

相关文章

精彩推荐