Re: UPDATE query in Access 2003 raising error
- From: "Douglas J. Steele" <NOSPAM_djsteele@xxxxxxxxxxxxxxxxx>
- Date: Tue, 14 Aug 2007 09:21:09 -0400
How are you executing the query? It almost sounds as though you're trying to
open a recordset using it, as opposed to simply using the Execute method
(although you do say "When I execute the qrydef")
What's the recordset rec for, and why are you opening it before you run the
query?
--
Doug Steele, Microsoft Access MVP
http://I.Am/DougSteele
(no e-mails, please!)
"Michael T" <michaelj@xxxxxxxxxxxxx> wrote in message
news:DuednTBhWP95N1zbnZ2dnUVZ8ternZ2d@xxxxxxxxxxxx
Hello...
I am trying to update a record using input from a form in Access 2003.
When I execute the qrydef I get the message:
"Error number 3066 Query must have at least one destination field."
The SQL string that is Debug.PrintED in code below is:
UPDATE tblDesign SET tblDesign.DesignMonarchSide = 'L',
tblDesign.DesignMonarchFacing = 'L' WHERE tblDesign.DesignName = '2VEENS
JVBIEEE' ;
This looks perfectly correct and when copied into the QBF as SQL and then
go into the design side to execute it, it works perfectly but I cannot get
it to work in VBA. I have tried both double (") and single (') quotes.
Am I missing something obvious?
============================================================
Extract from code below:
strDMS = Mid(Me.DMS0101, 1, 1)
strDMF = Mid(Me.DMS0101, 2, 1)
strSQL = "UPDATE tblDesign " & _
"SET tblDesign.DesignMonarchSide = '" & strDMS & "', " & _
"tblDesign.DesignMonarchFacing = '" & strDMF & "' " & _
"WHERE tblDesign.DesignName = '" & Me.DesignName & "' ;"
Set db = CurrentDb()
Set rec = db.OpenRecordset("tblDesign")
Set qdfTemp = db.CreateQueryDef("", strSQLx)
===============================================================
I then execute the query.
.
- Follow-Ups:
- Re: UPDATE query in Access 2003 raising error
- From: Michael T
- Re: UPDATE query in Access 2003 raising error
- From: Michael T
- Re: UPDATE query in Access 2003 raising error
- References:
- UPDATE query in Access 2003 raising error
- From: Michael T
- UPDATE query in Access 2003 raising error
- Prev by Date: UPDATE query in Access 2003 raising error
- Next by Date: RE: How to code/perform a search
- Previous by thread: UPDATE query in Access 2003 raising error
- Next by thread: Re: UPDATE query in Access 2003 raising error
- Index(es):
Relevant Pages
|