Forms :: Place Values Of A Concatenated Combobox In Respective Fields

I have a form in which I have a combobox. The code in the row source is:

Code:
SELECT [tblBooks].AuthorFirst & " " & [tblBooks].AuthorLast AS Expr1 FROM tblBooks GROUP BY tblBooks.AuthorLast, tblBooks.AuthorFirst HAVING (((tblBooks.AuthorFirst & " " & tblBooks.AuthorLast)<>"") And ((Count(*))>1)) ORDER BY tblBooks.AuthorLast, tblBooks.AuthorFirst;

This is an unbound box.

The rest of the form contains bound textboxes and other bound comboboxes.

This form is processed by the following VBA code:

Code:
Private Sub cmdAddBook_Click()
'Place the authors first and last name in an array
splitAuthor = Split(cboAuthor.Value, " ")
'Create a new record with the form information
DoCmd.GoToRecord , , acNewRec

[Code] ....

What happens is that it places all the records (Except those in the array) in a field and overwrites the values in that field.

I have used the same GoToRecord statement on other databases and it works just fine. I suspect that it is due to the unbound combobox.

What I need to find a way to place all the data in the corresponding fields of a new record including separating the author's first and last name when retrieved from the combobox. I just need to figure out how to get the data in the table somehow.