Hello
I have below code
Here I am getting type mismatch error
I also tried
but it does not work, please advise.
I have below code
Code:
With adoCmd
adoStream.Type = adTypeBinary
adoStream.Open
adoStream.LoadFromFile strDir + file 'It fails if file is open
.CommandText = "INSERT INTO VendorFiles VALUES (?,?,?)" ' Query
.CommandType = adCmdText
'---adding parameters
adoCmd.Parameters.Append .CreateParameter("UniqueKey", adVarChar, adParamInput, Keyaudit)
Here I am getting type mismatch error
Code:
adoCmd.Parameters.Append .CreateParameter("UniqueKey", adVarChar, adParamInput, Keyaudit)
Code:
adoCmd.Parameters.Append .CreateParameter("UniqueKey", adVarChar, adParamInput, 0,Keyaudit)
but it does not work, please advise.