EsbRenameDatabase

クライアントまたはサーバー上で、アプリケーション内の既存のデータベースの名前を変更します。データベースがサーバー上で実行されている場合、最初に停止されます。

構文

            EsbRenameDatabase
             (
            hCtx, AppName, DbName, nDbName
            )
ByVal 
            hCtx
                As Long
ByVal 
            AppName
             As String
ByVal 
            DbName
              As String
ByVal 
            nDbName
             As String

パラメータ	説明
hCtx	VB APIコンテキスト・ハンドル。EsbCreateLocalContext()から戻されたローカル・コンテキスト・ハンドルの場合もあります。
AppName	アプリケーション名。
DbName	名前を変更する既存のデータベースの名前。
nDbName	データベースの新しい名前。データベース名の制限を参照してください。

備考

クライアント・データベースの名前を変更すると、ローカル・データベースのディレクトリ名も変更されます。

戻り値

なし。

アクセス

サーバー・データベースの場合は、呼出し元がデータベースの作成/削除/編集権限(ESB_PRIV_DBCREATE)を持っている必要があります。

例

         Declare Function EsbRenameDatabase Lib "ESBAPIN" (ByVal hCtx As Long, ByVal AppName As String, ByVal OldName As String, ByVal NewName As String) As Long 

Sub ESB_RenameDatabase ()
   Dim sts As Long
   Dim AppName As String
   Dim OldName As String
   Dim NewName As String    AppName = "Sample"
   OldName = "Basic"
   NewName = "NewBasic"   '****************
   ' Rename database
   '****************
   sts = EsbRenameDatabase (hCtx, AppName,
         OldName, NewName)
End Sub