Olá, Gostaria de saber se tem alguma forma de fazer a leitura de uma tabela do Access utilizando o progress? Att, Diogo
Caso tenhas Provision, ou o equivalente, use a licença de Dataserver ODBC que vem com ele. Muito mais simples que usar ADO ou coisas do tipo.
Desculpe, mas não sou muito bom nesse negócio de acesso a banco de dados difrente, eu trabalho com o progress 8.2, não sei se tem esta opção...
Tem sim amigo, Amanha vou pegar um exemplo de acessar o Access e te mando. Se demorar pode enviar uma mensagem pessoal.
Ola, Segue o exemplo... Código: DEFINE VARIABLE cPath AS CHARACTER NO-UNDO. DEFINE VARIABLE chAccess AS COM-HANDLE NO-UNDO. DEFINE VARIABLE chRs AS COM-HANDLE NO-UNDO. /* database path */ cPath = "C:\db1.mdb". /* Create instance of Microsoft Access */ CREATE "Access.Application" chAccess. /* Open database */ chAccess:OpenCurrentDatabase(cPath,TRUE). /* Get the table 'your table' in a recordset */ chRs = chAccess:CurrentDB:OpenRecordset("pessoa"). /* Go to the first record of the table Test" */ chRs:MoveFirst(). /* iterate*/ DO WHILE NOT chRs:EOF(): MESSAGE chRs:FIELDS("código"):VALUE VIEW-AS ALERT-BOX. MESSAGE chRs:FIELDS("nome"):VALUE VIEW-AS ALERT-BOX. MESSAGE chRs:FIELDS("idade"):VALUE VIEW-AS ALERT-BOX. /* Get the next record of the table */ chRs:MoveNext(). END. /* Close the recordset */ chRs:CLOSE(). /* Close the database */ chAccess:closeCurrentDatabase(). /* Exit MS Access */ chAccess:QUIT(0). /* Release COM-HANDLE */ RELEASE OBJECT chRs. RELEASE OBJECT chAccess.
Copiei todo o processo mas não deu certo, dá erro, criei um banco de dados com os parametros que vc passou, mas não le os dados.
