I have a database program that I created a year of so back which has
developed a bug. The program (.exe file) runs and displays the database
but won't allow me to add records. When I try to run the program in the
IDE, it won't even load the database. I get an error in the routine
below at the select. I seem to remember something in the release notes
about boolean values having changed, but I can't seem to find it. Does
anyone know what my problem is and how to correct it?
Dim RS As RecordSet
//get list of active names for menu
RS = DB.SQLSelect("select fname, lname, empno from people where active
= 'true' order by lname, fname")
If DB.Error Then
ReportError "Error while getting names: " + DB.ErrorMessage, Error
Else
While Not RS.EOF
Names.Append RS.Field("fname").StringValue + " " +
RS.Field("lname").StringValue
EmpNos.Append RS.Field("empno").IntegerValue
RS.MoveNext
Wend
End If
Paul Dobbs
Software Engineer, Staff
Lockheed Martin Missiles and Fire Control
Phone (972) 603-1244
Fax (972) 603-2017
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
