Very nice list of asp code for all databases on sql server

Topic: List the code of all libraries on the sql server

First: dbo permission lists all databases on the server

The code copy is as follows:

<%

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>