Visual Basic Append table from Subform
Posted on 2009-06-28
Hello everyone, I am trying to copy and append 3 fields as a new record in the same table from a subform of a subform based on the record the user is on.
Private Sub plow_Click()
Dim SQL As String
SQL = "INSERT INTO [c resources] ( taskid, resacc, resunit )"
SQL = SQL & "SELECT [c resources].taskid, [c resources].resacc, [c resources].resunit FROM [c resources]"
SQL = SQL & "WHERE [c resources].resourceid = [forms]![a schedule Query Form Resources and Measures]![sfTasks]![sfResources]![resourceid];"