Using VCOM 3.5.2 API_Way to filter recordset?
Ruslan Zasukhin
ruslan_zasukhin at valentina-db.com
Sun Nov 29 13:30:58 CST 2009
On 11/29/09 9:02 PM, "Barry G. Sumpter" <BarrySum at bigpond.net.au> wrote:
> Just wondering since my current apps are in v3.5.3.
> And this testing VCOM is in v3.5.2.
> And they are NOT compatible.
>
> Is there a version of vCOM in 3.5.3?
>
>
>
> -----Original Message-----
> From: valentina-bounces at lists.macserve.net
> [mailto:valentina-bounces at lists.macserve.net] On Behalf Of Barry G. Sumpter
> Sent: Monday, November 30, 2009 5:47 AM
> To: 'Valentina Developers'
> Subject: RE: Using VCOM 3.5.2 API_Way to filter recordset?
>
> Hi all,
>
> Testing VCOM from 3.5.2
>
> After installing - my apps in 3.5.3 won't compile
This is first problem?
> Using VCom API_Way in vb6 is there a way to filter the recordset?
And this is second question? :-)
> "Select * from myTable where myField = 'myCriteria'"
> Private Sub Command3_Click()
>
> Dim f As String
>
> On Error GoTo ErrDb
> f = App.Path + "\Databases\myDB.vdb"
>
> Set mDatabase = New VDatabase
> mDatabase.InitLocal kStorageDefault
>
> mDatabase.Open f
>
> Dim t As VTable
> Set t = mDatabase.Table("myTable")
>
> Dim setAll As VSet
> Dim SortedSet As VArraySet
>
> Set setAll = t.SelectAllRecords()
> '??? Set setAll = t.SelectAllRecords("Select * from myTable where myField
> = 'myCriteria'") '???
fldMyField = t.Field( "MyField" )
VSet set1 = fldMyField.FindValue( 'My Ctriteria' )
Also exists other methods in Vfield class
E.g. FindRange
But why you want to use API Way?
You need best possible speed ...
--
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]
More information about the Valentina
mailing list