Clipper On Line • Ver Tópico - Iniciante xHarbour - Como acessar .Fdb .Gdb

Iniciante xHarbour - Como acessar .Fdb .Gdb

Discussão sobre Banco de Dados e RDDs para Clipper/[x]Harbour.

Moderador: Moderadores

 

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Itamar M. Lins Jr. » 23 Set 2016 13:03

Ola!
Aqui deu esse erro.
SQL Message : -820
wrong or obsolete version

Engine Code    : 335544379
Engine Message :
unsupported on-disk structure for file C:\fontes\DentalOff.FDB; found 32779.10, support <Missing arg #4 - possibly status vector overflow>.<Missing arg #5 - possibly status vector overflow>


Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Itamar M. Lins Jr. » 23 Set 2016 13:07

Ola!
Pelo que li até agora tem que instalar uma versão mais antiga. 2 ou 2.1

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Hasse » 23 Set 2016 16:14

OK. Entendi.

Para instalar uma versão anterior é necessário desinstalar a atual ?
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar de usuário

Hasse
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 815
Data de registro: 19 Out 2004 10:30
Cidade/Estado: Jaraguá do Sul - SC
Curtiu: 0 vez
Mens.Curtidas: 24 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Hasse » 25 Set 2016 11:28

Bom dia.

Num Manual do Firebird encontrei uma tabela de erros, com o erro -902:

SQLCODE   GDSCODE       Symbol Message Text
-902     335544721      network_error Unable to complete network request to host "@1"

Realmente parece ser erro de Password.

Nos testes usei as versões 2.5, 2.1 e 2.0. Os resultados sempre foram idênticos.

Se for este o caso, há alguma chance de acessar o banco ????
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar de usuário

Hasse
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 815
Data de registro: 19 Out 2004 10:30
Cidade/Estado: Jaraguá do Sul - SC
Curtiu: 0 vez
Mens.Curtidas: 24 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Hasse » 25 Set 2016 11:47

Ao colega Itamar.

O erro -820 que você reportou, neste mesmo manual informa:

SQLCODE  GDSCODE     Symbol               Message Text

-820     335544356   obsolete_metadata    Metadata is obsolete
-820     335544379   wrong_ods            Unsupported on - disk structure for file @1; found @2.@3, support @4.@5
-820     335544437   wrodynver            Wrong DYN version
-820     335544467   high_minor           Minor version too high found @1 expected @2
-820     335544881   need_difference      Difference file name should be set explicitly for database on raw device


Ou seja, dentro do código -820 há várias sub-classes.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar de usuário

Hasse
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 815
Data de registro: 19 Out 2004 10:30
Cidade/Estado: Jaraguá do Sul - SC
Curtiu: 0 vez
Mens.Curtidas: 24 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Itamar M. Lins Jr. » 25 Set 2016 13:27

Ola!
Fiz outro teste com xBaseView e me parece que a senha não é "mastekey", ai fica difícil abrir.

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Hasse » 25 Set 2016 14:28

Bom dia.

Bem, se fica difícil, paciência.

Fico sem opção. E decepcionado. Fazer o quê !!!!!! Nem sempre a gente pode ganhar.
"Para ganhar é preciso saber perder !!!!!!"

De qualquer forma, agradeço muito mesmo pela atenção.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar de usuário

Hasse
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 815
Data de registro: 19 Out 2004 10:30
Cidade/Estado: Jaraguá do Sul - SC
Curtiu: 0 vez
Mens.Curtidas: 24 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Hasse » 26 Set 2016 12:44

Bom dia colegas.

Tenho um outro banco Firebird, que abro normalmente com o Flamerobin, mas não consigo abrir com o aplicativo gerado no xHarbour.

Copiei o PRG do site http://www.w3schools.com/sql/sql_intro.asp, que segue no Anexo.

Ele dá erro de Windows: O programa deixou de funcionar.
Anexos
Small.prg
(1.57 KiB) Baixado 171 vezes
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar de usuário

Hasse
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 815
Data de registro: 19 Out 2004 10:30
Cidade/Estado: Jaraguá do Sul - SC
Curtiu: 0 vez
Mens.Curtidas: 24 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Itamar M. Lins Jr. » 26 Set 2016 13:01

Ola!
xHarbour eu nem sei se funciona...
Tente com o Harbour já postei aqui o acesso etc, via SQLMIX.

cRdd  := RDDSETDEFAULT( "SQLMIX" )
cAttributes:="Server=;Database=127.0.0.1:c:\dados\tabelas.fdb;User=SYSDBA;Password=masterkey;Driver={Firebird/InterBase(r) driver};"
nConn := RDDINFO( RDDI_CONNECT,{"ODBC",cAttributes} )

IF nConn == 0
   hwg_Msginfo( "Não conectado ao servidor: " + str(RDDINFO( RDDI_ERRORNO )) + hb_eol() + RDDINFO( RDDI_ERROR ) )
   RDDSETDEFAULT( cRdd )
   RETURN
ENDIF

DBUSEAREA( .T.,"SQLMIX", "select * from TB_PRODUTOS_BARRAS", "xa" )
index on id TO temp1
DBUSEAREA( .T.,"SQLMIX", "select * from TB_PRODUTOS_ESTOQUE", "xb" )
index on id TO temp2

//...Coloque aqui suas rotinas etc...

RddInfo(RDDI_DISCONNECT)
RDDSETDEFAULT( cRdd )



Veja que não tem nada de mais, tudo muito simples de entender.
Para incluir, alterar. Veja a sintaxe em qualquer lugar da NET.

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor janio » 26 Set 2016 14:42

Olá,

O Leonardo (Sygecon) disponibilizou um utilitário de exportação para dbf para diversos BD, incluindo o firebird.

Ja tentou com ele?

Ja usei para MySql e Firebird e foi showw!

http://sagierp.com.br/devel/xbase/sql2dbf.rar

Janio
fui...
e-mail:janioaguiar@yahoo.com.br
msn: janio_aguiar@hotmail.com
xHarbour1.2.1/Harbour3.2 + wvg + hwgui + Mediator + MySql
Avatar de usuário

janio
Colaborador

Colaborador
 
Mensagens: 1835
Data de registro: 06 Jul 2004 07:43
Cidade/Estado: UBAJARA - CE
Curtiu: 8 vezes
Mens.Curtidas: 68 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Hasse » 26 Set 2016 16:02

Boa tarde Janio.

Eu já havia visto este exemplo, mas ele é todo desenvolvido para HWGUI. Eu não tenho esta LIB instalada, o que não seria problema, mas não sei trabalhar com ela.

Claro, se não houver outra opção, terei que ver se consigo adaptá-la para MiniGui. E, nesta LIB estou mal e mal arranhando.

De qualquer forma, te agradeço a gentileza.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar de usuário

Hasse
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 815
Data de registro: 19 Out 2004 10:30
Cidade/Estado: Jaraguá do Sul - SC
Curtiu: 0 vez
Mens.Curtidas: 24 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Hasse » 26 Set 2016 17:21

Ao Janio:
Realmente o exemplo do Leonardo funciona. Por sorte o executável acompanhou o projeto e deu para testar.
Agora é derrubar as barreiras e ver se adapto para MiniGui.

Ao Itamar:
Quem sabe será uma boa opção o SQLMIX.
Inicialmente fiquei encantado com aquele exemplo que utiliza a LIB nativa de conexão com o Firebird (espero que eu tenha entendido corretamente esse detalhe....., mas pode ser que ela seja do Harbour, opção que nem me ocorreu....)
O SQLMIX usa o ODBC como o ADO, correto ? O ADO pareceu-me ter alguns pontos que ainda não funcionam corretamente. Para conseguir fazer funcionar, tive que alterar alguns detalhes no módulo ADOxb.prg.

Vou estudar o SQLMIX e depois ver o que vou fazer, contando com o auxílio dos colegas.

Obrigado.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar de usuário

Hasse
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 815
Data de registro: 19 Out 2004 10:30
Cidade/Estado: Jaraguá do Sul - SC
Curtiu: 0 vez
Mens.Curtidas: 24 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Itamar M. Lins Jr. » 26 Set 2016 20:45

Ola!
O SQLMIX usa o ODBC como o ADO

Ola o SQLMIX, não usa ADO. ADO é da M$ só roda no windows. OBDC funciona em muitas plataformas.
ADO é método de conexão da M$ por ela já descontinuado, mas muito utilizado.
O ADO funciona corretamente assim como o SQLMIX.
No xHarbour nada disso é garantido(SQLMIX/ADO), sujeito o pessoal querer te vender o SQLRDD.
O SQLMIX não precisa de nada apenas do Harbour 3.2 ou 3.4 pode testar ai com a Minigui, que tem vários exemplos. Não precisa de lib gráfica nenhuma o ADO a mesma coisa, os dois são uma boa para migrar para SQL (linguagem) o DB depois você escolhe é o menos importante. Entender os conceitos é o pulo do gato, ferramentas gratuitas (boas) não faltam.

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Itamar M. Lins Jr. » 26 Set 2016 20:57

Mais uma observação da minha parte.
SQLMIX é universal, ADO (só no windows) porém ADO tem exemplos "as pencas" ai na internet.
SQLMIX traz o resultado em DBF. Uma mão na roda para nós! ADO tem que criar algo similar.
SQLMIX usamos append, rlock etc... no ADO são outros comandos MOVE FIRST, etc que não estamos acostumados.
Já os comandos SQL são todos universais.
Estou só explicando ou tentando explicar como manipulamos o resultado do SELECT... tanto faz ser em ADO ou SQMIX, precisamos manipular o resultado da sentença e o SQLMIX, é facil.

Saudações,
Itamar M. Lins Jr.
Avatar de usuário

Itamar M. Lins Jr.
Colaborador

Colaborador
 
Mensagens: 6927
Data de registro: 30 Mai 2007 11:31
Cidade/Estado: Ilheus Bahia
Curtiu: 309 vezes
Mens.Curtidas: 503 vezes

INICIANTE XHARBOUR - Como acessar .Fdb .Gdb

Mensagempor Hasse » 27 Set 2016 07:26

Bom dia Itamar.

Muito legal a tua explicação. Ficou fácil perceber as diferenças.
Certamente irei mergulhar nos estudos do SQLMIX.

Mais uma vez, obrigado pela gentileza e paciência.
Hasse
CP200 / CP500 / Basic / dBase III / dBase IV / Clipper Summer / RTlink / Exospace.
Clipper 5.3b / Blinker 7.0 / CDX com TAG
xHarbour 1.2.1-6604 / Borland C++ (5.5.1) 32 bit / HBmake.
Harbour 3.2.0dev (r1412121623) / MINGW / HBM2 / MiniGui HMG 3.1.4 / IDE (Roberto Lopez).
"Conheça todas as teorias, domine todas as técnicas, mas, quando tocares uma alma humana, seja apenas outra alma humana." (C.G.Jung)
Avatar de usuário

Hasse
Usuário Nível 4

Usuário Nível 4
 
Mensagens: 815
Data de registro: 19 Out 2004 10:30
Cidade/Estado: Jaraguá do Sul - SC
Curtiu: 0 vez
Mens.Curtidas: 24 vezes

Anterior Próximo



Retornar para Banco de Dados

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 10 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro