主题:列出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>
网站建设 IT知识 IT知识教程 非常不错的列出sql服务器上所有数据库的asp代码 
最新文章
热门文章
猜你喜欢
