欢迎您访问程序员文章站本站旨在为大家提供分享程序员计算机编程知识!
您现在的位置是: 首页  >  IT编程

非常不错的列出sql服务器上所有数据库的asp代码

程序员文章站 2022-10-10 18:21:14
主题:列出sql服务器上所有库的代码     第一个:dbo权限列出服务器上所有数据库 复制代码 代码如下:<%  dim&n...
主题:列出sql服务器上所有库的代码  
  第一个:dbo权限列出服务器上所有数据库
复制代码 代码如下:

<% 
dim srv 
dim objdb 
set srv = server.createobject("sqldmo.sqlserver") 
srv.logintimeout = 15 
srv.connect "127.0.0.1", "lcx", "lcx" 
set objdb = server.createobject("sqldmo.database") 
%> 
<select name="fdatabase"> 
<% 
for each objdb in srv.databases 
if objdb.systemobject = false then 
%> 
<option><%=objdb.name%></option> 
<% 
end if 
next 
%> 
</select>