本文整理匯總了VB.NET中System.Web.UI.WebControls.CreateUserWizard.Answer屬性的典型用法代碼示例。如果您正苦於以下問題:VB.NET CreateUserWizard.Answer屬性的具體用法?VB.NET CreateUserWizard.Answer怎麽用?VB.NET CreateUserWizard.Answer使用的例子?那麽, 這裏精選的屬性代碼示例或許可以為您提供幫助。
在下文中一共展示了CreateUserWizard.Answer屬性的1個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。
示例1: New
' 導入命名空間
Imports System.Web
Imports System.Web.UI.WebControls
Imports System.Security.Permissions
Namespace Samples.AspNet.VB.Controls
<AspNetHostingPermission(System.Security.Permissions.SecurityAction.Demand, _
Level:=AspNetHostingPermissionLevel.Minimal)> _
<AspNetHostingPermission(System.Security.Permissions.SecurityAction.InheritanceDemand, _
Level:=AspNetHostingPermissionLevel.Minimal)> _
Public Class CustomCreateUserWizard
Inherits CreateUserWizard
Public Sub New()
Me.MailDefinition.BodyFileName = "MailFile.txt"
Me.MailDefinition.From = "userAdmin@your.site.name.here"
End Sub
Protected Overloads Sub OnSendingMail(ByVal e As MailMessageEventArgs)
e.Message.Subject = "New user on Web site."
' Replace placeholder text in message body with information
' provided by the user.
e.Message.Body.Replace("<%PasswordQuestion%>", Me.Question)
e.Message.Body.Replace("<%PasswordAnswer%>", Me.Answer)
MyBase.OnSendingMail(e)
End Sub
End Class
End Namespace