怎樣獲知數(shù)據(jù)庫(kù)的連接屬性？
<%@ Language=VBScript %>
<%
Option Explicit
dim objCNN
dim intCTProps
dim item
dim vbCRLF
vbCRLF = chr(10)
Response.Write "<html><head></head><body>" & vbCRLF
Response.Write "<p><h3>春風(fēng)精彩之查看數(shù)據(jù)庫(kù)屬性</h3></p>" & vbCRLF
Response.Write vbCRLF
set objCNN = Server.CreateObject("ADODB.connection")
objCNN.Open "DSN=VicTest"
Response.Write "<table border=1><tr><td width='10%'>>編號(hào)</td>" & vbCRLF
Response.Write "<td width='70%'>>Name</td><td width='20%'>>值</td></tr>" & vbCRLF
intCTProps = 0
for each item in objCNN.Properties
intCTProps = intCTProps + 1
Response.Write "<tr><td>" & intCTProps & "</td>" & vbCRLF
Response.Write "<td>" & item.name & "</td>" & vbCRLF
Response.Write "<td>" & item.value & "</td></tr>" & vbCRLF
next
Response.Write "</table>" & vbCRLF
Response.Write vbCRLF
Response.Write "</body></html>" & vbCRLF
set objCNN = Nothing
set intCTProps = nothing
set item = nothing
set vbCRLF = nothing
%>
相關(guān)文章
如何用POP3接收電子郵件？...2006-11-11
如何在讀取Excel文件時(shí)創(chuàng)建列表的下拉菜單？
如何在讀取Excel文件時(shí)創(chuàng)建列表的下拉菜單？...2006-11-11
如何判斷用戶是否非正常離開聊天室？...2006-11-11
如何使圖象隨機(jī)顯示？...2006-11-11
如何防范利用刷新來“作弊”的計(jì)數(shù)器？...2006-11-11
如何用下拉列表顯示數(shù)據(jù)庫(kù)里的內(nèi)容？
如何用下拉列表顯示數(shù)據(jù)庫(kù)里的內(nèi)容？...2006-11-11
如何用Cookie進(jìn)行登錄驗(yàn)證？...2006-11-11
如何做一個(gè)隨機(jī)密碼產(chǎn)生器？...2006-11-11
如何測(cè)試字符串的長(zhǎng)度？...2006-11-11
如何編寫一個(gè)創(chuàng)建FTP站點(diǎn)的函數(shù)？
如何編寫一個(gè)創(chuàng)建FTP站點(diǎn)的函數(shù)？...2006-11-11