<head runat="server">

<title>Test Page</title>

<script>

function openWindow()

alert("openWindow Activated");

var oWnd = window.radopen("http://www.yahoo.ca", "RadWindow1");

</script>

</head>

<body>

<form id="form1" runat="server">

<div>

&nbsp;</div>

<asp:ScriptManager ID="ScriptManager1" runat="server">

</asp:ScriptManager>

<telerik:RadWindow ID="RadWindow1" runat="server">

</telerik:RadWindow>

<button onclick="openWindow();return false;" class="Button" style="WIDTH:190px">

</button>

</form>

</body>

</html>


Kyle

Can you invoke radalert or radconfirm or radprompt from code behind?

I am experimenting on the radpanel bar to be my menu items. I have the following code. When user choose delete, I would like to show radconfim and when user chooses to enter, I would like to show radprompt.  Can this be done with Radconfirm and Radprompt? If not please suggest if there is any way to achieve this?

Protected Sub RadPanelBar1_ItemClick(ByVal sender As Object, ByVal e As Telerik.Web.UI.RadPanelBarEventArgs) Handles RadPanelBar1.ItemClick
        If e.Item.Items.Count > 0 Then
            If e.Item.Text <> "Print" Then
                "You clicked on top level item. Click on the child item."
            End If
            If e.Item.Text <> "Issuance" Then
                "You clicked on top level item. Click on the child item."
            End If
        Else
            If e.Item.Value = "VIEW" Then
  
            ElseIf e.Item.Value = "UPDATE" Then

            ElseIf e.Item.Value = "SAVE" Then

            ElseIf e.Item.Value = "DELETE" Then

            ElseIf e.Item.Value = "ENTER" Then

         
            End If
        End If
    End Sub

Thank in advance.

Sub LivelinkTreeView(ByVal treeview As RadTreeView)

Dim rootNode As New RadTreeNode()

rootNode.Text = hdnFundName.Value

rootNode.Value = hdnFundObjectID.Value

rootNode.ImageUrl = "~\App_Themes\Image\main.png"

rootNode.Width = "25"

rootNode.Height = "25"

rootNode.Expanded = True

rootNode.ExpandMode = TreeNodeExpandMode.ServerSideCallBack

treeview.Nodes.Add(rootNode)

End Sub 

Private Function CreateRadDock(ByVal c As Control, ByVal dockName As String, ByVal iCount As Integer) As RadDock 

Dim docksCount As Integer = CurrentDockStates.Count 

Dim dock As New RadDock()

dock.ID =

String.Format("RadDock" & iDockCount, iDockCount)

dock.Title =

String.Format(dockName)

dock.Font.Bold =

True

dock.UniqueName = Guid.NewGuid().ToString()

dock.Width = Unit.Percentage(100)

dock.Skin =

"Web20"

dock.OnClientInitialize = "OnClientInitialize"

dock.Attributes.Add("Style", "margin-top:10px;margin-left:10px")

dock.DefaultCommands = Telerik.Web.UI.Dock.DefaultCommands.ExpandCollapse

dock.EnableDrag =

False

dock.EnableRoundedCorners = True

dock.EnableAnimation = True

dock.ContentContainer.Controls.Add(c) 

Return dock

End Function

Private Sub CreateDockDocumentInformation() 

LivelinkTreeView(rtvLivelink)

Dim dock As RadDock = CreateRadDock(Treeview1, "Document Information", icnt)

RadDockZone1.Controls.Add(dock)

iDockCount += 1

CreateSaveStateTrigger(dock)

LoadWidget(dock)

End Sub

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

If Not IsPostBack Then

   CreateDockDocumentInformation()

End If

End Sub

Private Sub LoadWidget(ByVal dock As RadDock) 

If String.IsNullOrEmpty(dock.Tag) Then

Return

End If

Dim widget As Control = LoadControl(dock.Tag)

dock.ContentContainer.Controls.Add(widget)

End Sub

Private Sub CreateSaveStateTrigger(ByVal dock As RadDock)

dock.AutoPostBack = True

dock.CommandsAutoPostBack = True

Dim saveStateTrigger As New AsyncPostBackTrigger()

saveStateTrigger.ControlID = dock.ID

saveStateTrigger.EventName =

"DockPositionChanged"

UpdatePanel1.Triggers.Add(saveStateTrigger)

saveStateTrigger =

New AsyncPostBackTrigger()

saveStateTrigger.ControlID = dock.ID

saveStateTrigger.EventName =

"Command"

UpdatePanel1.Triggers.Add(saveStateTrigger)

End Sub