1人のユーザーについて、アクティブなデータベースにアクティブな別名テーブルを設定します。
構文
EsbSetAlias
(
hCtx, AltName
)
ByVal
hCtx
As Long
ByVal
AltName
As String
| パラメータ | 説明 |
|---|---|
hCtx |
VB APIコンテキスト・ハンドル。 |
AltName |
アクティブに設定する別名テーブルの名前。 |
戻り値
なし。
例
Declare Function EsbSetAlias Lib "ESBAPIN" (ByVal hCtx As Long, ByVal Name As String) As Long
Sub ESB_SetAlias ()
Dim sts As Long
Dim pName As String pName = "TestAlias"
'**********
' Set Alias
'**********
sts = EsbSetAlias (hCtx, pName)
End Sub
関連トピック