About qdf.execute

  • Thread starter Thread starter zixingw
  • Start date Start date
Z

zixingw

What's wrong with qdf.Execute

If I use qdf.Execute, an error message comes out, but if I do not use qdf.
Execute, the following codes work OK

Set qdf = db.QueryDefs("qryCreateProd")
strSQL = "INSERT INTO tblProdBatch ( ProdVS, ProdGroup, KitNo, KitName,
ProdBatch, ProdCmpName )" & _
" SELECT sysProdDocDept.ProdVS, sysProdDocDept.ProdGroup,
sysProdDocDept.KitPrefix," & _
" sysProdDocDept.KitName,'" & BatchNum & "' AS ProdBatch,
sysProdDocDept.ProdCmpName" & _
" FROM sysProdDocDept" & _
" GROUP BY sysProdDocDept.ProdVS, sysProdDocDept.ProdGroup,
sysProdDocDept.KitPrefix," & _
" sysProdDocDept.KitName,'" & BatchNum & "', sysProdDocDept.
ProdCmpName," & _
" sysProdDocDept.ProdCmpPrefix" & _
" HAVING sysProdDocDept.ProdCmpPrefix ='" & combPrefix.Value & "';"

qdf.SQL = strSQL
'qdf.Execute
 
Why bother with the QueryDef?

You can execute the string you created directly:
dbEngine(0)(0).Execute strSql, dbFailOnError

If that also fails, read the error message to find out what went wrong.
Use:
Debug.Print strSql
Then open the Immediate Window (Ctrl+G) to see what's wrong with your SQL
string.
 
Back
Top