add a record

[Ruslan Zasukhin]

On 7/3/06 10:06 AM, "Sylvain Perque" <sylvain.perque at ac-reims.fr> wrote:

Hi Sylvain,

> Thanks for your answer, but I have still the problem.
> Perhaps I do wrong with creation of my database ?
> 
> Valentina = new (Xtra("Valentina"))
> Valentina.Init(200 * 1024, "", "")
> gdb = void
> gdb = new(Xtra "VDatabase", #kLocal)
> gDb.create(Mypath, #kDsc_Dat_Blb_Ind)
> 
> tblRes = gDb.createTable( "Resultats" )
> tblRes.createStringField("TDBName", 30)

// <<<<<< this is end of creation db.

--- now you start add record...at fist you blank record

TblRes.SetBlank()

> vTDBName = tblRes.field("TDBName")
> vTDBName.value = "My name"
> 
> RecID = 0
  ^^^^^^^^^^^^^^^ no need

> RecID = tblRes.addRecord()

> gDB.flush()

>  -- close
>  gCursor = void
    ^^^^^^^^^^^^^^^ you do not have any cursors, so why this line here??

> gDb.close()
>  gDb = void

>  if objectP(Valentina) then
> -- When we finish work with Valentina engine we should shutdown it.
> Valentina.shutDown()
> end if



-- 
Best regards,

Ruslan Zasukhin
VP Engineering and New Technology
Paradigma Software, Inc

Valentina - Joining Worlds of Information
http://www.paradigmasoft.com

[I feel the need: the need for speed]