VB6 seleziona valore

[gyonny]

helo raga
In una variabile devo caricare il valore più alto di una colonna mdb.
il valore è in numero intero.

Nella seconda variabile devo caricare il valore più alto estrapolando i primi numeri da una stringa.
esempio: 125drt21 la variabile dovrebbe memorizzare 125

la connessione viene aperta tramite adodc1.

come si fà

ciao a tutti
gyo

[xegallo]

carichi tutte le stringhe in un array
e poi le cicli estrapolando la parte numerica

[gyonny]

xe
ora vado a studiarmi cosè un array.
nel frattempo non potreti tradurre in un linguaggio più semplice magari con un esempio?

helo
gyonny

[ddies]

Beh quando vai a fare la select nel db fai una:

set record=db.execute("SELECT MAX(NomeCOlonna) FROM NomeTabella")

e per l'altro o fai una:

 select nomecolonna from tabella

e poi:

dim Max as integer, Ind as integer
Max=0
ind=0
while not record.eof
  if val(mid(record(ind),1,3))>Max Then
    Max=val(mid(record(ind),1,3))
  end if 
  ind=ind+1
  record.MoveNext
wend

Oppure se il db è access:

SELECT MAX(VAL(MID(NOmeCampo,1,3))) FROM NomeTabella