Dim EmailObj As New EmailUtil(OrderDs, .Item(CustomerDb.FIELD_EMAIL), .Item(CustomerDb.FIELD_FIRST_NAME) + " " + .Item(CustomerDb.FIELD_LAST_NAME))

                Dim asyncOpIsDone As New AutoResetEvent(False)

                ThreadPool.QueueUserWorkItem(New WaitCallback(AddressOf EmailObj.SendCompletedOrderConfirmation), asyncOpIsDone)