Блог

привет всем, я изо всех сил пытаюсь передать два параметра в обработчик событий, в основном, когда страница загружается, она динамически создает некоторую управляющую табличку, текстовое поле и кнопку ссылки, когда я нажимаю на кнопку ссылки, запускается обработчик событий, вот моя проблема, я хочу сначала передать идентификатор продукта и количество, идентификатор продукта извлекается из базы данных, передается через объект, где в качестве количества, которое вводит пользователь

в первой части кода выполняется циклическое подключение к базе данных и динамическое отображение всех записей на странице

 Function test()

    Dim objTemlDall As New Dallyarer
    arr = objTemlDall.getRecord()

    Dim lblname As Label
    Dim lblDes As Label
    Dim lblPrice As Label
    Dim linkItem As LinkButton


    Dim objTemProduct As Product
    For Each objTemProduct In arr

        lblname = New Label
        lblDes = New Label
        lblPrice = New Label
        linkItem = New LinkButton
        txtQuantity = New TextBox




        PrdName.Controls.Add(New LiteralControl("<br />"))
        lblname.Text = objTemProduct.Name
        PrdName.Controls.Add(lblname)
        PrdName.Controls.Add(New LiteralControl("<br />"))

        PrdDesc.Controls.Add(New LiteralControl("<br />"))
        lblDes.Text = objTemProduct.ShortDescription
        PrdDesc.Controls.Add(lblDes)
        PrdDesc.Controls.Add(New LiteralControl("<br />"))

        PrdPrice.Controls.Add(New LiteralControl("<br />"))
        lblPrice.Text = objTemProduct.UnitPrice
        PrdPrice.Controls.Add(lblPrice)
        PrdPrice.Controls.Add(New LiteralControl("<br />"))

        PrdQuantity.Controls.Add(New LiteralControl("<br />"))
        txtQuantity.ID = "qty"
        PrdQuantity.Controls.Add(txtQuantity)

        PrdQuantity.Controls.Add(New LiteralControl("<br />"))



        linkItem.Text = "Add to Cart"
        linkItem.ID = objTemProduct.ProductID
        linkItem.CommandArgument = objTemProduct.ProductID
        PrdAddToCart.Controls.Add(New LiteralControl("<br />"))
        PrdAddToCart.Controls.Add(linkItem)
        PrdAddToCart.Controls.Add(New LiteralControl("<br />"))

        AddHandler linkItem.Click, AddressOf GetSelectedProduct

    Next objTemProduct

End Function
  

вторая часть, когда запускается обработчик событий, я хочу передать данные txtQuantity в обработчик событий GetSelectedProduct, как я могу этого добиться, пожалуйста

 Function GetSelectedProduct(ByVal sender As Object, ByVal e As EventArgs)

    SelectedProduct = New Product
    Dim lbLink As LinkButton = CType(sender, LinkButton)
    SelectedProduct.ProductID = lbLink.CommandArgument



    Dim objTemlCart As New Dallyarer
    arr = objTemlCart.getRecord()

    Dim objT As Product

    For Each objT In arr
        If objT.ProductID = SelectedProduct.ProductID Then
            SelectedProduct.ProductID = objT.ProductID
            SelectedProduct.Name = objT.Name
            SelectedProduct.UnitPrice = objT.UnitPrice
        End If
    Next objT


    If Page.IsValid Then
        Dim CartItem As New CartItem
        CartItem.Product = SelectedProduct
        'CartItem.Quantity = CType(Me.txtQuantity.Text, Integer)
        Me.AddToCart(CartItem)
    End If


End Function
  

Спасибо

Попробуйте это:

 object.addEventListener(FlexEvent.MouseEvent, function
   (e:MouseEvent) : void {
doSomething(param1, param2);
});
  

Отправьте объект, у которого есть эти параметры, в качестве его свойств.