非常不错的列出sql服务器上所有数据库的asp代码
发布时间：2016-12-29 来源：查字典编辑
摘要：主题:列出sql服务器上所有库的代码第一个：dbo权限列出服务器上所有数据库复制代码代码如下:
主题:列出sql服务器上所有库的代码
第一个：dbo权限列出服务器上所有数据库
复制代码 代码如下:
<%
Dimsrv
DimobjDB
Setsrv=Server.CreateObject("SQLDMO.SQLServer")
srv.LoginTimeout=15
srv.Connect"127.0.0.1","lcx","lcx"
SetobjDB=Server.CreateObject("SQLDMO.Database")
%>
<SELECTname="fdatabase">
<%
ForEachobjDBInsrv.Databases
IfobjDB.SystemObject=FalseThen
%>
<OPTION><%=objDB.Name%></OPTION>
<%
EndIf
Next
%>
</select>