VB 6.0 Max e Dao

[meronet]

Ciao a tutti speriamo che
qualcuno possa aiutarmi
scrivo questo codice
e mi dà errore 3265
elemento non trovato in questo insieme

Dim alto
Set miodb = OpenDatabase("database.mdb")
Set miorst = miodb.OpenRecordset("SELECT MAX( numeroprogressivo ) from tabella ", dbOpenDynaset)
miorst.MoveLast
alto = miorst!numeroprogressivo 'si pianta qui
MsgBox (alto)
miorst.Close ' fine codice per database
miodb.Close


Ciao a tutti
grazie

[XVincentX]

Ti consiglio di postare il codice originale, vedo che hai saltato qualche cosa tra cui
dim alto (manca "as integer, string o quello che vuoi)
select form tabella, invece deve essere
select * from tabella
Ciao!

[meronet]

Dim alto as integer
Set miodb = OpenDatabase("database.mdb")
Set miorst = miodb.OpenRecordset("SELECT MAX( numeroprogressivo ) from tabella ", dbOpenDynaset)
miorst.MoveLast
alto = miorst!numeroprogressivo 'si pianta qui
MsgBox (alto)
miorst.Close ' fine codice per database
miodb.Close



A mè occore sapere il valore più alto del campo numeroprogressivo
se scrivo " select * from tabella " non avrò questo valore !!!
Grazie per la pronta risposta ....

[maxmalici]

inanzitutto potresti fare un
select * from tabella
order by numeroprogressivo desc

cosi' ti estrai tutti i numeroprogressivo in ordine descrescente.
e basta prenderti il primo.......

poi non capisco perche' fai un MOVELAST
e dopo non fai un MOVEFIRST

terzo.....sei sicuro che il tuo recordset ritorni qualcosa??????

ciao MAX

[xegallo]

Originariamente inviato da meronet
Ciao a tutti speriamo che
qualcuno possa aiutarmi
scrivo questo codice
e mi dà errore 3265
elemento non trovato in questo insieme

Dim alto
Set miodb = OpenDatabase("database.mdb")
Set miorst = miodb.OpenRecordset("SELECT MAX( numeroprogressivo ) from tabella ", dbOpenDynaset)
miorst.MoveLast
alto = miorst!numeroprogressivo 'si pianta qui
MsgBox (alto)
miorst.Close ' fine codice per database
miodb.Close


Ciao a tutti
grazie

ovviamente ti restituisce quell'errore il tuo recordset non ha nessun campo con quel nome

se vuoi che il risultato della funzione max abbia un nome gli devi fornire un alias

SELECT MAX( numeroprogressivo )as NumeroProgressivo 
  from tabella

oppure nel recordset devi accedere per indice del campo

miorst(0).value

p.s.: quando scrivi del codice usa il tag Code leggi il regolamento

[meronet]

grazie a tutti e scusate per il code mancato