FiveWinBr
-
Posts
421 -
Joined
-
Last visited
-
Days Won
1
Posts posted by FiveWinBr
-
-
Eu montei uma versao do FiveWeb e estou usando a em varios projetos.
Funciona 100%.
No projeto uso RC ( crio as telas pelo Pelles )
Estou montando uma nova versao agora melhorada, breve terei mais informacoes.
Tambem estou trabalhando em um projeto chamado "Mobile for Harbour" onde o mesmo codigo funciona tanto para Android/iOS
O projeto ja esta em 90%Minha ideia é criar algo facil de trabalhar e compativel com todos os OS
-
Boa noite,
Conversei hoje com o Antonio Linares e já esta confirmado para o proximo encontro internacional ocorrer no brasil.
Ainda não esta definido data nem local, mais ele estara falando com o Gilmer em breve.
Comentem, qual a melhor cidade/estado para o evento, quais os temas?
https://www.facebook.com/fivewin/
Tenho visto muitas pessoas falando sobre o fivetouch, fivewin entre outros, agora podemos falar com ele sobre os mesmos -
Adicionado!
-
Sim,
Código completo (PRG) sem dll. -
Oziel,
Apartir da versao 2.6, Utilizo na versao 16.02.
Vi que no seu post vc usa a 6.12 tambem é compativelAbraço.
-
Demo:
https://www.dropbox.com/s/7lgvuu5lkqkv76q/ribbon.rar?dl=0
Compativel com qualquer versao do fivewin. -
O demo foi feito usando FiveWin 14.2 / xHarbour / Bcc582.
Custo do source 300,00.
O mesmo pode ser alterado para consulta de CPF e CNPJ.
-
-
Boa tarde,
Estou em busca de trabalhos freelancer, se alguém precisa de algum tipo de rotina, ou qualquer trabalho voltado
a programação web/desktop estou a disposição.
E-mail/Skype: suporte@lailton.com.br
Obrigado.
-
Crisvam,
Utilizo no harbour mais tem no xHarbour tambem
-
SHA1
PROCEDURE Main() ? ">" + hb_SHA1( "hello" ) + "<" ? ">" + hb_SHA1( "hello", .F. ) + "<" ? ">" + hb_SHA1( "hello", .T. ) + "<" ? ">" + hb_HMAC_SHA1( "hello", "key" ) + "<" ? ">" + hb_HMAC_SHA1( "hello", "key", .F. ) + "<" ? ">" + hb_HMAC_SHA1( "hello", "key", .T. ) + "<" RETURN
Exemplo 2
PROCEDURE Main() ? "SHA-2 FIPS 180-2 Validation tests" Test_SHA2() ? "HMAC-SHA-2 IETF Validation tests" Test_SHA2_HMAC() RETURN STATIC PROCEDURE Test_SHA2() LOCAL cMsg1 := "abc" LOCAL cMsg2a := "abcdbcdecdefdefgefghfghighijhijkijkljklmklmnlmnomnopnopq" LOCAL cMsg2b := "abcdefghbcdefghicdefghijdefghijkefghijklfghijklmghijklmnhijklmnoijklmnopjklmnopqklmnopqrlmnopqrsmnopqrstnopqrstu" LOCAL cMsg3 := Replicate( "a", 1000000 ) LOCAL results := {; {; /* SHA-224 */ "23097d223405d8228642a477bda255b32aadbce4bda0b3f7e36c9da7" ,; "75388b16512776cc5dba5da1fd890150b0c6455cb4f58b1952522525" ,; "20794655980c91d8bbb4c1ea97618a4bf03f42581948b2ee4ee7ad67" },; {; /* SHA-256 */ "ba7816bf8f01cfea414140de5dae2223b00361a396177a9cb410ff61f20015ad" ,; "248d6a61d20638b8e5c026930c3e6039a33ce45964ff2167f6ecedd419db06c1" ,; "cdc76e5c9914fb9281a1c7e284d73e67f1809a48a497200e046d39ccc7112cd0" },; {; /* SHA-384 */ "cb00753f45a35e8bb5a03d699ac65007272c32ab0eded1631a8b605a43ff5bed8086072ba1e7cc2358baeca134c825a7" ,; "09330c33f71147e83d192fc782cd1b4753111b173b3b05d22fa08086e3b0f712fcc7c71a557e2db966c3e9fa91746039" ,; "9d0e1809716474cb086e834e310a4a1ced149e9c00f248527972cec5704c2a5b07b8b3dc38ecc4ebae97ddd87f3d8985" },; {; /* SHA-512 */ "ddaf35a193617abacc417349ae20413112e6fa4e89a97ea20a9eeee64b55d39a2192992a274fc1a836ba3c23a3feebbd454d4423643ce80e2a9ac94fa54ca49f" ,; "8e959b75dae313da8cf4f72814fc143f8f7779c6eb9f7fa17299aeadb6889018501d289e4900f7e4331b99dec4b5433ac7d329eeb6dd26545e96e55b874be909" ,; "e718483d0ce769644e2e42c7bc15b4638e1f98b13b2044285632a803afa973ebde0ff244877ea60a4cb0432ce577c31beb009c5c2c49aa2e4eadb217ad8cc09b" } } ? StrToHex( hb_SHA224( cMsg1 ) ) == results[ 1 ][ 1 ] ? StrToHex( hb_SHA224( cMsg2a ) ) == results[ 1 ][ 2 ] ? StrToHex( hb_SHA224( cMsg3 ) ) == results[ 1 ][ 3 ] ? StrToHex( hb_SHA256( cMsg1 ) ) == results[ 2 ][ 1 ] ? StrToHex( hb_SHA256( cMsg2a ) ) == results[ 2 ][ 2 ] ? StrToHex( hb_SHA256( cMsg3 ) ) == results[ 2 ][ 3 ] ? StrToHex( hb_SHA384( cMsg1 ) ) == results[ 3 ][ 1 ] ? StrToHex( hb_SHA384( cMsg2b ) ) == results[ 3 ][ 2 ] ? StrToHex( hb_SHA384( cMsg3 ) ) == results[ 3 ][ 3 ] ? StrToHex( hb_SHA512( cMsg1 ) ) == results[ 4 ][ 1 ] ? StrToHex( hb_SHA512( cMsg2b ) ) == results[ 4 ][ 2 ] ? StrToHex( hb_SHA512( cMsg3 ) ) == results[ 4 ][ 3 ] RETURN STATIC PROCEDURE Test_SHA2_HMAC() LOCAL aMsg := {; "Hi There",; "what do ya want for nothing?",; Replicate( hb_BChar( 0xdd ), 50 ),; Replicate( hb_BChar( 0xcd ), 50 ),; "Test With Truncation",; "Test Using Larger Than Block-Size Key - Hash Key First",; "This is a test using a larger than block-size key and a larger than block-size data. The key needs to be hashed before being used by the HMAC algorithm." } LOCAL results := {; "896fb1128abbdf196832107cd49df33f47b4b1169912ba4f53684b22",; /* HMAC-SHA-224 */ "a30e01098bc6dbbf45690f3a7e9e6d0f8bbea2a39e6148008fd05e44",; "7fb3cb3588c6c1f6ffa9694d7d6ad2649365b0c1f65d69d1ec8333ea",; "6c11506874013cac6a2abc1bb382627cec6a90d86efc012de7afec5a",; "0e2aea68a90c8d37c988bcdb9fca6fa8",; "95e9a0db962095adaebe9b2d6f0dbce2d499f112f2d2b7273fa6870e",; "3a854166ac5d9f023f54d517d0b39dbd946770db9c2b95c9f6f565d1",; "b0344c61d8db38535ca8afceaf0bf12b881dc200c9833da726e9376c2e32cff7",; /* HMAC-SHA-256 */ "5bdcc146bf60754e6a042426089575c75a003f089d2739839dec58b964ec3843",; "773ea91e36800e46854db8ebd09181a72959098b3ef8c122d9635514ced565fe",; "82558a389a443c0ea4cc819899f2083a85f0faa3e578f8077a2e3ff46729665b",; "a3b6167473100ee06e0c796c2955552b",; "60e431591ee0b67f0d8a26aacbf5b77f8e0bc6213728c5140546040f0ee37f54",; "9b09ffa71b942fcb27635fbcd5b0e944bfdc63644f0713938a7f51535c3a35e2",; "afd03944d84895626b0825f4ab46907f15f9dadbe4101ec682aa034c7cebc59cfaea9ea9076ede7f4af152e8b2fa9cb6",; /* HMAC-SHA-384 */ "af45d2e376484031617f78d2b58a6b1b9c7ef464f5a01b47e42ec3736322445e8e2240ca5e69e2c78b3239ecfab21649",; "88062608d3e6ad8a0aa2ace014c8a86f0aa635d947ac9febe83ef4e55966144b2a5ab39dc13814b94e3ab6e101a34f27",; "3e8a69b7783c25851933ab6290af6ca77a9981480850009cc5577c6e1f573b4e6801dd23c4a7d679ccf8a386c674cffb",; "3abf34c3503b2a23a46efc619baef897",; "4ece084485813e9088d2c63a041bc5b44f9ef1012a2b588f3cd11f05033ac4c60c2ef6ab4030fe8296248df163f44952",; "6617178e941f020d351e2f254e8fd32c602420feb0b8fb9adccebb82461e99c5a678cc31e799176d3860e6110c46523e",; "87aa7cdea5ef619d4ff0b4241a1d6cb02379f4e2ce4ec2787ad0b30545e17cdedaa833b7d6b8a702038b274eaea3f4e4be9d914eeb61f1702e696c203a126854",; /* HMAC-SHA-512 */ "164b7a7bfcf819e2e395fbe73b56e0a387bd64222e831fd610270cd7ea2505549758bf75c05a994a6d034f65f8f0e6fdcaeab1a34d4a6b4b636e070a38bce737",; "fa73b0089d56a284efb0f0756c890be9b1b5dbdd8ee81a3655f83e33b2279d39bf3e848279a722c806b485a47e67c807b946a337bee8942674278859e13292fb",; "b0ba465637458c6990e5a8c5f61d4af7e576d97ff94b872de76f8050361ee3dba91ca5c11aa25eb4d679275cc5788063a5f19741120c4f2de2adebeb10a298dd",; "415fad6271580a531d4179bc891d87a6",; "80b24263c7c1a3ebb71493c1dd7be8b49b46d1f41b4aeec1121b013783f8f3526b56d037e05f2598bd0fd2215d6a1e5295e64f73f63f0aec8b915a985d786598",; "e37b6a775dc87dbaa4dfa9f96e5e3ffddebd71f8867289865df5a32d20cdc944b6022cac3c4982b10d5eeb55c3e4de15134676fb6de0446065c97440fa8c6a58"} LOCAL keys := {; Replicate( hb_BChar( 0x0b ), 20 ),; "Jefe",; Replicate( hb_BChar( 0xaa ), 20 ),; "",; Replicate( hb_BChar( 0x0c ), 20 ),; Replicate( hb_BChar( 0xaa ), 131 ),; Replicate( hb_BChar( 0xaa ), 131 ) } LOCAL tmp FOR tmp := 1 TO 25 keys[ 4 ] += hb_BChar( tmp ) NEXT FOR tmp := 1 TO 7 IF tmp != 5 ? StrToHex( hb_HMAC_SHA224( aMsg[ tmp ], keys[ tmp ] ) ) == results[ tmp ] ? StrToHex( hb_HMAC_SHA256( aMsg[ tmp ], keys[ tmp ] ) ) == results[ tmp + 7 ] ? StrToHex( hb_HMAC_SHA384( aMsg[ tmp ], keys[ tmp ] ) ) == results[ tmp + 14 ] ? StrToHex( hb_HMAC_SHA512( aMsg[ tmp ], keys[ tmp ] ) ) == results[ tmp + 21 ] /* We don't support these MAC sizes */ /* ELSE mac_224_size = 128 / 8; mac_256_size = 128 / 8; mac_384_size = 128 / 8; mac_512_size = 128 / 8; */ ENDIF NEXT RETURN STATIC FUNCTION StrToHex( cString ) RETURN Lower( cString )
-
Nao sei se é o seu problema, mais vai uma dica, certifique que a libmysql.dll que esta na pasta do seu aplicativo é a mesma que esta na pasta dll do tdolphin, se for outra versao da dll (MySQL) pode ocorrer de algumas funções nao funcionar e da debug fechando o sistema sem erro.
-
Simula o CLICK em determinado objeto dentro do 'browse', no caso acima o botao consultar.
Ferrou o code.
Esta Click() faz o que ?
-
Boa tarde,
Esta errado isso aqui:
* Função : Classe para efetuar o Download do Xml no Portal Nacional
* Data : 20/03/2014 14:00:00 Por : Alain/RanchariaEsta class foi eu quem desenvolvi para fivewin. ao menos coloque o autor correto.
E isso nao faz o download do arquivo, apenas baixa os dados da XML exibida no site, caso queira baixar o arquivo
tera que usar a chave.
-
-
Eu tenho uma classe pronta funcionando com a sitef se tiver interesse entre em contato.
-
-
Boa tarde,
Eu cheguei a fazer uma vez, vou ver se encontro o arquivo e posto para você verificar.No caso a 'class' montava e gerava o .txt e o contador so importava no sistema dele.
tem varios layouts e cada contador segue um padrao, me lembro de ter feito varios layouts diferentes.
vou procurar se achar posto.
-
Boa Kleybao
Aproveitando o embalo, de uma estudada na tdolphin e tente usar SQL nativo sem SQLLIB, você tera um desempenho muito superiorAbraço
-
Tenta com:
MsgRun( 'MySQL Dump','Aguarde...',{||WINEXEC('CMD /C ' +cPathMysql+"\mysqldump -hservidor -uusuario -psenha bd tabela > c:\tabela.sql", 0 )})
-
Oscar,
Um ponto bacana tambem é que o Harbour não tem versão comercial, vejo um maior ganho em recursos nele, ja o xHarbour tem o free e o comercial,
ai ele tem update muito pouco perto do harbour se você analisar.
Ambos sao bons, eu uso harbour porque nao uso sqlrdd, e sim TDolphin que as SQL sao tudo nativo e facil migraçao
Vale apena testar e tirar suas conclusoes, se nao depende do sqlrdd vai de harbour.
-
Oscar,
quanto ao hbmake vc vai ter o hbmk2 no harbour ainda mais facil de usar
eu migrei do xharbour para harbour, ja desenvolvi varios app com ele, o resultado que tive foi aplicativo rodando mais rapido ( mais velocidade nao e; tudo pq nao e corrida xD ), menos consumo de recurso do pc ( memoria etc ).
como deixei de usar o dbf e migrei a SQL ( usando a TDolphin ) fico muito massa.
Vale apena fazer seus testes
-
Utilizo fivewin com windows 8 normal, tanto 32 e 64 bits.
Qual o problema você tem na compilacão ?
-
Oscar,
dentro da pasta: D:\xharbour\source\tip\encoding tem o base64.c e base64.h, compile junto com seu sistema que deve resolver.
certificado digital
in Programação
Posted
Boa tarde,
Eu havia feito alguns ajustes para o Jackson relacionado a isso, acredito que pode te ajudar.
https://github.com/JoseQuintas/sefazclass/blob/master/source/ze_sefazcapicom.prg
Fiz a função para instalar e desinstalar o certificado.
Voce pode personalizar para verficiar as datas tambem e remover o que estiver vencido etc.
Att.
Lailton Fernando Mariano
https://www.harbour.com.br - <lailton@harbour.com.br>