Code:
strSQL = "INSERT INTO tblDeletedBooks (pkBookId, BookTitle, Subtitle, ISBNNumber, DateRegistered, EditionNumber, VolumeNumber, CallNumberNum, CallNumberText, NumberOfPages, YearPublished, MemComments, fkcategoryId, fkformatId, fkPublisherId, fkLanguageId, fkSeries) " _
& "SELECT pkBookId, BookTitle, Subtitle, ISBNNumber, DateRegistered, EditionNumber, VolumeNumber, CallNumberNum, CallNumberText, NumberOfPages, YearPublished, MemComments, fkcategoryId, fkformatId, fkPublisherId, fkLanguageId, fkSeries " _
& "FROM qryBooks WHERE [pkBookId] = " & lngBookID