AGGIUNGERE VALORI IN TABELLA (QUERY UPDATE) TRAMITE VBA

vbasnippets

Poniamo di avere una tabella “rinnovo affiliazione” che vogliamo aggiornare tramite VBA aggiungendo un record. La tabella contiene due soli campi: id_cliente e data_rinnovo.

Ricordiamoci che, mentre id_cliente è un numero intero lungo (e può essere riportato in SQL così com’è, la data va trattata come un campo “testuale”  e dunque sono necessari i doppi apici (oppure semplicemente gli apici) per connotarlo come testo durante l’esecuzione della query.

Ricordiamo che i doppi apici corrispondono a chr$(34). Nell’esempio avremo valorizzato tramite VBA:

  • la variabile lngID (l’ID del cliente)
  • la data di oggi attraverso la funzione Date
strSQL = "INSERT INTO rinnovo_affiliazione ( id_cliente, data_rinnovo) VALUES (" & lngID & ", " & Chr$(34) & Date & Chr$(34) & ");"
DoCmd.RunSQL strSQL

No thoughts on “AGGIUNGERE VALORI IN TABELLA (QUERY UPDATE) TRAMITE VBA”