指定した別名を持つメンバーを検索し、そのメンバーにハンドルを戻します。
構文
EsbOtlFindAlias
(
hOutline, pszAlias, pszAliasTable, phMember
)
ByVal
hOutline
As Long
ByVal
pszAlias
As String
ByVal
pszAliasTable
As String
phMember
As Long
| パラメータ | 説明 |
|---|---|
hOutline |
アウトラインのコンテキスト・ハンドル。 |
pszAlias |
検索対象の別名。 |
pszAliasTable |
検索する別名テーブル。すべての別名テーブルを検索するには、""を使用します。デフォルトの別名テーブルを検索するには、"Default"を使用します。 |
phMember |
メンバー・ハンドルの戻り変数。メンバーが見つからなかった場合はESB_NULLです。 |
備考
別名の組合せで使用されている別名も検索されます。
メンバーが見つからない場合、phMemberが""に設定され、呼出しから0が戻されます。
戻り値
成功の場合、0が戻されます。
例
Declare Function EsbOtlFindAlias Lib
"ESBOTLN" (ByVal hOutline As Long, ByVal pszAlias
As String, ByVal pszAliasTable
As String, phMember As Long) As Long
Sub ESB_OtlFindAlias()
Dim sts As Long
Dim Object As ESB_OBJDEF_T
Dim hOutline As Long
Dim hMemberAlias As Long
Object.hCtx = hCtx
Object.Type = ESB_OBJTYPE_OUTLINE
Object.AppName = "Sample"
Object.DbName = "Basic"
Object.FileName = "Basic"
sts = EsbOtlOpenOutline(hCtx, Object, ESB_YES, ESB_YES, hOutline)
If sts = 0 Then
sts = EsbOtlFindAlias(hOutline, "Root Beer", "", hMemberAlias)
End If
End Sub
関連トピック