Database Max() Function

[Mike Benonis <mbenonis_lists at mac dot com>]

Well, I've got the sorting problem all straightened out (I wrote my own code
to display the data), but there is one more issue plaguing me:

For some reason this code will not execute:

  Dim D As DatabaseRecord
  Dim C As DatabaseCursor
  D=New DatabaseRecord
  
  D.Column("Title")=TitleField.Text
  D.Column("AuthorLastName")=LastField.Text
  D.Column("AuthorFirstName")=FirstField.Text
  D.IntegerColumn("Copies")=Val(CopiesField.Text)
  D.Column("SeriesName")=SeriesnameField.Text
  D.IntegerColumn("NumInSeries")=Val(NumInSeriesField.Text)
  D.DateColumn("RecordCreated")=New Date
  D.DateColumn("RecordModified")=D.DateColumn("RecordCreated")
  
  C=DB.SqlSelect("Select Max (uniquekey) from Novels")
  
  
  //NilObjectException occurs when the line below executes
  //It seems that the DB.SQLSelect line is not working for some reason.
  D.IntegerColumn("uniquekey")=C.Field("uniquekey").IntegerValue+1
  
  DB.InsertRecord("Novels",D)

Take a look at the comments in the code, above
D.IntegerColumn("uniquekey")=...

Any ideas?
-Mike