Vb.net 2008 с базой данных SQL Server 2005

Question

Мне нужна серьезная помощь в системе vb.net. Я разрабатываю систему заказа на рабочем столе, мой поток процесса идет как Customer ---> Order -------> Invoice ------> Payment, NB * все это происходит через сотрудника, сотрудника делает заказ от имени клиента.

Так что я хочу, чтобы во всем потоке процесса, как только вы закончили добавлять данные о клиенте, он отправляется в ORDER, поэтому я хочу, чтобы он имел тот же CustomerID для клиента, с которым я занят.

Может кто-нибудь, пожалуйста, помогите мне с кодом запуска?

Answer 1

Предполагая Customer, Order, Invoice и Payment классы:

Ord = New Order(Cust.CustomerID) 

В основном только сдавшим в настоящее время Cust идентификатора конструктора заказа, когда вы создаете его. Если вам нужно создать «пустые» заказы, перегрузить конструктор:

Class Order 
    Public Sub New() 
     ... 
    End Sub 

    Public Sub New (Cust As Long) 
     ... 
    End Sub 

Если это не представляется возможным по какой-то странной причине, сделать возможной загрузку клиента с помощью метода:

Ord = New Order() 
Ord.LoadCust(Cust.CustomerID) 

- ------------ Редакция для процедурной версии -----------------------

PUBLIC ThisCustID As String ' (?) THIS is a global variable if declared 
           ' outside a SUB like in a module 

.... клиент делает вещи

ThisCustID = ID_OF_NEW_CUST  ' what was just saved in db 

далеко в модуле заказа:

Public Sub MakeNewOrder() 
    ' has access to ThisCustID, but should not change it 
End Sub 

или:

Public Sub MakeNewOrder(CustID) 
    ' pass the current customer and avoid a global variable. 

полоскание и повторить для ThisOrderID перейти к Invoice