productrelationcontrol.ascx.vb

来自「C#语言制作asp.net网上商店的」· VB 代码 · 共 21 行

Partial Class Shop_Product_Controls_ProductRelationControl
    Inherits System.Web.UI.UserControl
    Public ProductID As Integer

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        If Not IsPostBack Then
            BindData(ProductID)
            If dlProduct.Items.Count = 0 Then Me.Visible = False
        End If
    End Sub


    Private Sub BindData(ByVal ProductID As Integer)
        dlProduct.DataSource = Product.ProductController.GetProductLinksList(ProductID)
        dlProduct.DataBind()
    End Sub


End Class