EsbSetDefaultCalcFile

計算スクリプト・ファイルからアクティブ・データベースに対してデフォルト計算スクリプトを設定します。

構文

            EsbSetDefaultCalcFile
             (
            hDestCtx, hSrcCtx, AppName, DbName, FileName
            )
ByVal 
            hDestCtx
             As Long
ByVal 
            hSrcCtx
              As Long
ByVal 
            AppName
              As String
ByVal 
            DbName
               As String
ByVal 
            FileName
             As String

パラメータ	説明
hDestCtx	サーバー上のターゲット・データベースのVB APIコンテキスト・ハンドル。
hSrcCtx	計算スクリプト・ファイルの場所のVB APIコンテキスト・ハンドル。計算スクリプト・ファイルは、クライアント、またはターゲット・データベースと同一のサーバー上に配置できます。
AppName	計算スクリプト・ファイルの場所に対するアプリケーション名。
DbName	計算スクリプト・ファイルの場所に対するデータベース名。
FileName	デフォルト計算スクリプト・ファイルの名前。

備考

デフォルト計算スクリプトの長さは、64KB以下である必要があります。

戻り値

なし。

アクセス

この関数を使用するには、呼出し元はアクティブなデータベースに対して計算権限(ESB_PRIV_CALC)を持っている必要があります。

例

         Declare Function EsbSetDefaultCalcFile Lib "ESBAPIN" (ByVal hDestCtx As Long, ByVal hSrcCtx As Long, ByVal AppName As String, ByVal DbName As String, ByVal FileName As String) As Long

Sub ESB_SetDefaultCalcFile ()
   Dim sts As Long
   Dim AppName As String
   Dim DbName As String
   Dim FileName As String
   Dim hSrcCtx As Long   AppName = "Sample"
   DbName = "Basic"   '***************************************
   ' Calc script is an object at the server * 
   '*************************************** 
   hSrcCtx = hCtx
   FileName = "calc"    '**********
   ' Calc File
   '**********
   sts = EsbSetDefaultCalcFile (hCtx, hSrcCtx, AppName, DbName, FileName) 
End Sub