Como usar variável iniciada em consulta SQL?
-
26-12-2019 - |
Pergunta
Fiz uma consulta para obter o valor máximo de uma determinada coluna
sSQLmax = "SELECT MAX([tablename]!rowname) as MaxNum FROM [tablename]"
Eu quero usar o valor MaxNum.Eu tentei em um Msgbox e me deu um valor em branco.Eu tentei tudo isso:
MsgBox "MaxNum" & MaxNum
MsgBox "MaxNum" & sSQLMAX.MaxNum
MsgBox "MaxNum" & sSQLMAX!MaxNum
Mais do código
Dim db As DAO.Database, rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset(sSQLmax)
mas nada funciona, tenho certeza que é simples, mas me escapa
Solução
Com o seu código você está apenas definindo uma variável para uma string.Na verdade, você não está fazendo nada com isso.Provavelmente é mais do que você está procurando:
Dim db As DAO.Database, rst As DAO.Recordset, sSQLmax As String
sSQLmax = "SELECT MAX([tablename].rowname) as MaxNum FROM [tablename]"
Set db = CurrentDb
Set rst = db.OpenRecordset(sSQLmax, dbOpenDynaset)
If (rst.RecordCount <> 0) Then
rst.MoveFirst
MsgBox "MaxNumber: " & rst.Fields("rowname")
End If
Outras dicas
Experimente a função DMax
Dim result as String
result = DMax("[COLUMN NAME]", "[TABLE NAME]")
Licenciado em: CC-BY-SA com atribuição
Não afiliado a StackOverflow