getting there

[Ruslan Zasukhin]

On 06/27/12 3:18 PM, "Robert Mann" <robmann at gp-racing.com> wrote:

Hi Robert,

> get VDatabase_Open( mDatabase, dbPAth )
> put VDataBase_SqlSelect(mDatabase, "SELECT * FROM wt_brands ") into curID
> 
> put VDatabase_Table( mDatabase, "wt_brands" ) into mbrands_
> 
> put VCursor_RecordCount(curID) into recNum
> 
> put VCursor_FieldCount(curID) into colnum
> 
>  
> 
> the above works but now need to convert the following
> 
> put revDatabaseColumnNumbered(curID, c)

This is ask field of cursor by index?

    put VCursor_Field( cursRef, fldIndex ) fldRef
 
>     revMoveToNextRecord curID

        VCursor_NextRecord( cursRef )

>   IF recNum > 0 THEN
> 
>     REPEAT recNum times
> 
>       put empty into tRec
> 
>       REPEAT with c = 1 to colNum
> 
>         put revDatabaseColumnNumbered(curID, c) & tab after tRec

This returns a string?

           VField_GetString( fldRef )
 
>       END REPEAT
> 
>       put tRec & cr after fld "Select"
> 
>       revMoveToNextRecord curID
> 
>    IF the result = false THEN exit REPEAT
> 
>     END REPEAT
> 
>   END IF
> 
>   delete last char of fld "Select"

-- 
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]