Recuperare codice di vendita

[Enrique_Rojas]

Ciao a tutti.

Ho un dbase access con due tabelle:

- la prima tabella è l'anagrafica di una serie di articoli disponibili alla vendita;

- la seconda tabella è invece lo storico delle vendite, nella quale vengono memorizzati una serie di dati provenienti dalla prima tabella, quando un articolo viene venduto.

Tramite un form che richiama una query visualizzo a video i dati di quel determinato articolo che ho venduto e che estraggo dalla seconda tabella per la statistica riguardante l'articolo stesso (quante volte è stato venduto, prezzo sconto, etc).

Tra questi dati però manca un dato fondamentale che è il CODICE_DI_VENDITA.

Il CODICE_DI_VENDITA è memorizzato nella prima tabella per tutti i records.

A suo tempo (non so perchè... non me occupavo direttamente) non fu previsto che venisse scritto anche sulla seconda tabella, come per gli altri dati di quell'articolo venduto, provenienti dalla prima tabella.

Adesso mi chiedono di visualizzare nell'estrazione dello storico articolo anche questo CODICE_DI_VENDITA che, quindi, dovrei recuperare con lo stesso script dalla prima tabella dov'è memorizzato e stamparlo a video insieme agli altri dati che, invece,sono estratti dalla seconda tabella.

Il problema riguarda gli articoli vecchi già venduti (circa 4.000 records), perchè già nella nuova veste dello script il dato del campo CODICE_DI_VENDITA, quando si vende un articolo, viene passato automaticamente alla seconda tabella insieme a tutti gli altri dati riguardanti quel determinato articolo.

Non ditemi, per favore, che devo compilare 4.000 records inserendo manualmente il CODICE_DI_VENDITA.

Grazie

[rixx]

ehm se non hai un campo nella seconda tabella che ti relazioni alla prima non credo che tu possa farci nulla, però se la prima tabella contiene ad esempio i nomi di tutti i prodotti (cioè non solo quello disponibili, che vengono resi magari indisponibili da un campo a se)
puoi controllare il nome del prodotto nella seconda tramite la prima e scrivere in un nuovo campo nella seconda il corrispondente codice prodotto della prima...
Mi sono spiegato?

RIxx

[Enrique_Rojas]

Grazie per rispondere, questi i campi delle due tabelle:

-prima tabella (anagrafica):
ID = contatore chiave primaria
IDLinea = numerico
nome_articolo = testo
prezzo = valuta
codice_di_vendita = numerico


-seconda tabella (storico):
IDART = numerico
IDLinea = numerico
nome_articolo = testo
prezzo = valuta

:master:

[rixx]

mm percui quando un articolo viene venduto viene cancellato dalla prima tabella giusto?

RIxx

[Enrique_Rojas]

Originariamente inviato da rixx
mm percui quando un articolo viene venduto viene cancellato dalla prima tabella giusto?

RIxx

Cancellato??? NO!!! e perchè? a che scopo?
viene solo scalata l'unità venduta dal magazzino...

[rixx]

percui al massimo risulta 0 ok pensavo che se ce ne fossero 0 venisse cancellata.. allora puoi fare quello che chiedi

i campi che ti servono sono:
nome_articolo = testo
-seconda tabella (storico):
nome_articolo = testp

idart è il corrispondente a id della prima tabella giusto?

devi solo creare una pagina e caricarla una volta, con un codice del tipo:

 
   strSQL="SELECT * FROM tua tabella1"
   Set wowRS = Conn.Execute(strSQL)

do while not wowRS.eof
id=wowrs("nome_articolo")
   str="UPDATE tua tabella2 SET idart = " & intValore0 & " WHERE nome_articolo='"&id&"'"
   Conn.Execute(str)
loop

ps:consiglio di farlo su una copia del db

[Enrique_Rojas]

Grazie, am restituisce errore sulla query di update... poi perchè update... devo estrarre solo il CODICE_DI_VENDITA dalla prima tabella... insieme ai dati estratti dalla seconda tabella

Dim ConnDown, strSQL, Rs, SQL
 
Set ConnDown = Server.CreateObject("ADODB.Connection") 
ConnDown.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath(path&"anagrafica.mdb") 

Set Rs = server.CreateObject("ADODB.Recordset")

strSQL = "SELECT * FROM anagrafica"
   Set RS = ConnDown.Execute(strSQL)

do while not RS.eof
id = Rs("nome_articolo")

   SQL = "UPDATE storico SET IDART = " & intValore0 & " WHERE nome_articolo = '"& id &"' "
   ConnDown.Execute(SQL)
loop

Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] Syntax error in UPDATE statement.

[rixx]

io avevo capito che tu volevi portare copiare il codice di vendita nella tabella due non estrarlo ogni volta dalla tabella 1!

Rixx

[Roby_72]

Mostra la query che usi attualmente per estrarre i dati della seconda tabella.

Roby

[Enrique_Rojas]

Originariamente inviato da Roby_72
Mostra la query che usi attualmente per estrarre i dati della seconda tabella.

Roby

Ciao Roby, ecco:

SQL = "SELECT * FROM storico WHERE nome_articolo = '"& nome_articolo &"' ORDER BY IDART ASC"