Paypal 如何将购物车项目添加到Transaction.item\u list\u.items

Paypal 如何将购物车项目添加到Transaction.item\u list\u.items,paypal,Paypal,我正在尝试使用.net REST API SDK将我的购物车项目传递给paypal 代码如下: Dim b As Integer = 0 Dim pCartItem As New PayPal.Api.Payments.Item Dim pCartItemList As New PayPal.Api.Payments.ItemList Do While b <= cart.Count - 1

我正在尝试使用.net REST API SDK将我的购物车项目传递给paypal

代码如下:

            Dim b As Integer = 0
            Dim pCartItem As New PayPal.Api.Payments.Item
            Dim pCartItemList As New PayPal.Api.Payments.ItemList
            Do While b <= cart.Count - 1

                pCartItem.name = cart(b).Name
                pCartItem.price = cart(b).Price
                pCartItem.quantity = cart(b).Quantity
                pCartItem.currency = "USD"
                pCartItem.sku = cart(b).Sku
                pCartItemList.items.Add(pCartItem) 'This line errors out
                pCartItem = New PayPal.Api.Payments.Item
                b += 1
            Loop
            orderTransaction.item_list = pCartItemList
Dim b作为整数=0
Dim pPartItem作为新的PayPal.Api.Payments.Item
Dim pCartItemList作为新的PayPal.Api.Payments.ItemList

我已经发现,对于可能遇到这种情况的任何其他人来说,这里的代码都是有效的

        Dim pCartItem As PayPal.Api.Payments.Item = New PayPal.Api.Payments.Item
            orderTransaction.item_list = New PayPal.Api.Payments.ItemList
            orderTransaction.item_list.items = New List(Of PayPal.Api.Payments.Item)

            Do While b <= cart.Count - 1

                pCartItem.name = cart(b).Name
                pCartItem.price = cart(b).Price
                pCartItem.quantity = cart(b).Quantity
                pCartItem.currency = "USD"
                pCartItem.sku = cart(b).Sku
                orderTransaction.item_list.items.Add(pCartItem)
                pCartItem = New PayPal.Api.Payments.Item
                b += 1
            Loop
Dim pCartItem As PayPal.Api.Payments.Item=新的PayPal.Api.Payments.Item
orderTransaction.item_list=新的PayPal.Api.Payments.ItemList
orderTransaction.item_list.items=新列表(PayPal.Api.Payments.item的)
做某事