주제 : 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
%>
<옵션> <%= objdb.name%> </옵션>
<%
endif
다음
%>
</선택>