Hello!
This is my code:
Private Sub GetMaxID As Long
Dim QCursor As Cursor
QCursor = SQLEngine.ExecQuery( "SELECT MAX( ID ) FROM DD_ITEMS" )
If QCursor.RowCount > 0 Then
ToastMessageShow( QCursor.ColumnCount, True )
Return QCursor.GetLong2(0) <---------
Else
Return 0
End If
End Sub
When it gets to the line with the arrow, an index out of bounds error is displayed, suggesting I asked for an index value of -1, which is obviously not true.
What am I missing?
Thank you!
A
This is my code:
Private Sub GetMaxID As Long
Dim QCursor As Cursor
QCursor = SQLEngine.ExecQuery( "SELECT MAX( ID ) FROM DD_ITEMS" )
If QCursor.RowCount > 0 Then
ToastMessageShow( QCursor.ColumnCount, True )
Return QCursor.GetLong2(0) <---------
Else
Return 0
End If
End Sub
When it gets to the line with the arrow, an index out of bounds error is displayed, suggesting I asked for an index value of -1, which is obviously not true.
What am I missing?
Thank you!
A