通常、ADO などの ASP オブジェクトについて聞いたことがあるのは 1 種類だけですが、ASP には SQL Server 専用の ASP アクセス オブジェクト、SQLOLE.SQLServer オブジェクトというあまり知られていない ASP アクセス オブジェクトがあります。 SQLOLE.SQLServer は、SQL Server のシステム プロパティに直接アクセスできます。 Set oSQLServer = CreateObject ("SQLOLE.SQLServer") ステートメントは、SQL Server サーバー オブジェクトを生成します。
---- このサーバー内のデータベースのコレクションを表示するには、次のステートメントを使用できます:
For Each SQLDB In oSQLServer.Databases
Response.Write SQLDB.Name ' は、Pubs などのすべてのデータベースをリストします。
次へ
---- データベース (PUBS データベースなど) 内のデータ テーブルのコレクションを表示するには、次のステートメントを使用できます。
pubDatabase=oSQLServer.Databases("pubs")
'oSQLServer は前に作成した SQL Server サーバー オブジェクトです
pubDatabase.Tables の各 DBTable について
Response.WriteDBTable.Name
次へ
---- 次のステートメントは、データベース (PUBS データベース) 内のデータ ビューを一覧表示します。
pubDatabase =oSQLServer.Databases("pubs")
'oSQLServer は前に作成した SQL Server サーバー オブジェクトです
pubDatabase.Views の各 DBView について
Response.Write DBView.Text
次へ
---- 次のステートメントは、データベース (PUBS データベース) 内のストアド プロシージャを一覧表示します。
pubDatabase =oSQLServer.Databases("pubs")
'oSQLServer は前に作成した SQL Server サーバー オブジェクトです
pubDatabase.StoredProcedures の各 DBSP について
応答.DBSP.テキストの書き込み
次に
---- プログラムの実行結果 (データ テーブルの名前を取得):
---- 保存されたプロセスの結果を取得:
---- 完全な小さなサンプル ソース コードが添付されています (他の関数を使用するリーダー)追加できます）。
< %@ LANGUAGE = VBScript % >
< HTML >
<頭>
< META NAME="GENERATOR" コンテンツ =
「マイクロソフト開発者スタジオ」 >
< META HTTP-EQUIV="コンテンツ タイプ"
content="text/html; charset=gb2312" >
< TITLE >< /TITLE >
< /HEAD >
< %
エラー時は次へ再開
薄暗い oSQLServer
oSQLServer = CreateObject ("SQLOLE.SQLServer") を設定します。
strServer = "dep"
strLogin = "さ"
strPwd = ""
oSQLServer.Connect strServer、strLogin、strPwd
%>
<ボディBGCOLOR=#ffffff>
データベース一覧
< SELECT NAME="データベース" >
<%
oSQLServer.Databases の各 SQLDB について
SQLDB.SystemObject ではない場合
Response.Write "< OPTION VALUE=
""" & SQLDB.Name & """ >" & SQLDB.Name
& " "
終了の場合
次
oSQLServer = なしを設定します
%>
< /SELECT>
< /BODY >
< /HTML>