Questione : Un'annotazione alla data più tarda

Ho tblSales della tabella in questa Tabella I avere i campi e dati seguenti: la necessità 1111 del
AAAA John il B. 02/14/2010
AAAA 1111 Bill il J. 03/15/2010
BBBB 2222 Janet il L. 04/15/2010
BBBB 3333 Ken il M. 05/01/2010
BBBB 4444 Peter lo S. 05/01/2010
CCCC 4444 John il B. 02/16/2010
CCCC 5555 John il B. 02/16/2010
CCCC 5555 Ken il M. 01/20/2010

I di SoldDate dei commessi di categoria del

Product di estrarre appena un'annotazione per prodotto con ultimo date.


Result dovrebbe essere: i commessi SoldDate
AAAA di categoria del

Product Bill 1111 il J. 03/15/2010
BBBB 3333 Ken il M. 05/01/2010
CCCC 4444 John il B. 02/16/2010

To precisano: Per me non è importante se l'annotazione per il prodotto BBBB è 3333 Ken il M. 05/01/2010 o BBBB 4444 Jonh il B. 05/01/2010 poichè entrambi hanno lo stessi la data più tarda 05/01/2010
The stessi è con l'annotazione per il prodotto CCCC 4444 John il B. 02/16/2010 che esso potrebbe essere CCCC 5555 John il B. 02/16/2010 poichè entrambi hanno lo stessi bisogno venduto del
I della data 02/16/2010 appena selezionano la dichiarazione che tirerà questo risultato come sopra dai miei tlbSales della tabella nell'annotazione dell'assistente 2008.
One di SQL per prodotto che il più in ritardo ha venduto la data:
class= del

Risposta : Un'annotazione alla data più tarda

Allora costruire appena una tabella provvisoria che tiene TUTTI I nomi in un singolo campo, con un indirizzo:

Currentdb.Execute “selezionano l'indirizzo, csz in YourTempTable dall'indirizzo distinto prescelto, csz da YourExistingTable„

Ora aggiungere un campo di SendTo:

Currentdb.Execute “ALTERANO la TABELLA YourTempTable AGGIUNGONO il TESTO di SendTo della COLONNA (255)„

Ora sviluppare un recordset in cui potete collegare con tutti i nomi per un indirizzo specifico + un csz e concatenare i nomi:

Oscurare il rst come DAO.Recordset
Oscurare i rstNames come DAO.Recordset
Oscurare gli sNames come stringa

regolare il rst = Currentdb.OpenRecordset (“SELEZIONARE * A PARTIRE da YourTempTable„)

Fare fino a rst.EOF
  Regolare i rstNames = Currentdb.Openrecordset (“SELEZIONARE * A PARTIRE da YourExistingTable DOVE [indirizzo] = '„ & rst (“indirizzo„) &„ “E csz=„„ & rst (“csz„) &„ ') “
  sNames = ""
  Fare fino a rstNames.EOF
    sNames = sNames & vbCrLf & rstNames (“First_Name„) &„ “& rstNames (“Last_Name„)
    rstNames.movenext
  Ciclo
  rst. Pubblicare
  rst (“SendTo„) = sNames
  rst. Aggiornamento
Ciclo
Altre soluzioni  
 
programming4us programming4us