上一篇
下一篇
asp列出数据库中指定表的所有字段名称
作者:webfly 日期:2010-05-05
第一步：绑定数据库
<%
dim conn
dim connstr
'on error resume next
connstr="DBQ="+server.mappath("XXXX.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>
dim conn
dim connstr
'on error resume next
connstr="DBQ="+server.mappath("XXXX.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
%>
第二步：读取所有字段
<%
sql="select * from 表"
set rs=server.CreateObject("ADODB.RecordSet")
rs.open sql,conn,1,1
for i=0 to rs.Fields.Count-1
Response.Write(rs.Fields(i).Name & "<br />")
next
rs.close
set rs=nothing
%>
sql="select * from 表"
set rs=server.CreateObject("ADODB.RecordSet")
rs.open sql,conn,1,1
for i=0 to rs.Fields.Count-1
Response.Write(rs.Fields(i).Name & "<br />")
next
rs.close
set rs=nothing
%>
文章来自: 
引用通告: 
Tags: 
相关日志:
评论: 0 | 引用: 0 | 查看次数: -
发表评论
