DBF Indexado com VB6

[ricard.net 0]

Olá Pessoal,

 

Estou com um pequeno grande problema que não sei como resolver.

 

Tenho um arquivo dbf gigantesco onde faço consultas sobre uma determinada pessoa através do seu cpf. Entretanto o tempo de resposta da consulta é muito alto.

Como eu faço para usar um arquivo de índices do dbf no vb6, até consegui gerar o arquivo cdx no Fox mas como eu digo para o vb para ele usar este arquivo como referência nas consultas?

 

ATualmente estou usando a seguinte rotina para conexão como o dbf:

 

Public Sub DBFConex()   Dim conector As String   Set con = New ADODB.Connection   If mypath = "" Then     mypath = App.Path   End If   conector = "Provider=Microsoft.Jet.OLEDB.4.0;" & _                   "Data Source=" & mypath & ";" & _                   "Extended Properties=""DBASE IV;"";"    con.Open conectorEnd Sub

[Graymalkin 0]

Tenho um arquivo dbf gigantesco onde faço consultas sobre uma determinada pessoa através do seu cpf. Entretanto o tempo de resposta da consulta é muito alto.

É muito grande mesmo? Fiz um teste com uma tabela com pouco mais de 5000 registros e o retorno foi imediato. Como você está fazendo a pesquisa?Abraços,Graymalkin