I want to create a custom control that encapsulates a Button & a
TextBox. When the Button is clicked, the user is asked a question using
JavaScript confirm (which shows 2 buttons - 'OK' & 'Cancel'). Till this
point, no problem. Initially, the TextBox is empty. The Button has a
property named 'ConfirmMessage ' so that the developer using this custom
control can modify the question in the confirm dialog.
If the user clicks 'OK', I want the text in the TextBox to change to
True. If the user clicks 'Cancel', the text in the TextBox should
change to False. This is where I am getting stuck. First of all, how do
I add a TextBox to the custom control & secondly, how do I change the
text in the TextBox depending upon whether the user has clicked 'OK' or
'Cancel' in the JavaScript confirm dialog.
I have come this far (this code exists in a VB class file):
Namespace Confirm
Public Class ShowConfirm : Inherits Button
Private strConfirmMsg As String
Public WriteOnly Property ConfirmMessage( ) As String
Set(ByVal value As String)
strConfirmMsg = value
End Set
End Property
Protected Overrides Sub AddAttributesTo Render(ByVal Output As
HtmlTextWriter)
MyBase.AddAttri butesToRender(O utput)
Output.AddAttri bute(HtmlTextWr iterAttribute.O nClick,
"ConfirmMsg ()")
End Sub
Protected Overrides Sub RenderContents( ByVal Output As
HtmlTextWriter)
Output.Write(vb CrLf)
Output.Write("< script language='JavaS cript'>")
Output.Write(vb CrLf)
Output.Write("f unction ConfirmMsg(){")
Output.Write(vb CrLf)
Output.Write(vb Tab)
Output.Write("v ar answer = confirm('")
If (strConfirmMsg <"") Then
Output.Write(st rConfirmMsg)
Else
Output.Write("A re You Sure You Want To Exit?")
End If
Output.Write("' )")
Output.Write(vb CrLf)
Output.Write("} ")
Output.Write(vb CrLf)
Output.Write("</script>")
End Sub
End Class
End Namespace
Can someone please tell me how do I add a TextBox in the above custom
control & change the text in the TextBox depending upon whether the
user has clicked 'OK' or 'Cancel' in the JavaScript confirm dialog?
