1

データベースに大幅な変更を加えて、ウェブサイトをゼロから再構築しています。次の関数は、古い Web サイト プロジェクトでは完全に正常に機能しましたが、コードを新しいプロジェクトにコピーしたので、VS2012 は、注文が宣言されておらず、注文が宣言されていない可能性があると言って、顧客の For Each 注文の「注文」が好きではありません。保護レベルによりアクセス可能

Public Shared Function GetOrderDisplaybyCustomerId(ByVal customerId As Integer) As List(Of OrderDisplay)
    Dim list As New List(Of OrderDisplay)
    Dim item As New OrderDisplay
    Using ctx As New webEntities
        Dim custorders = (From o In ctx.salesorders
                         Where o.order_divisionId = customerId
                         Join s In ctx.addresses On o.order_shippingAddressId Equals s.addressId
                         Join st In ctx.states On s.address_stateProvinceId Equals st.stateId
                         Order By o.OrderDate Ascending
                         Select New With {o.OrderDate, o.InvoiceNumber, o.CustomerPONumber, o.AccountNumber, s.StreetAddress, s.City, st.AbbreviatedName}).ToList()
        If custorders.Count > 0 Then
            For Each order In custorders
                item._orderdate = order.OrderDate.ToShortDateString()
                item._invoicenumber = order.InvoiceNumber
                item._customerPOnumber = order.CustomerPONumber
                item._acctnumber = order.AccountNumber
                item.Address = order.StreetAddress
                item.City = order.City
                item.State = order.AbbreviatedName
                list.Add(item)
            Next
            Return list
        Else
            Return Nothing
        End If
    End Using
End Function

他の関数でもこれとまったく同じ動作が発生しています。提案をいただければ幸いです。

4

1 に答える 1