[Access] memorizzare in una var il risultato di DoCmd.RunSQL

[Mackey]

Ciao a tutti.

Io non programmo in VisualBasic, quindi consideratemi un neofita.
Sto realizzando una maschera con Access che utilizza ((credo)) codice VB.

In particolare sto usando il metodo DoCmd.RunSQL

quello che devo fare è questo:
RICAVARE IL PROSSIMO id DI UNA TABELLA

allora uso la funzione DoCmd.RunSQL
con questa sintassi

DoCmd.RunSQL "SELECT max(id)+1 AS nextid FROM loc_users_utenti WHERE id<50000;"

poi devo mettere nextid dentro una variabile... ma come posso fare?

grazie

[mardok30]

Con:
"SELECT max(codice) AS var FROM Tabella"
riesco ad ottenere il risultato della Query nella variabile var, dovrebbe essere la stessa cosa per te con nextid, nel senso che dovresti trovare il risultato della query nella variabile nextid. Fammi sapere, ciao

[Mackey]

questo non lo sapevo... ti ringrazio innanzitutto della risposta

comunque ho fatto delle prove e a quanto pare non mi fa usare la SELECT per quel metodo... posso usare INSERT, UPDATE, DELETE... ma la SELECT no.

il codice è questo

DoCmd.RunSQL ("SELECT max(id)+1 AS provanextid FROM loc_users_utenti WHERE id<50000")

e mi da questo errore

Errore di run-time '2342':

Un'azione EseguiSQL richiede un argomento costituito da un'istruzione SQL.

e mi chiede se voglio fare il DEBUG


come posso fare?
grazie ancora

[mardok30]

Sto realizzando una maschera con Access che utilizza ((credo)) codice VB.

Si utilizza(credo ) codice VBA(Visual Basic for Application).

comunque ho fatto delle prove e a quanto pare non mi fa usare la SELECT per quel metodo... posso usare INSERT, UPDATE, DELETE... ma la SELECT no.

Da quanto ho potuto capire qui:
http://www.fontstuff.com/access/acctut16.htm
mi pare sia vero quello che dici.

non so indicarti metodi alternativi

[ms74]

Scusate non so' se il problema è stato risolto,
comunque per fare la select non bisogna utilizzare il metodo RunSQL dell'oggetto DoCmd ma bisogna sfruttare la libreria degli oggetti DAO per utilizzare il metodo CurrentDb dell' oggetto Recordset.

Spero di essere stato chiaro.

Buonlavoro

Ms74