Valeur MAX dans la colonne BDD
Bonjour à tous, j'ai un petit soucis pour récupérer la valeur max d'une colonne dans une base de donnée. Je bug et ne trouve pas la solution, malgré l'aide microsoft et gooooooogooooole :oops::oops:
le code :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
| Public Sub Recup_dernier_comune(ByRef SerieC)
Dim conna As New ADODB.Connection
Dim sqla1 As New ADODB.Command
Dim orsa1 As New ADODB.Recordset
conna.Provider = "Microsoft.Jet.OLEDB.4.0"
conna.ConnectionString = LienBDD_carte
conna.Open()
sqla1.ActiveConnection = conna
sqla1.CommandText = "SELECT MAX(Num_serie) FROM Info_general"
orsa1.Open(sqla1)
SerieC = orsa1("Num_serie").Value
orsa1.Close()
orsa1 = Nothing
sqla1 = Nothing
conna.Close()
conna = Nothing
End Sub |
l’erreur se produit sur la ligne :
Code:
SerieC = orsa1("Num_serie").Value
ça me remonte :
Citation:
Impossible de trouver l'objet dans la collection correspondant au nom ou à la référence ordinale demandé.
Si quelqu'un aurais la solution, je vous en remercie.
