プライマリ・コンテンツへ移動
Oracle® Smart View for Office開発者ガイド

E88265-03
目次に移動
目次

前
次

HypListDatabases

Cloudデータ・プロバイダ・タイプ: Oracle Analytics Cloud - EssbaseOracle Planning and Budgeting Cloud

オンプレミス・データ・プロバイダ・タイプ: Oracle EssbaseOracle Hyperion Planning

説明

HypListDatabases()では、要求したプロバイダにアプリケーションに存在するキューブ(データベース)のリストを取得します。

構文

HypListDatabases (vtURL, vtServerName, vtUserName, vtPassword, vtApplication, vtApplicationCubeList)

ByVal vtURL As Variant

ByVal vtServerName As Variant

ByVal vtUserName As Variant

ByVal vtPassword As Variant

ByVal vtApplication As Variant

ByRef vtApplicationCubeList As Variant

パラメータ

vtURL: プロバイダのURL

vtServerName: サーバー名

vtUserName: ユーザー名

vtPassword: パスワード

vtApplication: アプリケーション名

vtApplicationCubeList: キューブ(データベース)のリスト

戻り値

正常に終了した場合は0を戻し、それ以外の場合は該当するエラー・コードを戻します。

この例では、HypListApplications関数とHypListDatabases関数を組み合せて使用しています。

Sub test()

Dim url As Variant
Dim srv As Variant
Dim SSO As Variant
Dim uname As Variant
Dim pswd As Variant
Dim app As Variant
Dim Applist As Variant
Dim AppDescList As Variant
Dim AppCubeList As Variant

'Essbase
url = "http://<server>:<port>/aps/SmartView"
app = "Sample"
srv = "EssbaseCluster-1"
uname = "admin"
pswd = "password"

ss = HypConnect("Sheet1", "admin", "ppp", "Conn123")
ss = HypListApplications(url, srv, uname, pswd, Applist, AppDescList)
ss = HypListDatabases(url, srv, uname, pswd, app, AppCubeList)

MsgBox (ss)

End Sub