evertonlb

Blz... farei isso dai. Obrigado Rochinha, Evandro e demais colegas. Att. Everton

Bem vindo W de Paula. Me diga uma coisa, tu vai fazer teu software em FiveWin ou Delphi? Se for em FiveWin tem uma pancada de códigos espalhados por este fórum, ai é só copiar e começar a usar.. Com relação aos 60, 70%.. cara não sei se chega a isso tudo, pois basicamente o que muda é a interface. Tenho um monte de funções que estavam no Clipper e que estou usando sem mexer nada, outras mexi numa ou outra mensagem. Mas as telas, ai não aproveitei nada mesmo! Mas se acaso for desenvolver em Delphi... ai EU já não sei mais nada!! Att. Everton

Pessoal... tenho um problema que já ocorreu em duas máquinas. Instalei o MySql 5.0 e deu tudo certo, o serviço é iniciado e aparentemente esta tudo ocorrendo de maneira adequada. Paro o serviço Copio a minha pasta DATA para a maquina nova, mas quando vou iniciar o serviço dá uma mensagem de erro. o Windows não pôde iniciar o serviço MySQL em Computador Local. Erro 1067: O processo foi finalizado de forma inesperada. Após copiar os dados o MySQL para de funcionar... A máquina de origem dos dados é WIN7 64, e a destino é WIN7 32. Alguma sugestão?

Ah legal.. obrigado pela dica. Mas agora me surgiu uma dúvida... No DBF eu checava a estrutura do arquivo e se tivesse uma alteração copiava o arquivo pra outro nome, criava um DBF com a estrutura nova e copiava os dados novamente... no MySql é a mesma coisa? Mas como checo a estrutura da tabela? Att. Everton

Nossa. moleza mesmo.. só copiar a pasta DATA... Valeu pessoal.. Att. Everton

Poxa Marcio.. obrigado pela disposição.. tentarei fazer, mas caso não consiga, terei que te ligar mesmo! Obrigado novamente. Att. Everton

Valeu meus amigos... Obrigado Rochinha, Marcio e Alberto, vou dar uma olhada no HeidiSql... amanhã colocarei as dicas em prática... Att. Everton

Pessoal.. não tenho experiência nisso.. então preciso de uma ajuda! Estou usando a SQLLIB do Vailton e assim usando o MySql como Banco de Dados, agora preciso instalar o software numa outra máquina. Claro, vou instalar o MySql 5.0, mas e ai? Como faço pra copiar o meu Banco de Dados com suas tabelas pra dentro da máquina nova? Att. Everton

Certo.. vou dar uma melhorada na função toda, ai mostro todo o código. Att. Everton

Poxa.. fiz alguns testes e nada, mas ai dei uma olhada na classe Tget e achei o método GotFocus Agora vai dar certo! GotFocus( MsgInfo( "Mensagem nova", "Foco no Get" ) ) Att. Everton

Mas Kapiaba, o On Change não será executado somente no momento que for alterado o valor do Get? se for, ai não dá.. preciso que seja alterado o "say" no momento que o get recebe o foco! Pois é Samir... fico protelando o inevitável... atualizar a versão!!! Mas tem essa opção nas versões mais novas do FW? Vou ver o bKeyChar().. e tambem o código do Samir e tambem outra ideia que me surgiu agora! rsrs Att. Everton

Explico. Tenho um folder com uns 20 Gets e gostaria de colocar um Say, com uma letra razoavelmente grande, dizendo do que se trata cada um destes Gets. Para não ficar cheio demais meu folder, pensei em colocar somente um SAY no alto do meu folder, e a cada focada num dos gets em mudo o "valor" do say fazendo com que apareça a mensagem correta Pensei que tinha um "On Focus" no get, mas na minha versão free não tem! o when() e o Valid() não podem me ajudar, um funciona antes do get e outro depois... precisaria algo que veja o focus no oGet2, oGet3, oGet4... e me dê a possibilidade de mudar o Say.. Como poderia fazer isso? Att. Everton

O Kapiaba, porque não coloca uma imagem pra gente ver como que fica? Att. Everton

cara, eu pelo que lembro, nunca enfrentei grandes problemas na abertura do DBF, e o que ocorreu se deu por problemas de máquina, rede, placa, cabo, hub ou alguma coisa do gênero... Sem querer subestimar o que o colega já tentou e verificou, eu tentaria: 1- Veria se realmente tem necessidade do Win8, se não tem, meto o 7 e foi! 2- Checar as configurações do Config.nt 3- Verificaria os SET TEMP/SET TMP 4- Verificaria se não tem mais nada causando tráfego na rede, usando o próprio gerenciador do WIN! Vai que essa máquina tenha um Torrent da vida?!?! 5- Após isso trocaria o cabo de rede por outro de outra máquina que esta rápida. Já tive problema por cabo mal feito e passando nos conduítes de energia. 6- Depois, se ainda não tivesse resultado positivo, trocaria a placa de rede... 7- As vezes uma boa limpeza na máquina pode surpreender a gente! Se nada disso desse certo junto minhas tralhas digo que vou ao banheiro e sumo! hahahahah Att. Everton

Fiz isso com o Clipper e DBF.. usei como o Marcio indicou, Hamachi e o WTS.. funcionou por quase 2 anos sem problema algum. Att. Everton

Obrigado Kapiaba.. ótimo link. João, vou tentar fazer isso dai.. caso eu não obtenha sucesso te mandarei o ibdata.. Obrigado! Att. Everton

João.. tentei parar o serviço usando "Mysql.server stop"; mas não deu.. outra.. os dados nem me importa.. só preciso da estrutura das tabelas.. achei um arquivo chamado de Ibdata1, parece que da pra tentar por ai! Att. Everton

Valeu João.. Obrigado pelas condolências. Eu tenho copiado aqui também a pasta C:\Program Files\MySql.., mas dentro dela só tem três pastas..: connector C 6.0.2, connector C++ 1.1.0 e a connector OBDC 5.1.11. Quando fiz a conversão dos meus DBF, com um utilitário que acho que era do Kleyber, criou as tabelas que foram pra dentro do C:\User... mas procurei por .FRM dentro dos meus zip de backup.. não tem jeito não acha nada alem dos da pasta C:\user... Será que ainda não existe um suspiro de esperança?? Att. Everton

Bom dia pessoal. Tô com um problema e não sei como resolve-lo, nem se há maneira de resolve-lo. Mas o fato que me faz precisar de ajuda é o seguinte.. Tinha um dual boot no meu notebook, com o WinXP e o Win7-64, o XP usava para o Clipper e o Win7-64 para FW. Com o FW, num programa específico comecei a usar a SQLLIB e o MySql, para manipular as tabelas estava usando o WorkBench 5.2. Bem o que aconteceu foi que eu precisei formatar minha máquina.. ai resolvi fazer um backup do meu BD. Numa pesquisa pelo google vi que as tabelas ficavam dentro da pasta C:\Users\Todos os Usuários\MySQL\MySQL Server 5.5\data\logospbdata. Beleza.. copiei a pasta C:\USER e veio tudo.. Formatei e reinstalei o MySql 5.5 ( que já utilizava antes ) e o WorkBench 5.2.46 ( que também já utilizava antes ). Quando reinstalei o MySql, ficou neste endereço..: C:\ProgramData\MySQL\MySQL Server 5.5\data Então, criei um BD chamado biblioteca, para ver onde iria ser criado o BD e as tabelas... foram criados dentro do endereço acima criando uma pasta chamada "biblioteca"... Peguei o meu backup dos FRM e copiei para dentro de C:\ProgramData\MySQL\MySQL Server 5.5\data\LogosPBData Abrei o WorkBench, fiz uma conexão com o BD, e pronto, listou as tabelas... BELEZA... Mas ai veio o problema... Não estão todas as tabelas listadas... e olhando a data delas me assustei mais ainda, pois as datas são do ano de 2013, ano em que criei elas... Depois disso evidentemente fiz inúmeras alterações nas tabelas, sempre usando o WorkBench. Claro que se eu tivesse um script de criação das tabelas o problema estaria resolvido.. mas infelizmente não tenho!!! Será que usando o WorkBench as tabelas ficam em alguma pasta diferente?? Então, peço encarecidamente aos colegas que se alguém, dentro de suas disponibilidade, tem alguma sugestão, ideia, opinião ou dica para que o caso seja resolvido que me ajude. Desculpem o texto longo, tentei explanar o caso o mais detalhado possível. Att. Everton Battiston

Rapaziada.. Obrigado pelas dicas.. fiquei impossibilitado de entrar no fórum hoje durante o dia, alias, desde ontem no final da tarde... Blz Rochinha.. Vou tentar colocar a extenção "DBF" Valeu Theotokos e Kapiaba.. Vou colocar o Set Order to 01, apesar de que no teste eu coloquei "Set Order to TAG 01" e funcionou... Att. Everton

Boa tarde pessoas. Resolvi tentar dar um up num programa que usava NTX e coloquei o CDX. Pesquisei aqui no forum e fiz a alteração A princípio fiz um teste com um arquivo.. "naveguei" pelos dados do arquivo e tudo parecia bem.. então resolvi mudar todos os indices.. Mudei mas agora ta dando um erro, no arquivo de usuários e no arquivo da configuração das estações. * Segue o código de abertura do arquivo. if file( "DSGV00.KI" ) use "DSGV00.KI" alias "Operador" new shared * if !file( "DSGV00A.CDX" ) Index On Operador->USU_CODI TAG TAG01 To DSGV00A.CDX endif else MsgAlert( "Atenção, deu erro!"..: Erro na Abertura :.." ) endif * set order to TAG TAG01 if !dbseek( "9999" ) rlock() append blank replace USU_CODI with "9999",; USU_SEN1 with encrypt( "123456", "A1B2C3" ),; USU_NOME with "ADMINISTRADOR",; USU_CADA with date() endif O erro acontece na linha do DBseek(). Diz "Work area not indexed" Alguém poderia me dizer o que estou fazendo de errado? Att. Everton

Bom pessoal.. A minha tentativa era ter captar as teclas digitadas e trata-las para ver se coincidiam com a senha.. mas uma coisa absolutamente invisível.. sem get, sem beep, sem tremelique... no final das contas, apesar de todas as ajudar do Kapiaba, ainda assim não era beeemmmmm isso que eu esperava... então fiz uma coisa que deu absolutamente certo... usei a ideia do Kapiaba, criando uma Dialog, e dentro dela um get só que como trabalho com @, mandei criar esta DIALOG com valores negativos... tipo: Define DIALOG oForm_AcsRem TITLE "" style 2; FROM -180, -166 to -10, -35 PIXEL COLOR 0, 15790320 cara.. deu certinho... o DIALOG fica invisível porque fica numa região que não tem como aparecer... a partir disso trato o lance da senha normal... pois dentro deste DIALOG "invisível" tem um get.. e ai brother.. uso o nkey pra ver o que o cara digitou... ficou loco o baguio!

hahahaha.. não seja disfarçado rapaz!!! Esse negócio de jumento sei que foi só pra descontrair... faço muito disso tambem!!! hahahahah mas como moro em SC, aqui se usa muito o "tongo"... hahahahaha Cara, vou mudar um pouco a cabeça do cliente... é muita crise por causa de uma senha... mas isso me fez pensar.. Tem uma maneira de parar a execução do software? Tipo o inkey() do Clipper? Att. Everton

Cara, obrigado pela dica.. vou experimentar sim... Na realidade já voltei pra casa, mas vou fazer um acesso remoto e ver como fica.. deixei o software executando em "Janela", uma janela bem grande. Mas o cara insiste em querer tela cheia.. agora, imagina um monitor de 17" executando um software em 80x25 em tela cheia!?!? As letras ficam do tamanho de uma caixa de fósforo.. hahahahah Mas vou testar. Att. Everton

Valeu cara... entendi. Mas mostrar um get e pedir a senha e verificar se a senha ta certa.. moleza.. não queria era mostrar o get... Ou será que não entendi teu código e o get não esta sendo mostrado e por isso eu sou, talvez, o tal jumento que se refere nas mensagens?!?! Tipo: do while ii < 5 O sistema fica parado esperando uma tecla ser digitada; sem ter um get na tela,; sem bip,; sem nenhuma coisa. cTec&ii. := tecla digitada ii ++ enddo * if cTec1 + cTec2 + cTec3 + cTec4 == strzero( day(date()) + Month(date()) + year(date() ), 4, 0 ) Msginfo( "Parabéns jumento, acertou a senha!" ) AbreMenu() else MsgInfo( "Ei seu inteligente... errou feio!" ) CaiForaChato() endif