betovsp

Mauricio, segue abaixo o codigo. Abraços function Main() local oOdbc, oDbCust, n IF !FILE("TESTE.DBF") varq:={{"TST1","C",50,0},{"TST2","C",50,0},{"TST3","M",10,0}} dbCreate("TESTE.DBF",varq) dbCloseArea() END IF !AbreArq({{"TESTE","Tst",1,"TST1"}}) ; RETURN(.F.) ; END DEFINE ODBC oODbc CONNECT "MS Access" // We create an ODBC session object oDbCust = TDbOdbc():New( "batida", oODbc ) * DO WHILE (oDbCust:Skip()#0) * Tst->(dbAppend()) for n = 1 to oDbCust:FCount() MsgInfo( "Campo " + Str( n, 2 ) + ": " + oDbCust:FieldName( n ) ) MsgInfo( oDbCust:FieldGet( n ) ) /* while !Reclock(10) ; END IF n == 1 Tst->TST1:=oDbCust:FieldGet(n) ELSEIF n == 2 Tst->TST2:=oDbCust:FieldGet(n) ELSEIF n == 3 Tst->TST3:=oDbCust:FieldGet(n) END Tst->(dbUnLock()) */ next /* IF Eof() EXIT END END */ oDbCust:End() oOdbc:End() O arquivo que eu abro DBF, é um teste, pois tenho que abrir um Banco MDB e passar os dados para um DBF, se tiver alguma dica sobre isso também, agradeço. Beto.

Olá pessoal, em relação ao que solicitei, já consegui ter acesso ao banco de dados atraves do ODBC, estou usando uma classe chamada TdbOdbc:New(), só que ela abre a configuração do ODBC toda vez que executo, tem alguma forma de abrir o arquivo que eu quero de uma vez sem ter que configurar novamente o ODBC para ACCESS?? Grato. Beto.

O problema é que preciso fazer isso em programa, pois o usuário atualiza diariamente o Banco de Dados MDB e não sabe usar o ACCESS. Alguém me ajuda por favor. Beto.

O problema é que preciso fazer isso em programa, pois o usuário atualiza diariamente o Banco de Dados MDB e não sabe usar o ACCESS. Alguém me ajuda por favor. Beto.

Olá pessoal, tenho um banco de dados em Access (mdb) e estou em dificuldades para converte-lo / Exportá-lo para DBF, alguém pode me passar alguma coisa para que eu possa efetuar este trabalho. Obrigado. Beto.

Pessoal, não tem nada haver com programação, tenho um cliente que perdeu a senha do administrador do Windows 2000, como faço, tem algum arquivo para descobrir??

Olá pessoal, estou com problemas de impressao. Preciso mandar imprimir na COM2, pois o cliente tem outro dispositivo na COM1 e não estou conseguindo. Quando mando na COM1, imprime normalmente. O Cliente esta usando o Windows XP. Tem alguma rotina ou driver para esta impressora??? Grato. Beto.

Olá pessoal, gostaria de colocar em minha caixa de diálogo, uma espécie de legenda usando Bitmap, como procedo. Obrigado Beto.

Estou tendo problemas na abertura de arquivos com o windows 2000, quando abro muitos arquivos ocorre o erro de dos 4, como faço para configurar. Grato.

Olá pessoal, estou iniciando no fivewin, fiquei sabendo de um editor de texto chamado med, alguem poderia me indicar onde posso baixar? obrigado