非常不錯的列出sql服務(wù)器上所有數(shù)據(jù)庫的asp代碼
更新時間：2006年12月28日 00:00:00 作者：
主題:列出sql服務(wù)器上所有庫的代碼
第一個：dbo權(quán)限列出服務(wù)器上所有數(shù)據(jù)庫
<%
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>
第一個：dbo權(quán)限列出服務(wù)器上所有數(shù)據(jù)庫
復(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)文章
主要用來去除html中的script，iframe等html標(biāo)記，需要的朋友可以參考下。2011-01-01![關(guān)于ASP循環(huán)表格的問題之解答[比較詳細(xì)]](http://img.jbzj.com/images/xgimg/bcimg1.png)
關(guān)于ASP循環(huán)表格的問題之解答[比較詳細(xì)]
在很多時候,我們采用原始的方法來解決一行內(nèi)循環(huán)3張圖片,如果上傳者只上傳了2張圖片,那么2張圖片間的距離會很大,因為缺少了一個<td> </td>.2008-11-11
使用Flash DownLoad編寫采集器(之突破防盜連下載音樂文件)
使用Flash DownLoad編寫采集器(之突破防盜連下載音樂文件)...2007-02-02
關(guān)于網(wǎng)站文件自動備份程序的一點思考...2006-12-12
asp下制做行背景顏色交替變換的表格...2007-04-04
asp 取得用戶真實IP，對代理地址仍然有效的函數(shù)
這篇文章主要介紹了asp 取得用戶真實IP，對代理地址仍然有效的函數(shù),需要的朋友可以參考下2007-08-08
可以應(yīng)用到馬克斯電影站生成Rss Feed的代碼
前段時間為了給本人的電影站增加Rss訂閱功能，動手寫了個動態(tài)生成Rss Feed的ASP代碼，沒法上傳附件，就直接貼代碼吧，反正也不長，用馬克斯做電影站的朋友直接拿去用吧，其它類型的站點修改一下也能用。生成的Rss Feed采用UTF-8編碼，經(jīng)過feedvalidator.org校驗，兼容Rss 2.0和Atom。2008-03-03
ASP checkbox復(fù)選框是否被選中的代碼(結(jié)合數(shù)據(jù)庫)
ASP從數(shù)據(jù)庫中讀出復(fù)選框是否被選中的代碼2010-06-06
ScriptHtml 函數(shù)之過濾html標(biāo)記的asp代碼
ScriptHtml 函數(shù)之過濾html標(biāo)記的asp代碼...2007-09-09
asp下多個域名后綴同時查詢的域名查詢系統(tǒng)...2007-03-03