helio1361303486

Olá companheiros de ideal. Sempre trabalhei com programação e quando surgiu a primeira exigência do Cupom Fiscal e do TEF, homologuei e passei na segunda instância. Até cheguei instalar o software registrado num cliente. Mas depois começou os bombardeios do governo com tantas exigências onde o programador tinha que assinar uma IOB ou mapa fiscal para não "pecar" e levar bomba com sonegação de alguma informação. Em fim, fiquei tão desmotivado que abandonei a programação faz 2 anos. E acreditem, sem ter para onde ir de imediato resolvi vender lanches(HotDogs) e olha estou me virando até que bem. Mudança radical, mas me fez um bem enorme !. Hoje vejo gente, vendo o lanche a pessoa adora e ele vai embora contente e não tem que ter "casamento" com ele. pois o software é um casamento até que se quebre o contrato. Estou a disposição para somar as idéias dos amigos referente a cooperativa. Moro Em SP, não sei se ainda vale mas estou pertinho das empresas onde homologam os softwares. Estou bem no centro, onde o comércio ferve, sempre quis oferecer algo que falece realmente a pena para o cliente, e se esse produto estiver ao meu alcance poderei até tentar representá-lo aqui. Ou até programar um pouquinho para não enferrujar., pois tenho tempo livre agora. Fica ai meu recado. E fico feliz por vocês estarem se unindo para se ajudarem. Isso é bastante nobre. Abraço a todos, Deus abençoe.

SQL é inevitável, sabemos disso. Mas para quem "AINDA" usa DBF e por algum outro motivo qualquer(que conhecemos ou desconhecemos), não pode POR ENQUANTO, utilizar as maravilhas do SQL... então é sim bem vinda as soluções de segurança mesmo que razas para o DBF. Tem programador que não tem tempo nem de almoçar, pelas cobranças de que lhe são impostas(e não é por causa do banco não). E o sonho de todo programador é sim deixar sua base de dados forte e robusta e acessar pela internet e tra-lálá. Mas, enquanto este pobre mortal ainda não PODE colocar o SQL, ele pode melhorar um tiquito com DBF que NÃO vai ser pra sempre é CLARO. Então... já que o assunto de segurança do DBF já esta se desintegrando... e acredito que muitos aqui que usam DBF já estão adotando esta solução...Podemos então continuar discutindo o assunto para o SQL que é o futuro vai. Iremos anotar e quando chegar a hora usaremos com certeza. Grato à todos que colaborarem. Abraços. Hélio xHarbour/WS/PellesC

Amigos, Nada é perfeito, somente Deus, nem Jesus agradou todo mundo. Até MySQL, Postgree, Firebird...etc, todos tem suas falhas, claro que são em muitos apectos superiores, mas perfeitos não são não. Tem bug pra todo que é lugar, até no windows tem ! Em se tratando de informática, muita coisa pose ser revertida. Então...Acredito que vale a tentativa, e se alguém tiver uma melhor alternativa ou idéia sem usar SQL para quem usa DBF, que apresente, será muito bem vinda, vamos acrescentar e fazer o que se pode fazer. e vamos que vamos. Abraços. Hélio xHarbour/WS/PellesC

Feliz Natal e Ano Novo à todos ! Mas, se o ano novo não for muito feliz, e se não for melhor que o ano anterior, e se não der certo aquele plano que fizemos, TAMBÉM temos que agradecer, pois DEUS sabe o que faz, e sabe o que merecemos mesmo antes de nós vo-lo ter pedido. Muitas vezes as graças de que pleiteamos e pedimos NÃO são o remédio de que precisamos. Imagine, dependendo da "cólera" o médico faz o paciente sofrer as dores da cirurgia para CURÃ-LO. O Pai que leva seu filho ao dentista, sabendo que ele irá sentir dor, grande medo e aflição, mas mesmo assim o pai que tanto o ama, o leva, pois sabe que é para o bem de seu filho. Assim também age Deus, sendo justo para com seus filhos amados. Então... Sejamos dignos de que recebemos, tanto as facilidades quanto as dificuldades. "São nos nossos PIORES momentos que estão as MELHORES oportunidades de melhoramento" Deus nos quer feliz e ele sabe que seremos felizes um dia se não o somos hoje, pois somos seus filhos queridos e amados. Vamos aprender a obedecê-lo, e ganhar a tão aclamada felicidade !!! "merecida". Feliz Aniversário de Jesus Cristo. Paz, Amor e muita Luz São meus sinceros votos, Hélio xHarbour/WS/PellesC

Amigos, Não entendi direito. o que isto afeta? Quer dizer que dá para reverter o arquivo protegido fora do nosso sistema? Hélio xHarbour/WS/pellesC

Seria um sonho realizado se terminassem esse projeto http://www.fivetechsoft.com/forums/viewtopic.php?t=12645&postdays=0&postorder=asc&highlight=sqlwin&start=0 Abraços. Hélio xHarbour/WS/PellesC]

Seria um sonho realizado se terminassem esse projeto http://www.fivetechsoft.com/forums/viewtopic.php?t=12645&postdays=0&postorder=asc&highlight=sqlwin&start=0 Abraços. Hélio xHarbour/WS/PellesC]

laurenti e lailton.webmaster, Pode faltar energia com o sistema aberto. Pode dar CTRL+ALT+DEL e fechar o programa. Nada disso ira afetar, pois o banco de dados fisicamente esta protegido, o que acontece é que a desproteção fica apenas na memória, quando vc faz isso: Desprotege("C:\clientes.DBF") //função que vc cria para desproteger USE CLIENTES ALIAS SHARED... INDEX ON.... Protege("C:\clientes.DBF") //função que vc cria para proteger . . Depois disso pode seguir seu sistema normalmente, até em rede, gravando, excluindo, que o banco de dados estará protegido lá no D.O.S. e mesmo assim será atualizado, não me pergunte como, mas os testes que fiz aqui provaram isso. Conclusão: O tempo todo o DBF fica protegido, quando nos referimos à ele via sistema como acima, o mesmo abre na memória e pode fazer as manipulações que precisar, Por isso pode "quebrar" o sistema aberto no meio, que o banco estará protegido na volta. Uma Idéia: Como os "programadores" as vezes precisam dos DBFs desprotegidos para pesquisas no DBU etc.., pode-se criar um .EXEzinho só para desproteger ou proteger TODO o conteúdo da pasta dos DBFs, aí faz-se o que precisa e depois é só executar o .EXEzinho para proteger novamente. Isso Ajudará muito. E servirá para dar partida no sistema, já protegendo todos dbfs da pasta, indepedente da rotina de abertura como acima. Gostaria que mais de vocês fizessem o teste de proteção, e comentassem. Kapiaba, que presente heim amigo !!!! FELIZ NATAL PARA TODOS !!! QUE DEUS NOS ABENÇOE. Abraços. Hélio xHarbour/WS/PellesC

Nossa !!! Sem palavras. Estou pasmo !!! FUNCIONA BELEZA !!! A tempos venho aqui mesmo procurando uma solução para proteger DBFs. Meus queridos, agora pensem comigo: Os DBFs são extremamente velozes, mas pecava na segurança, qualquer um editava o arquivo, dava TYPE e aparecia tudo, deste a estrutura até os dados dos campos, isso ERA um problema. Agora com essa rotina, nem com TYPE, nem com DBU, nem com ACCESS aparece alguma coisa. Tudo fica escondido e protegido. E digo mais, testei na rede e funciona muito bem. Vagner, realmente com o APPEND BLANK ele desbloqueia automático, mas é como você disse, é só bloquear novamente depois dele que tá tudo protegido novamente. Em fim, uma solução, mesmo com o sistema aberto e usando o arquivo, este mesmo esta bloqueado externamente !!! Não sei se estou exagerando, mas agora o DBF não deve muito para o SQL. "acesso via internet ??", use CGI+HTML e nem precisa o acesso no sistema todo, faz apenas o que interessa para ficar on-line, com uma simples página HTML+CGI, tem o WebWap do Vagucs que tá show, e tem outros. E as senhas encyptadas no campo do dbf !!! agora nem precisa mais encryptar, é só bloquear e pronto, TUDO fica oculto inclusive o campo senha. rs !!! Maravilha !!! Parabéns !!! Só uma dúvida: Os comandos a seguir, faz o bloqueio/desbloqueio. Mas se algum expert em clipper, fizer um .exe com esses códigos e direcionar para o DBF.... o mesmo não será desbloquado?? Mesmo assim, já tá bom dimais. If FRead(nHandle,@cBuffer,32) == 32 If lPro // Proteger If SubStr(cBuffer,1,1) # Chr(26) cBuffer := Chr(26)+SubStr(cBuffer,1,31) Endif Else // Desproteger If SubStr(cBuffer,1,1) == Chr(26) cBuffer := SubStr(cBuffer,2,31)+ Chr(0) Endif Endif FSeek(nHandle,0) FWrite(nHandle,cBuffer,32) Endif FClose(nHandle) Agora, vamos ver o que mais dizem. Abraços. Hélio xHarbour/WS/PellesC

Amigos, o SqlRdd funciona com qual versão do FWH e xHarbour FREE? o Exemplo que esta no site deles só funciona com xHarbour 0.9.71 ? Ele conecta com o banco firebird normal, mas na linha em que dá o use: USE "CLIENTES" EXCLUSIVE VIA "SQLRDD" Dá erro de GPF, e fecha a aplicação de teste. Alguém sabe com resolver isso ? Abraços. Hélio xHarbour/WS/PellesC

Amigos, o SqlRdd funciona com qual versão do FWH e xHarbour FREE? o Exemplo que esta no site deles só funciona com xHarbour 0.9.71 ? Ele conecta com o banco firebird normal, mas na linha em que dá o use: USE "CLIENTES" EXCLUSIVE VIA "SQLRDD" Dá erro de GPF, e fecha a aplicação de teste. Alguém sabe com resolver isso ? Abraços. Hélio xHarbour/WS/PellesC

marcosgpv, Você me parece um bom conhecedor de programação e deve ter bastante experiência. Se achegue mais e com calma conheça o FiveWin xHarbour e você irá ver que tudo que aprendeu poderá fazer com ele, e somará. Já deu pra ter idéia de seus seus conhecimentos, agora pergunte suas dúvidas que nossos amigos de plantão não deixarão na mão. Já vi dúvidas aqui que dá nó, e não ficaram sem respostas. No mais, Paz. e seja bem vindo. Hélio

Calma, Calma... Todo programador/Analista etc. do ramo, dás veiz fica assim com os nervos à flor da pele. È natural ter esse "acesório" que vem junto com o aprendizado.rs. Depois de tudo, depois de termos gritado montão, a gente volta pra mesinha e programa que é uma beleza, e até compila coisa que nem sabe o que é, só pra ver o que dá, tá no sangue da gente. rs. Você pode fazer um sistemão que faz coisão de tudo que é jeitão e é o fenomenão. Mas vc sempre cai na vontade de ver o sisteméco que muitas vezes tem algo que precisamos e que ainda não sabemos e que pode fazer o sistemão funcionar mais legalzão. Nada tem tudo e tudo não tá com nada. Mas o FiveWin é tudo di bom. faz muita coisa boa, e o melhor desse foro que até desabafo dos colegas aceita. ôooooo amparo sô. Abraços e que Deus nos ampare. Hélio

Alexandre, Mencionoi 50,00 por 3 vezes. Tem 50,00 pra me emprestar aí? rsss. brincadeirinha.:-) Concordo com o que disse, tudo bem que o Brasil esta dificil uma colocação no mercado de trabalho que valorize nosso trabalho e pague o justo. Mas realmente tem alguns programadores que vendem o "sistema" por bacatelas, e isso detona o mercado de quem é sério e assume compromisso com o cliente, Tendo que baixar os preços por causa da desordem que esses causam ao mercado de software. Cupom Fiscal, TEF, etc. é coisa muito séria, exite tempo, estudo de leis(o mais chato), paga-se taxas e ainda somos conivente se nosso sistema tiver uma falha e o cliente se aproveitar disso para sonegar. Aíiii o caldo entorna. A culpa cai sobre o desenvolvedor. Cuidado meus amigos, a legislação que rege os sistemas fiscais, esta cada dia mais rígidos, estão fechando o cerco, e está perigoso trabalhar nessa área. Mesmo que vc tenha boas intensões, uma lei passa desapercebida e seu sistema não esta preparado aí, BUM !! tái vc pagando CARO por isso. Meu conselho é que sempre acompanhe as portarias de leis e noticiários diversos. Para ficarem na linha do correto. Sabe. tá certo que no Brasil os impostos são muito caros, mas veja, certo é certo, Não é porque o rico é rico que vamos roubá-lo. Se o dinheiro vai para Educação, Saúde etc.. ou não. Aí é um problema que eles terão de prestar contas com DEUS. Puxa andei zarpando na maionese. rs... Abraços ao queridos amigos dessa profissão que dá pano pras manga viu. rs Hélio xHarbour/WS/PellesC

Alexandre, Pois é, para quem tem instalador demonstrativo do sistema fica difícil com o pacote pesado de instalação do MySQL. Então vender não pode ! aí aferrou-se. Melhor usar o PostGrees e o FireBird que é totalmente free. e no caso do FireBird vc consegue facilmente colocar no instalador do seu sistema usando o InnoSetup, fica show, ele instala tudo em off, sem ninguem ver e não pede nada de AVANÇAR etc. é tudo silencioso. e Instala junto com seu sistema, e pronto. é só executar não precisa configurar nada! Existe uma fome para usar o MySQL, mas sendo dessa forma a licença, não dá, tem que usar outros free, é minha opnião. Mas vamos ver no que aparece de novidade. Julio, Estou vendo no link que indicou, realmente se puder instalar compacto aí é vantagem. Aí vem a pergunta, ele funciona o trivial? ou seja local e remoto? Abraços. Hélio xHarbour/WS/PellesC

Existe instalação do MySQL compacto de menos de 2mega? Se não. Como esta a instalação atualmente o MySQL? ainda continua pesada e complicada para colocar no servidor? E ainda tem aquelas dúvidas se é realmente free ou não, não podendo colocar junto à nosso sistema para distribuição. Abraços. Hélio xHarbour/WS/PellesC

Existe instalação do MySQL compacto de menos de 2mega? Se não. Como esta a instalação atualmente o MySQL? ainda continua pesada e complicada para colocar no servidor? E ainda tem aquelas dúvidas se é realmente free ou não, não podendo colocar junto à nosso sistema para distribuição. Abraços. Hélio xHarbour/WS/PellesC

Ronaldo, Muito bom. Era isso aí mesmo que estava faltando. Agora. Dá para imprimir imagens/fotos via comandos de troca também? colocando logotipos no topo sem ser via o editor e sim via comando na classe? Hélio xHarbour/WS/PellesC

José Carlos, Não achei para editor de texto, só tem para planilhas, assim como nas dicas aqui do forum. Será que ninguem ainda usou textos integrados com xharbour com o OppenOffice? Hélio xHarbour/WS/PellesC

FUNCTION ChecaInternet() LOCAL Value:=0, retval:=0 Value:=0 retval:="" if !InternetGetConnectedState(@value,0) if MsgYesNo("Você não Esta Conectado à Internet, Deseja Conectar-se agora ?") retval:=InternetDial(GetActiveWindow(),,2,@value,0) if retval<> 0 DO WHILE .T. retval:=InternetDial(GetActiveWindow(),,2,@value,0) if retval<> 0 if MsgYesNo("Conexão não disponível, Verifique sua configuração de Internet ou tentar novamente ?") LOOP endif endif exit ENDDO if !Conectado MsgStop("Conexão não disponível, Verifique sua Configuração da Internet !") Return(.f.) endif endif else MsgStop("Conexão não disponível, Verifique sua Configuração da Internet !") Return(.f.) endif endif Return(.t.) DLL32 FUNCTION InternetGetConnectedState( @LpDwflags AS PTR, Dwreserve AS LONG) AS BOOL PASCAL LIB "WinINet.dll" DLL32 FUNCTION InternetDial( Hwnd AS LONG, Cconnect AS LPSTR, Dwflag AS LONG, ; @Dwconnect AS PTR , Dwreserve AS LONG) AS DWORD ; PASCAL LIB "WinINet.dll"

Júlio, Agradeço, mas nesse link, só mostra como lidar com as PLANILHAS eletrônicas(util também), mas não tem para EDITOR de TEXTOS igual o Word que é o que preciso, que no caso do OpenOffice é o Writer. Abraço. Hélio xHarbour/WS/PellesC

Encontrei uma classe para OpenOffice aqui no forum, mas é só para PLANILHAS. Queria para Word, que no caso do OpenOffice é o Writer. A clase TWord esta funcionando bem. só precisava a mesma coisa para o OpenOffice. grato. Hélio xHarbour/WS/PellesC

Encontrei uma classe para OpenOffice aqui no forum, mas é só para PLANILHAS. Queria para Word, que no caso do OpenOffice é o Writer. A clase TWord esta funcionando bem. só precisava a mesma coisa para o OpenOffice. grato. Hélio xHarbour/WS/PellesC

Ronaldo, Fiz assim e funcionou: oWord:AddImagen( 0, 0, 80, 80, "c:\foto.jpg") Agora... será que a Tword, funciona com o OpenOffice? Porque nem todo mundo pode ter o word no computador. xHarbour/WS/PellesC

Dá para colocar uma foto no documento Word através da TWord? Tipo assim: oWord:Replace( "[FOTO]" ,"C:\FOTOS\FOTO.JPG" ) Não queria ter que colocar a foto via Word, e sim via programação. Grato. Hélio xHarbout/WS/PellesC