|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
想法是和程序员的想法不一样的.至于为什么.大家去想一想.跟心理学有关的access|ado|是不是存在哈哈,不必ADOX也能够!!
<%
Dimcn,strCnn,rstSchema
setcn=server.createobject("ADODB.Connection")
setstrCnn=server.createobject("ADODB.Recordset")
setrstSchema=server.createobject("ADODB.Recordset")
strCnn="Provider=Microsoft.Jet.OLEDB.4.0;"
strCnn=strCnn&"DataSource=F:asptest ree.MDB;"
strCnn=strCnn&"PersistSecurityInfo=False"
cn.OpenstrCnn
setrstSchema=cn.openSchema(20)
rstSchema.movefirst
DoUntilrstSchema.EOF
ifrstSchema("TABLE_TYPE")="TABLE"then
response.writerstSchema("TABLE_NAME")&"<br/>"
endif
rstSchema.movenext
Loop
cn.close
setrstSchema=nothing
setcn=nothing
%>
SQL-->体系表sysobjects
access---》用ADOX的例子:
<%
Dimcn,strCnn
setcn=server.createobject("ADODB.Connection")
setstrCnn=server.createobject("ADODB.Recordset")
strCnn="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=F:asptest ree.MDB;PersistSecurityInfo=False"
cn.OpenstrCnn
Settb=Server.CreateObject("ADOX.Table")
Setcat=Server.CreateObject("ADOX.Catalog")
Setcat.ActiveConnection=cn
ForEachaIncat.Tables
Response.Writea.Name&"<br>"
Next
cn.close
%>
</p>SQLServer是基于服务器端的中型的数据库,可以适合大容量数据的应用,在功能上管理上也要比Access要强得多。在处理海量数据的效率,后台开发的灵活性,可扩展性等方面强大。 |
|