获取或设置要访问的文件或网站 URL,或者需要对活动文档具有其他权限的用户要联系的电子邮件地址。 读/写。
语法
表达式。RequestPermissionURL
表达 一个代表 Permission 对象的变量。
备注
RequestPermissionURL 设置对应于权限用户界面中的“用户可以从请求其他权限”选项。 使用 RequestPermissionURL 属性可以指定文件、网站或电子邮件联系人,用户可以从中请求或了解如何请求活动文档的其他权限;例如:
- 网址: - https://companyserver/request_permissions.asp
- 文件: - \\companyserver\share\requesting_permissions.txt
- 电子邮件地址: - mailto:permissionsmgr@example.com?Subject=Request%20permissions
示例
下面的示例显示有关活动文档的权限设置的信息,包括 RequestPermissionURL 设置。
 Dim irmPermission As Office.Permission 
 Dim strIRMInfo As String 
 Set irmPermission = ActiveWorkbook.Permission 
 If irmPermission.Enabled Then 
 strIRMInfo = "Permissions are restricted on this document." & vbCrLf 
 strIRMInfo = strIRMInfo & " View in trusted browser: " & _ 
 irmPermission.EnableTrustedBrowser & vbCrLf & _ 
 " Document author: " & irmPermission.DocumentAuthor & vbCrLf & _ 
 " Users with permissions: " & irmPermission.Count & vbCrLf & _ 
 " Cache licenses locally: " & irmPermission.StoreLicenses & vbCrLf & _ 
 " Request permission URL: " & irmPermission.RequestPermissionURL & vbCrLf 
 If irmPermission.PermissionFromPolicy Then 
 strIRMInfo = strIRMInfo & " Permissions applied from policy:" & vbCrLf & _ 
 " Policy name: " & irmPermission.PolicyName & vbCrLf & _ 
 " Policy description: " & irmPermission.PolicyDescription 
 Else 
 strIRMInfo = strIRMInfo & " Default permissions applied." 
 End If 
 Else 
 strIRMInfo = "Permissions are NOT restricted on this document." 
 End If 
 MsgBox strIRMInfo, vbInformation + vbOKOnly, "IRM Information" 
 Set irmPermission = Nothing 
另请参阅
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。