非常不錯(cuò)的列出sql服務(wù)器上所有數(shù)據(jù)庫(kù)的asp代碼
更新時(shí)間:2006年12月28日 00:00:00 作者:
主題:列出sql服務(wù)器上所有庫(kù)的代碼
第一個(gè):dbo權(quán)限列出服務(wù)器上所有數(shù)據(jù)庫(kù)
<%
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>
第一個(gè):dbo權(quán)限列出服務(wù)器上所有數(shù)據(jù)庫(kù)
復(fù)制代碼 代碼如下:
<%
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>
相關(guān)文章
asp+Access通用的自動(dòng)替換數(shù)據(jù)庫(kù)中的字符串
幾年前寫的一個(gè)腳本,可以自動(dòng)進(jìn)行整庫(kù)的數(shù)據(jù)替換。2008-06-06
用asp實(shí)現(xiàn)無組件生成驗(yàn)證碼的方法2種
用asp實(shí)現(xiàn)無組件生成驗(yàn)證碼的方法2種...2007-01-01
ASP中字符與數(shù)字內(nèi)置操作函數(shù)整理
在ASP中,預(yù)定義了許多函數(shù),可以幫助我們簡(jiǎn)化代碼、提高開發(fā)效率,本文將介紹一些常用的ASP字符與數(shù)字內(nèi)置操作函數(shù),以便開發(fā)人員更加方便、快速地創(chuàng)建 Web 應(yīng)用程序,2023-12-12
ASP基礎(chǔ)入門第九篇(Global.asa文件的使用)
這篇文章主要介紹了Global.asa文件的使用,是一個(gè)可選文件,每個(gè)應(yīng)用程序只能有一個(gè) Global.asa 文件,需要了解的朋友可以參考下2015-10-10
.Net core 的熱插拔機(jī)制的深入探索及卸載問題求救指南
這篇文章主要介紹了.Net core 的熱插拔機(jī)制的深入探索及卸載問題求救指南,本文給大家啊介紹的非常詳細(xì),對(duì)大家的學(xué)習(xí)或工作具有一定的參考借鑒價(jià)值,需要的朋友可以參考下2020-11-11
用asp實(shí)現(xiàn)網(wǎng)頁(yè)調(diào)用doc附Response.ContentType 詳細(xì)列表
最近研究一下如何用網(wǎng)頁(yè)調(diào)用doc,最好能直接打開就成功了.2008-05-05
ASP Crazy 模版操作類(最簡(jiǎn)單的模板類、僅提供交流)
ASP Crazy 模版操作類 最簡(jiǎn)單的模板類需要的朋友可以參考下。2009-10-10

