PdcDBQuery.Execute: Difference between revisions
Jump to navigation
Jump to search
No edit summary |
No edit summary |
||
Line 14: | Line 14: | ||
Sub sExecuteQuery | Sub sExecuteQuery | ||
dim objQuery | dim objQuery | ||
set objQuery = pdc.Database.OpenQuery(pdcConData) | set objQuery = pdc.Database.OpenQuery(pdcConData) | ||
Line 22: | Line 21: | ||
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 13:17, 30 May 2018
Declaration
Execute as Boolean
Description
Executes the SQL statement
Notes
This methos will execute the provided SQL statement. There is no difference between a SELECT-statement and other statements.
Code example
This code example executes a SQL statement.
Sub sExecuteQuery
dim objQuery
set objQuery = pdc.Database.OpenQuery(pdcConData)
objQuery.SQL = "SELECT * FROM LK_KLANT"
if objQuery.Execute then
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)