TC: Created page with "== Declaration == SetParamBlobFromFile(ParameterName as string, FilePath as string) as boolean == Description == Changes the value of the parameter with the binary value of a ..."

2021-01-19T09:23:14Z

Created page with "== Declaration == SetParamBlobFromFile(ParameterName as string, FilePath as string) as boolean == Description == Changes the value of the parameter with the binary value of a ..."

New page

== Declaration ==
SetParamBlobFromFile(ParameterName as string, FilePath as string) as boolean
== Description ==
Changes the value of the parameter with the binary value of a specific file at location 'Filepath'.

== Notes ==
Changes the value of the parameter with the binary value of a specific file at location 'Filepath'.
The result returns it was succesfull or not.

== Code example ==
This code example executes a SQL statement with parameters.

<source lang="vb">
Sub sExecuteQuery
dim objQuery

set objQuery = pdc.Database.OpenQuery(pdcConData)
objQuery.SQL = "SELECT do_ordnr
FROM do_calc
WHERE do_kstsrt=:ParamOne AND do_vink1=:ParamTwo AND
do_lever=:ParamThree AND do_datin=:ParamFour AND
do_prdcmb=:ParamFive AND do_fact=:ParamSix"

objQuery.SetParamStr "ParamOne", "8000"
objQuery.SetParamBool "ParamTwo", True
objQuery.SetParamDate "ParamThree", Date()
objQuery.SetParamDateTime "ParamFour", Now()
objQuery.SetParamInt "ParamFive", 1003456
objQuery.SetParamDbl "ParamSix", 678.56

if objQuery.Execute then
if not objQuery.Eof then
dim strCalcNo
strCalcNo = objQuery.GetField("do_ordnr")
msgbox strCalcNo

objQuery.SQL = "update do_calc
set do_image = :ImageFromFile
where do_ordnr=:CalcNo"

objQuery.SetParamStr "CalcNo", strCalcNo
objQuery.SetParamBlobFromFile "ImageFromFile", "c:\temp\filename.pdf"
if not objQuery.Execute then
msgbox "Error:" & vbCrLf & pdc.LastError & vbCrLf & vbCrLf & "SQL:" & vbCrLf & objQuery.SQL
end if
end if
else
msgbox "Error:" & vbCrLf & pdc.LastError & vbCrLf & vbCrLf & "SQL:" & vbCrLf & objQuery.SQL
end if
End Sub
</source>

== Availability ==
Available since May 2019 (from version 5.5)

PdcDBQuery.SetParamBlobFromFile - Revision history

TC: Created page with "== Declaration == SetParamBlobFromFile(ParameterName as string, FilePath as string) as boolean == Description == Changes the value of the parameter with the binary value of a ..."