My Insert Into Statement is producing a "Syntax Error in INSERT INTO Statement"
Posted on 2011-04-20
My code seems to be producing a Run Time Error 3134.
The code is trying to get a 'WebsiteID' from the tblWebsite, to insert the current website ID being currently worked on, into a table tblASGeneralWebsiteReg.
Here's the code I have:
Dim strInsert1 As String
strInsert1 = "Insert into tblASGeneralWebsiteReg ([WebsiteID])" & vbCrLf
strInsert = strInsert & "select tblWebsite.WebsiteID as WebsiteID" & vbCrLf
strInsert = strInsert & "from tblWebsite" & vbCrLf
strInsert = strInsert & "where tblWebsite.WebsiteID = " & Me!WebsiteID
Any ideas please? Oh, I have a similar strInsert statement before this with almost exactly the same thing that works. That inserts the WebsiteID and another field into another table. I've turned that off for the moment to try getting this statement above to work.