Should
C=DB.SqlSelect("Select Max (uniquekey) from Novels")
read
C=DB.SqlSelect("Select Max(uniquekey) from Novels")
i.e. no space after Max?
Charles Yeomans
On Saturday, December 29, 2001, at 02:41 PM, Mike Benonis wrote:
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
---
Subscribe to the digest:
<mailto:realbasic-nug-digest at lists dot realsoftware dot com>
Unsubscribe:
<mailto:realbasic-nug-off at lists dot realsoftware dot com>
|