"Syntax error whit Record moving button, someone pls helpp!!!! asap, ty

[hamir007]

Hello, I just signed up for this forum while researching, and i come accross problem whit my code, i can't resolve it, so if someone see something i don't pls help.

Private Sub Command26_Click()

Dim strSQL As String

strSQL = "INSERT INTO [Prodata_djela] ([ID],[Ime djela],[Tehnika slikanja],[Godina_stvaranja],[Fotografija],[Umjetnik_id])"
strSQL = strSQL + " SELECT [Umjetnicko_djelo].[ID],[Umjetnicko_djelo].[Ime djela],[Umjetnicko_djelo].[Tehnika_slikanja],[Umjetnicko_djelo].[godina_stvaranja],[Umjetnicko_djelo].[Fotografija],[Umjetnicko_djelo].[Umjetnik_ID]"
strSQL = strSQL + " WHERE Prodata_djela.ID= ')" & Me.[ID] & ""


DoCmd.SetWarnings False
DoCmd.RunSQL (strSQL)
DoCmd.SetWarnings True

End Sub

[ranman256]

strSQL = strSQL + " WHERE Prodata_djela.ID= ')" & Me.[ID] & ""

loose that paren.
" WHERE Prodata_djela.ID= " & Me.[ID]

[hamir007]

strSQL = strSQL + " WHERE Prodata_djela.ID= ')" & Me.[ID] & ""

loose that paren.
" WHERE Prodata_djela.ID= " & Me.[ID]

i still hvve some problem, http://prntscr.com/3pcztq

[hamir007]

strSQL = strSQL + " WHERE Prodata_djela.ID= ')" & Me.[ID] & ""

loose that paren.
" WHERE Prodata_djela.ID= " & Me.[ID]

I trie so hard to understand theese orders and functions,i am great at c++, but not at this, this is my actual 1st time, so...
What thoes that 3rd line doo? Maybe ifyou can tell me that i can realise what the problem is...
here is screenshot

[ranman256]

Are IDs numeric or text....I gave you numeric.

[hamir007]

they are auto numbers, here is situation, i just have 2 tables, and when i sell item i want to

click on the button and to move my record to sold items table, and i wanted the item to still have same id.
i can upload u the bse if that can help.

[ranman256]

cant do that. The source table you copy from if the INDEX is autonum....then the INDEX in the target table must be NUMBER.
You cant copy autonumber to autonumber.

[hamir007]

Ahh yeah that's right, thanks wery much man, ur the best

[hamir007]

Man i still have syntax error that missing operator is killing me

[ranman256]

put the line : debug.print strSQL , in the code right before: setwarnings false
put a stop on the code here. (setwarnings)
ctrl-G (to the debugger)
copy the sql
paste into a new query, then click design
it might help you find the error.

[hamir007]

is there any way to avoid this id thing, and put id on auto number?

[ranman256]

The ID tells us what record to transfer. You dont need it to be stored as autonumber in the target table. The number wont change.

[hamir007]

I don't know what happend, but now when i click the button program ask me for the item ID and do nothing

[hamir007]

here:


after i type the one i have on my item it does nothing.

[hamir007]

i realised it shall make new record by it's onw but it doesn't...