次の方法で共有


Permission.Add メソッド

指定したユーザー用の現在のフォームで、指定したアクセス許可と有効期限日を使用し、新しいアクセス許可のセットを作成します。

このメソッドは、CLS に準拠していません。  

名前空間: Microsoft.Office.Interop.InfoPath.SemiTrust
アセンブリ: Microsoft.Office.Interop.InfoPath.SemiTrust (microsoft.office.interop.infopath.semitrust.dll 内)

構文

'宣言
<DispIdAttribute(2)> _
Function Add ( _
    bstrUserId As String, _
    varPermission As Object, _
    varExpirationDate As Object _
) As UserPermissionObject
'使用
Dim instance As Permission
Dim bstrUserId As String
Dim varPermission As Object
Dim varExpirationDate As Object
Dim returnValue As UserPermissionObject

returnValue = instance.Add(bstrUserId, varPermission, varExpirationDate)
[DispIdAttribute(2)] 
UserPermissionObject Add (
    string bstrUserId,
    Object varPermission,
    Object varExpirationDate
)

パラメータ

  • bstrUserId
    現在のフォームのアクセス許可を付与するユーザーの電子メール アドレス (user@domain.com 形式)。必須。
  • varPermission
    現在のフォームで、1 つ以上の MsoPermission 値の組み合わせとして、指定したユーザーに付与するアクセス許可。オプション。
  • varExpirationDate
    System.DateTime 値で指定する、付与されるアクセス許可の有効期限日。オプション。

戻り値

指定したユーザーを表す UserPermissionObject

コメント

varPermission パラメータを設定するために MsoPermission 列挙値にアクセスするには、Microsoft Visual Studio Tools for Applications (VSTA) または Visual Studio の [参照の追加] ダイアログ ボックスの [COM] タブを使用して、Microsoft Office 12.0 Object Library への参照を設定する必要があります。これにより、Microsoft.Office.Core 名前空間のメンバへの参照が確立されます。

Permission オブジェクトとそのメンバは Microsoft Office InfoPath 2007 の新しい機能なので、このオブジェクトとそのメンバにアクセスするには、thisXDocument 変数によって返されるオブジェクトを _XDocument3 型にキャストする必要があります。詳細については、「[方法] InfoPath 2003 と互換性のない Microsoft.Office.Interop.InfoPath.SemiTrust のメンバを使用する方法」を参照してください。

このメンバは、[フォームのオプション] ダイアログ ボックスの [セキュリティと信頼] カテゴリを使用して完全信頼で実行するように構成されているフォーム テンプレートから開かれたフォームだけがアクセスできます。このメンバは、直接呼出し元に対する完全な信頼が必要であり、部分的に信頼されたコードで使用することはできません。詳細については、MSDN の「部分的に信頼されたコードからライブラリを使用する」を参照してください。

次の例では、Add メソッドを使用して、フォームに新しいユーザーを追加し、そのユーザーに Full Control アクセス レベルを割り当てて、今日から 2 日後に有効期限日を設定しています。

この例では、フォーム モジュールの宣言セクションの Microsoft.Office.Core 名前空間に対して、using ディレクティブまたは Imports ディレクティブが必要です。

_XDocument3 thisDoc = (_XDocument3)thisXDocument;

string strExpirationDate = DateTime.Today.AddDays(2).ToString();
DateTime dtExpirationDate = DateTime.Parse(strExpirationDate);

thisDoc.Permission.Add("someone@example.com",
   msoPermission.msoPermissionFullControl, dtExpirationDate);
Dim thisDoc As _XDocument3 = DirectCast(thisXDocument, _XDocument3)

Dim strExpirationDate As String = _
   DateTime.Today.AddDays(2).ToString()
dtExpirationDate As DateTime = DateTime.Parse(strExpirationDate)

thisDoc.Permission.UserPermissions.Add("someone@example.com", _
   msoPermission.msoPermissionFullControl, dtExpirationDate)

関連項目

参照

Permission インターフェイス
Permission のメンバ
Microsoft.Office.Interop.InfoPath.SemiTrust 名前空間