PdcDBQuery.NextRecord: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
No edit summary |
||
Line 22: | Line 22: | ||
objQuery.NextRecord | objQuery.NextRecord | ||
else | else | ||
msgbox "Error:" & vbCrLf & pdc.LastError & vbCrLf & vbCrLf & "SQL:" & vbCrLf & | msgbox "Error:" & vbCrLf & pdc.LastError & vbCrLf & vbCrLf & "SQL:" & vbCrLf & objQuery.SQL | ||
end if | end if | ||
End Sub | End Sub |
Latest revision as of 15:09, 29 December 2021
Declaration
NextRecord
Description
Moves the pointer to the next record
Notes
This method will move the record pointer to the next record in the created query.
Code example
This code example executes a SQL statement and moves the pointer to the next record.
Sub sExecuteQuery
dim objQuery
dim intCnt
set objQuery = pdc.Database.OpenQuery(pdcConData)
objQuery.SQL = "SELECT * FROM LK_KLANT"
if objQuery.Execute then
objQuery.NextRecord
else
msgbox "Error:" & vbCrLf & pdc.LastError & vbCrLf & vbCrLf & "SQL:" & vbCrLf & objQuery.SQL
end if
End Sub
Availability
Available since September 2008 (from version 3.8)