Lettura e calcolo MAX da database access

lunedì 07 settembre 2009 - 08.53

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

frenk17 Profilo | Junior Member

80 messaggi | Data Invio: lun 7 set 2009 - 08:53

Ciao a tutti..
avrei una domanda che probabilmente per la quasi totalità di voi sarà banale ma non riesco proprio a capire dove commetto l'errore.
Ho la necessità di calcolare il massimo della colonna "numritiro" di un database access..

chiamata funzione:
Dim dt As DataTable = LeggiDB("select max (numritiro) from ritiri")

funzione:
Public Function LeggiDB(ByVal sql As String) As DataTable
PercorsoDB = DBWrite.Txt_PercorsoDB.Text
Dim connStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & PercorsoDB & ";"
Dim dt As New DataTable
Dim conn As New OleDbConnection(connStr)

Try
conn.Open()
Dim adapter As New OleDbDataAdapter(sql, conn)

adapter.Fill(dt)

conn.Close()

Catch ex As Exception

End Try

Return dt
End Function

Spero possiate darmi una mano..
grazie in anticipo del supporto

alx_81 Profilo | Guru

8.814 messaggi | Data Invio: lun 7 set 2009 - 10:41

>Ciao a tutti..
Ciao

Ma che errore ottieni?
Sinceramente per un solo valore, ti consiglio di usare il metodo ExecuteScalar:
http://msdn.microsoft.com/it-it/library/system.data.oledb.oledbcommand.executescalar.aspx

--

Alessandro Alpi | SQL Server MVP

http://www.alessandroalpi.net
http://blogs.dotnethell.it/suxstellino
http://mvp.support.microsoft.com/profile/Alessandro.Alpi
http://italy.mvps.org

frenk17 Profilo | Junior Member

80 messaggi | Data Invio: lun 7 set 2009 - 10:52

ma a dire il vero non ottengo un errore però selezionando la variabile "dt" e cliccando sul visualizza(lente d' ingrandimento) ottengo il valore corretto.. tuttavia non riesco a estrarlo da "dt" e quindi utilizzarlo...
mi rendo conto di non essere stato molto chiaro... allego un immagine che spero possa aiutarti a capire il mio problema..

718x401 34Kb

alx_81 Profilo | Guru

8.814 messaggi | Data Invio: lun 7 set 2009 - 11:00

>mi rendo conto di non essere stato molto chiaro... allego un
>immagine che spero possa aiutarti a capire il mio problema..
ok, ho capito..
allora devi accedere alla riga 0 del dt e devi usare la select con un alias:

Dim sql as string = "SELECT MAX(campo) as Massimo FROM tabella"
Dim valore as int = dt.Rows(0)("Massimo")

--

Alessandro Alpi | SQL Server MVP

http://www.alessandroalpi.net
http://blogs.dotnethell.it/suxstellino
http://mvp.support.microsoft.com/profile/Alessandro.Alpi
http://italy.mvps.org

frenk17 Profilo | Junior Member

80 messaggi | Data Invio: lun 7 set 2009 - 11:53

ok perfetto funziona!
grazie per il supporto...
alla prossima...

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !