DatabaseNameプロパティ

適用対象

説明

指定したオブジェクトに関連付けられているデータベース名を戻します。設計時には使用できません。実行時は読取り専用です。

使用方法

database_name = oraconnection.DatabaseName
database_name = oradatabase.DatabaseName

データ型

String

備考

oraconnection.DatabaseName

OpenDatabaseメソッドで指定されたとおりのデータベース名を戻します。
oradatabase.DatabaseName

接続に関連付けられているデータベース名を戻します。これは、oradatabase.Connection.DatabaseNameを参照することと同じです。

例

この例では、ConnectおよびDatabaseNameプロパティを使用して、接続したユーザー名とデータベースを表示する方法を示します。このコードをコピーして、フォームの定義セクションに貼り付けてください。次に[F5]を押します。

 
Sub Form_Load ()
 
 'Declare variables 
 Dim OraSession As OraSession 
 Dim OraDatabase As OraDatabase 
 Dim OraDynaset As OraDynaset 
 
 'Create the OraSession Object.
 Set OraSession = CreateObject("OracleInProcServer.XOraSession")
 
 'Create the OraDatabase Object by opening a connection to Oracle.
 Set OraDatabase = OraSession.OpenDatabase("ExampleDb", "scott/tiger", 0&)
 
 'Display the username and database to which you have connected.
 MsgBox "Connected to " & OraDatabase.Connect & "@" & OraDatabase.DatabaseName
 
End Sub