Hi guys this is my problem
name form = test
___________________________
i have a form and i would like to copy the single record into the new table
this is my code
Code:
Private Sub cmdAddRecords_Click()
On Error GoTo errHandler
Dim strSQL As String
strSQL = "INSERT INTO tblNewTable (RecordID, Field1) " _
& " SELECT RecordID, Field1 FROM tblOldTable" _
& "WHERE tblOldTable.RecordID = [Maschere]![test]![RecordID]"
db.Execute strSQL, dbFailOnError
Me.frmNewAttachment.Requery
errExit:
Exit Sub
errHandler:
MsgBox Err.Number & ": " & Err.Description
Resume errExit
End Sub