문제

특정 열의 최대 값을 얻으려면 쿼리를 만들었습니다

sSQLmax = "SELECT MAX([tablename]!rowname) as MaxNum FROM [tablename]"
.

MaxNum 값을 사용하고 싶습니다.나는 Msgbox에서 그것을 시도하고 나에게 빈 가치를 주었다.나는 이것들을 모두 시도했다.

MsgBox "MaxNum" & MaxNum

MsgBox "MaxNum" & sSQLMAX.MaxNum

MsgBox "MaxNum" & sSQLMAX!MaxNum
.

코드의 추가

Dim db As DAO.Database, rst As DAO.Recordset
Set db = CurrentDb
Set rst = db.OpenRecordset(sSQLmax)
.

그러나 아무도 일하지 않고, 나는 그것의 단순한 확실하지만 그것은 나를 탈출한다

도움이 되었습니까?

해결책

코드를 사용하여 문자열에 변수를 설정합니다.당신은 실제로 그것으로 아무 것도하지 않습니다.이것은 아마 당신이 찾고있는 것의 더 많은 것입니다 :

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
.

다른 팁

Dmax 함수를 사용해보십시오

Dim result as String
result = DMax("[COLUMN NAME]", "[TABLE NAME]")
.

라이센스 : CC-BY-SA ~와 함께 속성
제휴하지 않습니다 StackOverflow
scroll top