日期:2011-05-02 15:21:00 来源:本站整理
查看数据库中表、视图等[MSSQL防范]
本文“查看数据库中表、视图等[MSSQL防范]”是由七道奇为您精心收集,来源于网络转载,文章版权归文章作者所有,本站不对其观点以及内容做任何评价,请读者自行判断,以下是其具体内容:
<HTML>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>查看数据库中表、视图等</title>
<!-- #INCLUDE FILE="ADOVBS.INC" -->
</head>
<body>
<%
Dim Conn
Dim RS
Set Conn = Server.CreateObject("ADODB.Connection")
Dim connstr
connstr = "DBQ="+server.mappath("webdb.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes;"
'connstr = "DSN=Sql;UID=sa;PWD=;DATABASE=master"
Conn.CursorLocation = adUseClient
Conn.Open connstr
Set RS = Conn.OpenSchema(adSchemaTables)
%>
<div align="center"><center>
<table border="1">
<tr>
<td>库名</td>
<td>表名</td>
<td>全部者</td>
<td>范例</td>
<td>描写</td>
</tr>
<%
Do Until RS.EOF
%>
<tr>
<td><% = RS("TABLE_CATALOG") %></td>
<td><% = RS("TABLE_NAME") %></td>
<td><% = RS("TABLE_SCHEMA") %></td>
<td><% = RS("TABLE_TYPE") %></td>
<td><% = RS("DESCRIPTION") %></td>
</tr>
<%
RS.MoveNext
Loop
%>
</table>
</center></div>
<p>在ACCESS、Microsoft sql server、IIS4、PWS4中都可运行.<br>
还有一个更直观的办法哟,就是直接用SQL语句<br>
Access: select * from MSysObjects;<br>
SQL Server: select * from dbo.sysobjects<br>
Oracle: select * from tab;<br>
不过假如你不加限制条件的话,就会一股脑儿把存储构造呀,模块呀什么的全都查出来了<br>
露茜 1999年1月17日</p>
</body>
</html> 以上是“查看数据库中表、视图等[MSSQL防范]”的内容,如果你对以上该文章内容感兴趣,你可以看看七道奇为您推荐以下文章:
本文地址: | 与您的QQ/BBS好友分享! |
评论内容只代表网友观点,与本站立场无关!
评论摘要(共 0 条,得分 0 分,平均 0 分)
查看完整评论