Invalid Curs ref
Zav - Alex Zavatone
zavpublic at mac.com
Sun May 4 13:34:27 CDT 2003
I swear this used to work last week. Today it returns a - value for
the cursor and an error on setblank. Any idea why?
Mac OS X 10.2.5, DMX.
Before running, I InitValentina and manually delete the username.vdb file
on CreateUserDatabase
put "creating user database"
myDBPath = the moviepath & "username.vdb"
myDBTable = "Users"
myDB = new( xtra "VDatabase")-- NEW INSTANCE OF THE XTRA
CreateDataBase(myDB, myDBPath,1) -- CREATE DATABASE FROM SCRATCH
-- MAKE A TABLE **** The baseref OBJ is the table
myBaseTableRef = MakeNewBaseObject(myDB, myDBTable)
valentinaSetExtensions(["vhd","vdb","vdx","vbl"])
-- ...then your addField stuff.
userField = AddField(myDB, myBaseTableRef,"Username",#kTypeString,10)
passwordField = AddField(myDB, myBaseTableRef,"Password",#kTypeString,10)
hintField = AddField(myDB, myBaseTableRef,"Hint",#kTypeString,30)
-- create a cursor object
myDBref = myDB.GetRef()
--
myCrsRef = new(xtra "VCursor", myDBref, "SELECT * FROM" && myBaseTableRef)
myCrsRef.SetBlank()
Thanks.
--
- Zav
Lost in the translation.
More information about the Valentina
mailing list