Creating Multilingual Websites - Part 2

Imports System.Web.UI
Imports System.Web.UI.WebControls

Public Class LocalizedLinkButton
   Inherits LinkButton
   Implements ILocalized

#Region "Fields and Properties"
   Private _colon As Boolean
   Private _key As String
   Private _confirmKey As String

   Public Property ConfirmKey() As String
      Get
         Return _confirmKey
      End Get
      Set(ByVal Value As String)
         _confirmKey = Value
      End Set
   End Property
   Public Property Colon() As Boolean Implements ILocalized.Colon
      Get
         Return _colon
      End Get
      Set(ByVal Value As Boolean)
         _colon = Value
      End Set
   End Property

   Public Property Key() As String Implements ILocalized.Key
      Get
         Return _key
      End Get
      Set(ByVal Value As String)
         _key = Value
      End Set
   End Property
#End Region

   Protected Overrides Sub Render(ByVal writer As HtmlTextWriter)
      Dim value As String = ResourceManager.GetString(Key)
      If Colon = True Then
         value &= ResourceManager.Colon
      End If
      MyBase.Text = LocalizedUtility.ReplaceParameters(Controls, value)
      If Not ConfirmKey Is Nothing Then
         Attributes.Add("onClick", "return confirm('" + ResourceManager.GetString(ConfirmKey).Replace("'", "\'") + "');")
      End If
      MyBase.Render(writer)
   End Sub


End Class