Dim cs As ClientScriptManager = Page.ClientScript
        Dim cstext As String
        Dim csname As String
        
        csname = "CallServer"
        If (Not cs.IsClientScriptBlockRegistered(Me.GetType(), csname)) Then
            cstext = "function CallServer(arg, context) { " & cs.GetCallbackEventReference(Me, "arg", "ReceiveServerData", "context") & "} ;"
            cs.RegisterClientScriptBlock(Me.GetType(), csname, cstext, True)
        End If
        
        csname = "LoadTreeView"
        If (Not cs.IsStartupScriptRegistered(Me.GetType(), csname)) Then
            cstext = "getChildNode_next('0','','1');"
            cs.RegisterStartupScript(Me.GetType(), csname, cstext, True)
        End If