Using ApolloTable

<< Click to Display Table of Contents >>

Navigation:  Apollo ADO.NET Provider >

Using ApolloTable

 

Dim apiTable As New Apollo.ApolloTable()

Dim ListBox1 As New ListBox

 

apiTable.DatabaseName = "C:\Apollo\9.9\x86\Data\"

apiTable.TableName = "TEST"

apiTable.TableAlias = "MyTest"

 

' set access to local mode (Local or Server)

apiTable.AccessMethod = SDEAPIModule.TAccessMethod.amLocal

 

apiTable.Open()

 

Me.ListBox1.Items.Clear()

 

While (Not apiTable.EOF)

 

 Me.ListBox1.Items.Add(

 apiTable.GetString("state") & " " & _

 Trim(apiTable.GetString("first")) & " " & _

 Trim(apiTable.GetString("last")))

 

 apiTable.Skip(1)

 

End While

 

apiTable.Close()