web/Folder.aspx.vb

（完整代码） 612B 

Imports BLL
Imports Model
Imports System.Data
Imports System.Data.SqlClient
Partial Class Folder
    Inherits System.Web.UI.Page
    Dim strFOLDER_BLL As New FOLDER_BLL
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            strFOLDER_BLL.BindList(mytree)
        End If

        If mytree.SelectedNode Is Nothing Then Return
        If mytree.SelectedNode.Expanded Then
            mytree.SelectedNode.Collapse()
        Else
            mytree.SelectedNode.Expand()
        End If
    End Sub
End Class

24 小时内免费解锁 3 个项目，之后 1 积分/个。 规则说明

AI 解读

登录后可用，每次 10 积分，解读结果公开显示在下面。

还没有人解读过这个文件。