jc

Faltou uma vírgula aí id=code>id=code>-- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.10/ xHarbour 1.1.0/ xDevStudio 0.72/ ADO OLE 2.8/ Pelles 5.00.1

E temos dito! -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.10/ xHarbour 1.1.0/ xDevStudio 0.72/ ADO OLE 2.8/ Pelles 5.00.1

Amigo, Por acaso não estaria, nos fontes da tua casa, faltando colocar algum STATIC para uma função chamada CADASTRO? Não duvidando de vc mas, se realmente vc confirma que não existe duas funções chamadas CADASTRO... então pode ser alguma lib que possui essa tal outra função. -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.10/ xHarbour 1.1.0/ xDevStudio 0.72/ ADO OLE 2.8/ Pelles 5.00.1

Isso mesmo Sérgio, e a organização fez os testes... apenas postei aqui as mais prováveis situações de máquinas para os gerenciadores. Os exemplos que citei são os utilizados pela maioria dos meus clientes: Win XP, Win 2000 e SuSE 11. Mas no site estão todos os dados comparativos em várias idênticas situações. E não estou deplorando o MySQL, ele se portou superior em muitas situações... apenas falo que no geral, o PostgreSQL é um pouco melhor e, sem dúvida, mais completo! Agora, vc consegui resumir de forma bem sucinta tudo oq foi explanado! Exatamente isso: robusteza necessária para a aplicação! Sempre falamos sobre os grandes gerenciadores como PostgreSQL, Oracle, Caché e por aí vai.. mas de repente, apenas um simples .mdb resolve 100% um determinado problema... acho que tudo bate no seguinte: Oq vc precisa para rodar a tua aplicação, seja ela qual for, da forma mais rápida e segura possível. O MySQL, justamente por possuir contratos comerciais, tem muita chance de virar um tremendo banco de dados para competir diretamente com os grandes Oracle e Caché! O bom do fórum é isso, além de tirar dúvidas específicas ainda nos permite ter esse tipo de conversa... bom demais! -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.10/ xHarbour 1.1.0/ xDevStudio 0.72/ ADO OLE 2.8/ Pelles 5.00.1 Editado por - jc on 07/02/2009 11:08:36 Editado por - jc on 07/02/2009 11:14:45

Bom, o MySQL realmente possui todos esses recursos que vc comentou caro Evandro... mas quando referi-me ao fato dele ser somente leitura, era com relação aos cursores... depois procure saber um pouco sobre esse recurso no MySQL. Com relação à licenças, vc pode consultar aqui no próprio site do MySQL em http://dev.mysql.com/doc/refman/5.1/de/gpl-license.html Caso vc se lembre, o MySQL é sob a GPL... que obriga sua aplicação ser distribuída em conjunto com os fontes... em se tratando de uma aplicação comercial, de fonte fechado, existe um pequeno detalhe "financeiro" a se resolver. Consulte isso tb. E em relação ao desempenho, iremos partir da premissa de que um banco de dados estará rodando em um servidor, oq descarta a possibilidade de ser uma versão do windows não-servidor. Novamente se faz indiscutível o fato de servidores linux serem extremamente robustos. Meus dados foram coletados a partir de testes feitos com o MySQL 5.0 rodando em uma estação XP e em um 2000, comparando com o PostgreSQL rodando em um SuSE 11.0 feitos pela International Data Corporation (IDC). Quanto ao resto, sim, vc está correto... dependendo de qual tecnologia será usada pelo fivewin, vc nem possui tantas opções de escolha... quase que praticamente tendo que ficar com o MySQL... veja bem, "quase que praticamente". -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.10/ xHarbour 1.1.0/ xDevStudio 0.72/ ADO OLE 2.8/ Pelles 5.00.1 Editado por - jc on 07/02/2009 00:52:25

Esse site pode te dar uma luz inicial, com vários arquivos para baixar com dicas e formas de escrita: http://www.portaldaprogramacao.com/apostilas.asp?c=23 Esse é mais completo e um pouco avançado, tb está em inglês... mas acredite, vc vai chegar lá: http://www.sql-tutorial.net/SQL-tutorial.asp Mais um site pra vc ler alguma coisa: http://pt.wikiversity.org/wiki/Introdu%C3%A7%C3%A3o_ao_SQL/O_que_%C3%A9_SQL -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

Explicando alguma coisa das linhas que vc colocou: -> Selecionando (SELECT) todas as colunas (*) da (FROM) tabela TABLES do banco de dados sys (SYS) SELECT * FROM sys.columns -> Selecionando todas as colunas da tabela columns do banco de dados sys SELECT * FROM SYS.TYPES -> Selecionando todas as colunas da tabela types do banco de dados sys select * from sys.sysindexes -> Selecionando todas as colunas da tabela sysindexes do banco de dados sys id=code>id=code>Essa é uma instrução básica de consulta SELECT no banco de dados SYS.TABLES -> Aqui, vc está dizendo que quer consultar a tabela TABLES que está no banco SYS Ou seja, SELECT * FROM SYS.TABLES é o mesmo que "Selecione tudo da tabela TABLES que está no banco de dados SYS" -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1 Editado por - jc on 06/02/2009 17:20:59

Caro amigo, Essas linhas são instruções de uma linguagem chamada SQL ( Structured Query Language ou Linguagem de Consulta Estruturada ) É utilizada para realizar consultas e tb manutenção de dados e estrutura em bancos de dados diversos como o SQl Server. Qualquer banco de dados que se preze, utiliza SQL para consultas/manutenção. Oracle, MySQL, PostgreSQL, SQL Server, MSQL, Sybase, Interbase, Firebird e por aí vai... Explicando alguma coisa das linhas que vc colocou: -> Selecionando (SELECT) todas as colunas (*) da (FROM) tabela TABLES do banco de dados sys (SYS) SELECT * FROM sys.columns -> Selecionando todas as colunas da tabela columns do banco de dados sys SELECT * FROM SYS.TYPES -> Selecionando todas as colunas da tabela types do banco de dados sys select * from sys.sysindexes -> Selecionando todas as colunas da tabela sysindexes do banco de dados sys id=code>id=code>A melhor coisa a fazer no seu caso e na minha opinião é um pequeno curso rápido de SQL, para que vc possa ter a noção básica de SQL e poder, pelo menos, se não entender, saber onde e oq procurar para compreender essas linhas que vc postou aqui no fórum. -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1 Editado por - jc on 06/02/2009 17:13:56

citação:O Melhor a fazer é testar por si proprio, eu por exemplo utilizo Mysql por que em meus testes foi muito mais rapido e estavel que o postgresql, alem da praticidade de instalar o mysql a partir da versão no-install , onde tenho meu proprio instalador que já vai tudo configurado e mastigado. Agora uma coisa que o colega JC disse que me encomoda é sobre a licença de uso do Mysql, ela é meia duvidosa foi isso que me fez a partir para o Postgresql, mas como o tempo não esta a meu favor ainda continuo no mysql(Contrib) assim que sobrar um tempo vou migrar para Postgresql(Contrib) Leonardo Machado Porto Alegre-RS Hwgui + Mysql / xHarbour 1.0.0 id=quote>id=quote>Grande Leonardo, O PostgreSQL tb te permite uma versão espécie "non-install" mas apenas nas versões para o Linux! Já que ele nasceu para rodar nesse sistema operacional, todos os recursos mais legais estão disponíveis para o linux... mas a versão win32 é muito estável e comporta todo o necessário para a tua aplicação. Esse barato da licença do MySQL é mesmo uma coisinha chata, mas pelo próprio site da desenvolvedora tem falando sobre essa "tal" licença comercial... oq deixa a gente meio desconfiado na hora de optar por ele... Uso o MySQL para testes, por ser realmente muito mais prático para instalar e configurar... porém nossos sistemas comerciais saem todos para PostgreSQL, até pq nossos clientes utilizam servidores Linux SuSE, oq nos dá essa certa "comodidade" de escolha. Coloquei um post falando sobre a tecnologia ADO da microsoft, via OLE do ODBC. Realmente muito boa, te deixa tranquilo, fácil de usar e comporta todos os bancos da vida... inclusive o Oracle! Imaginem o Fivewin acessando Oracle!? Muito massa hein!! Vale a pena dar uma olhada nisso.. http://www.fivewin.com.br/forum/topic.asp?TOPIC_ID=14729 -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

Caro João, É indiscutível, para quem entende, que o PostgreSQL é superior! Em vários e, praticamente todos os, aspectos. Desde transações aninhadas, controle de trafego de dados, acesso in-line de dados de outros servidores remotos, dados espaciais, enorme número de tipos de entrada de funções, tipagem real de dados, possibilidade de stored procedures com outras linguagens, permite cursores enquanto no MySQL é apenas leitura e etc. Hj, o PostgreSQL é o gerenciador de dados gratuito que mais se equipara ao Oracle em termos de desempenho e robusteza! A velocidade é relativa, mas se ambos estiverem rodando em um mesmo servidor ou em máquinas equivalentes... diria que o PostgreSQL consegue ser muito mais rápido que o MySQL em alguns casos mas em outros, o MySQL supera... acho que desempenho é medido tb de acordo com as consultas realizadas juntamente com a normalização do teu catálogo... relativo! O PostgreSQL é comercialmente gratuito, já o MySQL não! Para comercializar sua aplicação acessando o MySQL, é necessário uma licença, apesar de relativamente barata. Agora nunca ouvi ninguém ter sido pego ou preso ou multado por usar comercialmente o MySQL sem ter uma licença. Justamente pelo fato do mesmo estar 100% disponibilizado pelo site da desenvolvedora. Resumindo: Se vc possui a possibilidade de escolha, é PostgreSQL sem dúvida! Site para outros dados: http://www.postgresql.org/about/ -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1 Editado por - jc on 06/02/2009 12:09:11

No MySQL, vc pode usar o tipo decimal( tamanho, decimais ) -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

Não é oCombo:cItens É oCombo:aItems -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

Amigo, Basta que vc redefina a propriedade do combobox para a matriz: id=code>id=code>-- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

Se for em um banco de dados como o MySQL, vc só conseguirá recuperar algum registro excluído se o comando para a exclusão tiver sido executado em uma transação qualquer... Usando o rollback para desfazer a deleção. Mas se vc comitou (deletou fisicamente do banco de dados, não estava em uma transação), esse registro está perdido! Não tem volta! -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

citação:Julio,Aqui continua quente, apesar de algumas chuvas...hehehe Bom e quanto à instalação, vai ter que configurar cada máquina pra usar? Abraços, Kleyber Derick xHarbour 1.1.0 + FWH 8.02 (BMW Zerada!!!) + xDevStudio + SQLLIB Visite São Luís - MA A Ilha dos Amores id=quote>id=quote>Kleyber, infelizmente sim Essa seria a única "complicação" aparente... visto que o driver para MySQL ou PostgreSQL não são nativos do windows, porém existem oficialmente nos respectivos sites dos gerenciadores.... Já para o Oracle, é nativo do windows ( Pq né!? ) -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

citação:Júlio, Me esclarece uma coisa: Eu sempre achei que o ADO fosse uma camada abaixo do ODBC e, portanto, não usaria o ODBC pra se conectar; pelo contrário, o ODBC é que usaria o ADO pra fazer a conexão... mas pelo que vc está dizendo, meu entendimento está errado... gostaria de ter mais detalhes. Uma outra coisa é que, se vc for instalar teu sistema em rede, cada terminal terá que ser configurado com o OLE DB pra poder acessar? Abraços, Kleyber Derick xHarbour 1.1.0 + FWH 8.02 (BMW Zerada!!!) + xDevStudio + SQLLIB Visite São Luís - MA A Ilha dos Amores id=quote>id=quote>Kleyber! Como vai essa ilha de Slz meu amigo? Saudade dessa terrinha quente É mais ou menos isso mesmo... podemos dizer que o ADO é uma linguagem utilizada pelo OLE DB para comunicação com o teu banco de dados... Site oficial da microsoft para desenvolvedores, sobre o ADO e o ADOX: http://msdn.microsoft.com/en-us/library/ms675532(VS.85).aspx -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

citação:Julio, seria possivel voce passar mais alguns passos para gente dar uma olhada como funciona. Já pedindo demais, uns exemplos de programação seria muito bem vindo. id=quote>id=quote>Claro que sim! À medida que estamos elaborando as nossas rotinas aqui, vou montando tb um pequeno exemplo pois dessa forma irei colocar alguns tópicos mais importantes. Quero muito que vcs possam entrar no ADO pq achei uma tecnologia excelente e quanto mais gente no processo, mais fácil para solucionarmos problemas que possam surgir! -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

citação:Deixe eu ver se entendi Se vc instala um driver, então o acesso é mesmo se chamando de ADODB esta utilizando ODBC. Como é a velocidade de acesso ? id=quote>id=quote>Na verdade, oq vc instala é o Microsoft OLE DB para ODBC do banco de dados que vc irá usar. Ele disponibiliza, via ODBC, a conexão através do ADO e muitas outras funcionalidades. Dos testes que executei com cerca de 17.676 registros, o retorno se deu cerca de 15% mais rápido que a lib anterior! -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

citação:Voce vai disponibilizar alguma coisa prática para nossa comunidade como a lib e prgs de exemplo ? id=quote>id=quote>Caro José, Posso disponibilizar sim alguns exemplos, porém não há necessidade de nenhuma lib. É nativo do Windows! Bastando apenas que vc instale o driver para o seu banco de dados. Mas, via ODBC, vc poderá ver muitas opções nativas já disponíveis! -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

Galera, tenho uma notícia boa para todos. Há alguns meses atrás, minha equipe se deparou com um pequeno problema em nossas rotinas de gravação/deleção e atualização de dados exibidos com a lib utilizada. Desde então tenho estudado e testado o ADODB (ActiveX Data Objects) que é uma biblioteca abstrata de componentes de comunicação com bases de dados (bancos, arquivos, imagens, etc) via OLE da própria microsoft. Atualmente, estamos na fase final já para implementação das rotinas desenvolvidas em cima do ADODB para o nosso sistema... removendo assim, a lib anterior. O ADODB funciona com quaisquer banco de dados que possua o driver nativo para o windows... bastando instalar esse mesmo driver e informar ao ADODB, a string correta de conexão. Após isso, nenhuma mudança de código precisa ser feita para nenhum banco de dados. Tudo igual e o melhor de tudo: Tudo funciona perfeitamente. Realizei alguns testes de performance e nos deparamos com um desempenho com cerca de 15% de ganho na velocidade tanto em consultas complexas com campos calculados e store procedures.. até atualização de dados com INSERTs, UPDATEs e DELETEs. Tb existe o tratamento de imagens através do ADODB.Stream, que realiza o trabalho com campos BLOB de forma extremamente simples, sem necessitar de nada mais além de uma única linha para ler a imagem e outra para inserir a imagem nos campos tipo BLOB (salvando-se a instância do objeto que requer mais códigos, porém todos igualmente simples). Até então estou utilizando os três objetos: ADODB.Connection ADODB.RecordSet ADODB.Stream Site para dúvidas: http://www.devguru.com/Technologies/ado/quickref/ado_intro.html Recomendo alguns testes para averiguação por parte de vcs, pois é um extremo recurso à ser utilizado e o fivewin comporta todo ele! Quaisquer dúvidas, favor entre em contato comigo. Irei ajudar a todos o quanto for possível. *** Um pequeno exemplo *** -> Inserindo um novo registro: oRs:addNew() oRs:fields( "codigo_reduzido" ):value := val( alltrim( strtran( uValorField, ".", "" ) ) ) oRs:fields( "codigo_pontuado" ):value := alltrim( uValorField ) oRs:fields( "descricao" ):value := "NOVA CONTA: '" + alltrim( uValorField ) + "' INSERIDA!" oRs:fields( "grupo" ):value := "A" oRs:fields( "nivel" ):value := len( alltrim( uValorField ) ) oRs:fields( "tipo" ):value := "S" oRs:fields( "natureza" ):value := "C" oRs:updateBatch() id=code>id=code>-> Cancelando uma alteração realizada: oRs:moveFirst() id=code>id=code>-> Atualizando o registro corrente: id=code>id=code>-> Atualizando toda a consulta atual: id=code>id=code>-> Uma pequena consulta (extremamente ligeira): && -- Salvando a posição anterior à pesquisa nBookmark := oRs:bookMark && -- Realizando a pesquisa cCriterio := "descricao LIKE '*" + alltrim( uKeySearch ) + "*'" TRY oRs:moveFirst() oRs:find( cCriterio ) && -- Conteúdo não localizado IF ( oRs:bof .OR. oRs:eof ) ? "O conteúdo informado não foi localizado!" ENDIF CATCH oRs:bookMark := nBookmark oBrw:setFocus() END ENDIF id=code>id=code>-> Excluindo um registro: id=code>id=code>-> Alguns métodos práticos de navegação do RecordSet: oRs:moveLast() oRs:move( nPosicaoBookmark ) oRs:movePrevious() oRs:moveNext() id=code>id=code>Até mais! Tudo de bom! -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

Galera, tenho uma notícia boa para todos. Há alguns meses atrás, minha equipe se deparou com um pequeno problema em nossas rotinas de gravação/deleção e atualização de dados exibidos com a lib utilizada. Desde então tenho estudado e testado o ADODB (ActiveX Data Objects) que é uma biblioteca abstrata de componentes de comunicação com bases de dados (bancos, arquivos, imagens, etc) via OLE da própria microsoft. Atualmente, estamos na fase final já para implementação das rotinas desenvolvidas em cima do ADODB para o nosso sistema... removendo assim, a lib anterior. O ADODB funciona com quaisquer banco de dados que possua o driver nativo para o windows... bastando instalar esse mesmo driver e informar ao ADODB, a string correta de conexão. Após isso, nenhuma mudança de código precisa ser feita para nenhum banco de dados. Tudo igual e o melhor de tudo: Tudo funciona perfeitamente. Realizei alguns testes de performance e nos deparamos com um desempenho com cerca de 15% de ganho na velocidade tanto em consultas complexas com campos calculados e store procedures.. até atualização de dados com INSERTs, UPDATEs e DELETEs. Tb existe o tratamento de imagens através do ADODB.Stream, que realiza o trabalho com campos BLOB de forma extremamente simples, sem necessitar de nada mais além de uma única linha para ler a imagem e outra para inserir a imagem nos campos tipo BLOB (salvando-se a instância do objeto que requer mais códigos, porém todos igualmente simples). Até então estou utilizando os três objetos: ADODB.Connection ADODB.RecordSet ADODB.Stream Site para dúvidas: http://www.devguru.com/Technologies/ado/quickref/ado_intro.html Recomendo alguns testes para averiguação por parte de vcs, pois é um extremo recurso à ser utilizado e o fivewin comporta todo ele! Quaisquer dúvidas, favor entre em contato comigo. Irei ajudar a todos o quanto for possível. *** Um pequeno exemplo *** -> Inserindo um novo registro: oRs:addNew() oRs:fields( "codigo_reduzido" ):value := val( alltrim( strtran( uValorField, ".", "" ) ) ) oRs:fields( "codigo_pontuado" ):value := alltrim( uValorField ) oRs:fields( "descricao" ):value := "NOVA CONTA: '" + alltrim( uValorField ) + "' INSERIDA!" oRs:fields( "grupo" ):value := "A" oRs:fields( "nivel" ):value := len( alltrim( uValorField ) ) oRs:fields( "tipo" ):value := "S" oRs:fields( "natureza" ):value := "C" oRs:updateBatch() id=code>id=code>-> Cancelando uma alteração realizada: oRs:moveFirst() id=code>id=code>-> Atualizando o registro corrente: id=code>id=code>-> Atualizando toda a consulta atual: id=code>id=code>-> Uma pequena consulta (extremamente ligeira): && -- Salvando a posição anterior à pesquisa nBookmark := oRs:bookMark && -- Realizando a pesquisa cCriterio := "descricao LIKE '*" + alltrim( uKeySearch ) + "*'" TRY oRs:moveFirst() oRs:find( cCriterio ) && -- Conteúdo não localizado IF ( oRs:bof .OR. oRs:eof ) ? "O conteúdo informado não foi localizado!" ENDIF CATCH oRs:bookMark := nBookmark oBrw:setFocus() END ENDIF id=code>id=code>-> Excluindo um registro: id=code>id=code>-> Alguns métodos práticos de navegação do RecordSet: oRs:moveLast() oRs:move( nPosicaoBookmark ) oRs:movePrevious() oRs:moveNext() id=code>id=code>Até mais! Tudo de bom! -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

João, Resolveria sim e talvez seja até mais elegante do que todo o cálculo do left e rat pra pegar o nome do arquivo DBF! Manda ver no cFileNoPath()! -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

Ou somente: cRetorno := left( Left(cFile,Rat("\",cFile)), 8 ) -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

Caro João! Nesse ponto, estou contigo e não abro! -- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1

Talvez isso resolva: id=code>id=code>-- Júlio César M. Ferreira www.rsconsultores.com.br Fone: (81) 4009.5444 Fax: (81) 4009.5400 E-mail: julio.mferreira@gmail.com MSN: julio_mferreira@hotmail.com Recife - PE FWh 8.08/ xHarbour 1.1.0/ xDevStudio 0.72/ SQL LIB 1.9/ Pelles 5.00.1