Nem Harbour e nem xHarbour trabalham com este tipo de índice. A biblioteca mdx que tem no xHarbour é a biblioteca cdx com o nome trocado, de forma que vai tentar processar os índices mdx como se fossem cdx. Não vai funcionar.Mário Isa escreveu:E procurei a biblioteca DBFMDX.LIB no xharbour e não achei. Tem jeito de abrir no xharbour ?Mário
No Windows, dá para usar o ADO:
Código: Selecionar todos
// cria objetos
cn := CreateObject("ADODB.Connection")
rs := CreateObject("ADODB.Recordset")
// cria uma conexão para arquivos da pasta c:\dados
cn:Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\dados;Extended Properties=dBASE IV;")
// seleciona registros do arquivo teste.dbf
rs:Open("select * from [teste#DBF]", cn, 2, 3)
// lista registros
do while !Rs:eof()
? Rs:Fields(0):Value() // mostra primeiro campo
? Rs:Fields(1):Value() // mostra segundo campo
?
Rs:MoveNext()
enddo
rs:close()
Código: Selecionar todos
// adicionado dados, assumindo primeiro campo como numérico e segundo como alfanumérico
cn:Execute("Insert into teste Values(valor_campo_1, 'valor_campo_2')")
