* Posted February 7, 2003 Report Share Posted February 7, 2003 Tenho um arquivo OBJ que gostaria de ABRIR para consertar algo que está errado. acontece que perdi o PRG correspondente a este arquivo. Como Faço ? Quote Link to comment Share on other sites More sharing options...
vagner Posted February 7, 2003 Report Share Posted February 7, 2003 Não Faz..... a não ser que esteja para Clipper Puro, então pode linka-lo com qualquer programa e tentar descompilar como Valkyria Ps.: Coloque pelo menos seu nome. Asterisco não é um bom nome, pois na programação é multiplicador e no DOS pode ser qualquer coisa :þ) Abraços Vagner Wirts São Paulo-Brasil Quote Link to comment Share on other sites More sharing options...
karinha Posted February 7, 2003 Report Share Posted February 7, 2003 Coisa feia Vagner. Ensinando o * a Piratear, Deus queira que ele use um Linkador que o Descompilador não aceite. Este * tá com cara de PEGADINHA... He he he. Assinaod o ######## ou $$$$$$ ou &&&&&& P O D E ? Não é melhor ele escrever o código de novo? Será que ele é Bahiano? João Santos São Paulo-Brasil (11) 3106-2832 Quote Link to comment Share on other sites More sharing options...
alex2002 Posted February 7, 2003 Report Share Posted February 7, 2003 o asterisco, Vc vai ter que linkar com o Rtlink do clipper, senão vc não conseguirá descompilá-lo. Use o RESCUE ele é mais eficiente que o Valkyrie (na minha opnião). Valeu? Um abraço, Alexandre Pereira Quote Link to comment Share on other sites More sharing options...
personal Posted February 7, 2003 Report Share Posted February 7, 2003 Put's... Tenho que concordar... tem cara de pegataria... perder o prg sem perder o obj... lindo... lindo... Oliveira, Sérgio A. PERSONAL - LINS Quote Link to comment Share on other sites More sharing options...
EduViggiano Posted February 8, 2003 Report Share Posted February 8, 2003 Estranho estranho... []´s Edu-DESIS Quote Link to comment Share on other sites More sharing options...
* Posted February 9, 2003 Author Report Share Posted February 9, 2003 citação:Coisa feia Vagner. Ensinando o * a Piratear, Deus queira que ele use um Linkador que o Descompilador não aceite. Este * tá com cara de PEGADINHA... He he he. Assinaod o ######## ou $$$$$$ ou &&&&&& P O D E ? Não é melhor ele escrever o código de novo? Será que ele é Bahiano? João Santos São Paulo-Brasil (11) 3106-2832 id=quote>id=quote> Quote Link to comment Share on other sites More sharing options...
* Posted February 9, 2003 Author Report Share Posted February 9, 2003 citação:Coisa feia Vagner. Ensinando o * a Piratear, Deus queira que ele use um Linkador que o Descompilador não aceite. Este * tá com cara de PEGADINHA... He he he. Assinaod o ######## ou $$$$$$ ou &&&&&& P O D E ? Não é melhor ele escrever o código de novo? Será que ele é Bahiano? João Santos São Paulo-Brasil (11) 3106-2832 id=quote>id=quote>Caro amigo. Não é pirataria não. é burrice mesmo. Sabe aquele dia em vc amanhece inspirado e resolve dar um banho do filho e faz o seguinte: fica com a agua suja e joga a criança fora. foi o que aconteceu comigo. a proposito: não é só vc que tem problemas com o b®ush, o Saddan Hussein Tambem(desculpe a brincadeira). Quanto ao * ficou no cadastro por engano e já faz 830 anos que estou tentando trocar meu username, sem sucesso. GILMER, por favor, mude meu nome para ZECA. Grato Sorte a proposito: o programa é uma função escrita em clipper em que vc joga o numero do CNPJ ou CIC e ele formata, na tela, por exemplo: 53470902000158 retorna 53.470.902/0001-58 e 72881883091 retorna CIC 728.818.830/91 Quote Link to comment Share on other sites More sharing options...
karinha Posted February 9, 2003 Report Share Posted February 9, 2003 Zeca, crie novo NICKNAME, e a PICTURE "@K 99.999.999/9999-99"" Não resolve seu problema ZECA? Não estou entendendo... Abraços. João Santos São Paulo-Brasil (11) 3106-2832 Quote Link to comment Share on other sites More sharing options...
personal Posted February 9, 2003 Report Share Posted February 9, 2003 Amiguinho... pero si pero no... faz assim que funciona, melhor que abrir qualquer obj. _cpf := sua_variavel _tmp := "" // limpa não numéricos for x = 1 to len( _cpf ) if subs( _cpf, x, 1 ) $ '0123456789' _tmp := _tmp + subs( _cpf,x,1 ) endif next _cpf := _tmp if len(_cpf) > 11 _cpf := strzero( val( _cpf ), 14 ) else _cpf := strzero( val( _cpf ), 11 ) endif If (Len (allTrim(_cpf)) == 11) _cpf := Subs(_cpf,1,3) + "." + Subs(_cpf,4,3) + "." + Subs(_cpf,7,3) + "-" + Subs(_cpf,10,2) + Space(04) ElseIf (Len (AllTrim(_cpf)) == 14) _cpf := Subs(_cpf,1,2) + "." + Subs(_cpf,3,3) + "." + Subs(_cpf,6,3) + "/" + Subs(_cpf,9,4) +"-" + Subs(_cpf,13,2) EndIf Return(_cpf) Você tambem poderia ter compilado seu .obj com /p que abriria um arquivo .ppo, nele voce teria toda a sua programação, alias, se existe este .obj, porque esle não está em sua lib. ??? continuo na duvida. Oliveira, Sérgio A. PERSONAL - LINS Editado por - personal on 09/02/2003 21:27:38 Quote Link to comment Share on other sites More sharing options...
siscat Posted February 10, 2003 Report Share Posted February 10, 2003 Zeca, se seu OBJ faz somente a formatacao do CGC/CPF faz o seguinte: Function XYZ(cCod) Local cRet If Len(AllTrim(cCod)) == 14 // todo CGC tem 14 posicoes cRet := Transform(cCod, '99.999.999/9999-99') ElseIf Len(AllTrim(cCod)) == 11 // todo CPF tem 11 posicoes cRet := Transform(cCod, '999.999.999-99) Else // aqui pode ter uma mensagem de advertencia !!!! cRet := Space(0) EndIf Return(cRet) Facil neh... abracos... Marllon Figueiredo Analista de Sistemas ERP/CRM Porto Alegre - RS marllonfigueiredo@globo.com Quote Link to comment Share on other sites More sharing options...
eajunior Posted February 11, 2003 Report Share Posted February 11, 2003 so avisando o Sergio da PERSONAL de que so pode utilizar a opção /p se estiver compilando os prgs para obj. no caso de obj so serve para criar o exe. Mas tambem acho estranho alguem querer descompilar um obj gerado por programa que ele mesmo fez e pelo que disse e muito simples e rotineiro. Quote Link to comment Share on other sites More sharing options...
personal Posted February 12, 2003 Report Share Posted February 12, 2003 Falha nossa... eu pensei em uma coisa e escrevi outra. Mas o amiguinho *** já recebeu duas maneiras de resolver seu simplésimo (acho que é assim) problema. Oliveira, Sérgio A. PERSONAL - LINS Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.