Popolare una tabella Access

Question

Ho una tabella Pippo con una campo DTREG. Poniamo che ci siano 2 record: 01/09/2017 e 04/09/2017

Ho bisogno di popolare un'altra tabella di nome Caio, che scriva nel campo GIORNO i giorni dal 01/09/2017 a oggi e successivamente dal 04/09/2017 a oggi. Praticamente 13 records. Come va scritta la routine?

Grazie, Francesco

Answer 1

Alla fine ho modificato il tuo codice così:

Dim RS1 As Recordset

Dim I As Long

Dim idiff As Long

Set RS1 = CurrentDb.OpenRecordset("SELECT INVESTIMENTO FROM LUCCIOLE")

While Not RS1.EOF

    idiff = VBA.Date - RS1(0)

For I = 0 To idiff

    CurrentDb.Execute "INSERT INTO PROGRESSIVO ( GIORNO ) values (" & CLng(RS1(0) + I) & ")", &H80

Next

    RS1.MoveNext

Wend

Il risultato è quello che volevo, ma non so se informaticamente è corretto. Secondo te ci sono delle cose da aggiungere? Mi restano ancora oscuri CLng e &H80.

Answer 2

7. Perché DBEngine(0)(0).Execute "insert into

e non 

CurrentDb.Execute "INSERT INTO...

Answer 3

6. e il DBEngine(0).CommitTrans 1, cosa fa?

...troppe spiegazioni, non trovi?

Answer 4

5. cos'è    &H80 

del comando 

DBEngine(0)(0).Execute "insert into tuaTabella(TuoCampoData) values (" & CLng(dtFRom + i) & ")", &H80

Answer 5

4. a cosa serve la variabile booleana