當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET CryptoProvider.CanDecrypt屬性代碼示例

本文整理匯總了VB.NET中System.Security.RightsManagement.CryptoProvider.CanDecrypt屬性的典型用法代碼示例。如果您正苦於以下問題:VB.NET CryptoProvider.CanDecrypt屬性的具體用法?VB.NET CryptoProvider.CanDecrypt怎麽用?VB.NET CryptoProvider.CanDecrypt使用的例子?那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。您也可以進一步了解該屬性所在System.Security.RightsManagement.CryptoProvider的用法示例。


在下文中一共展示了CryptoProvider.CanDecrypt屬性的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。

示例1: ReadOnlyCollection

ShowStatus("   Binding UseLicense with the SecureEnvironment" & vbLf & "       to obtain the CryptoProvider.")
Dim cryptoProvider As CryptoProvider = useLicense.Bind(_secureEnv)

ShowStatus("   Obtaining BoundGrants.")
Dim grants As ReadOnlyCollection(Of ContentGrant) = cryptoProvider.BoundGrants

rightsBlockTitle.Text = "Rights - " & Filename(useLicenseFile)
rightsBlock.Text = "GRANTS LIST" & vbLf & "-----------------" & vbLf
For Each grant As ContentGrant In grants
    rightsBlock.Text &= "USER:  " & grant.User.Name & " [" & grant.User.AuthenticationType & "]" & vbLf
    rightsBlock.Text &= "RIGHT: " & grant.Right.ToString() & vbLf
    rightsBlock.Text &= "    From:  " & grant.ValidFrom & vbLf
    rightsBlock.Text &= "    Until: " & grant.ValidUntil & vbLf
Next grant

If cryptoProvider.CanDecrypt = True Then
    ShowStatus("   Decryption granted.")
Else
    ShowStatus("   CANNOT DECRYPT!")
End If
開發者ID:VB.NET開發者,項目名稱:System.Security.RightsManagement,代碼行數:20,代碼來源:CryptoProvider.CanDecrypt


注:本文中的System.Security.RightsManagement.CryptoProvider.CanDecrypt屬性示例由純淨天空整理自Github/MSDocs等開源代碼及文檔管理平台,相關代碼片段篩選自各路編程大神貢獻的開源項目,源碼版權歸原作者所有,傳播和使用請參考對應項目的License;未經允許,請勿轉載。