fladimir

idem

Como seria pra não dar aviso do Firewall pq se não pode furar a ideia não? tipo termos q todos os clientes programar na mão o firewalll se der pra fazer via app melhor.

Toya como vc conseguiu decodificar o CAPTCHA??? Passa pra nós!!!

e como chamar no chrome?

Segue resposta do Fernando (via e-mail, recebida hoje)

Valdir realmente o q vc falou enumera uma série de erros no estoque físico, talvez até possamos citar mais algumas situações mas vc colocou bem. O difícil é achar solução pra isso.

O Rochinha postou a classe dele nesse tópico.

vlw

Vamos ver se alguém nos ajuda... acho q o Rochinha sabe algo a respeito mas não tenho o contato dele.

Olá... uso o ACBr e sou assinante do SAC e pelo q li nas últimas postagens o ACBr não faz isto e lá no fórum num tópico mais recente sobre DIFAL q tenho acompanhando houve um questionamento sobre isto e a resposta foi q não geramos. Agora se tem como a gente gerar desconheço.

O Toya pode nos explicar melhor, mas se não estiver engando é um Aplicativo q ele criou pra fazer o Download do XML, resumidamente falando, q de alguma maneira consegue decifrar o Captcha, q é solicitado qdo informamos a chave da NFe ai "precisaria" do captcha tb e esta parte ele faz... Compartilhe conosco Toya como fez... Como diriam "O POVO QUER SABER"

Como?

Compartilha ai conosco tb...

O legal seria DECODIFICAR o CAPTCHA se possível... O Lailton não tinha algo nesse sentido?

Tem colegas q fazem atualização automática aki no fórum... todos são via Tray ou app externo?

Sim dentro do proprio EXE. Não tenho atualização automática geral, pois prefiro atualizar individualmente alguns clientes e deixar rodando e depois atualizar geral. Eu uso a função acima (não para atualizações) mas para Backup, apenas troquei o nome das chamadas para Backup para Atualização, pois o principio é o mesmo no meu ponto de vista. Não testei mas acredito q funcione. Minha preocupação é a questão de dar um Kill na aplicação rodando, pois isso pode ser muito problemático e gostaria de saber do Ariston e demais colegas q assim o fazem como tratam isso, no sentido de q o usuário do sistema pode estar no meio de uma venda ou no meio de um cadastro ou entrada de notas e ai???

Kleyber daria pra fazer em Background, tipo aproveitar a sugestão do Ariston e fazer verificar em background se tem algo no FTP ou Tabela MySQL q seja mais atual e em caso positivo rodar a sugestão do Ariston... Exemplo: function Main() *-- Só executa a atualizacao se veio com parametro pra verificar e nao esta sendo visto isto ainda if Upper(pVez) == 'RotinaVerificacao' .and. Config->VendoAtu != 'S' VerificaAtualizacao() // quit endif .... código *-- Pra BackGround caso sistema inativo #include "hbthread.ch" Public nTask, nIdle Public nTimeEspera := 900 // (tempo em segundos) 900 = 15 min Public nTempo := ( Seconds() + nTimeEspera ) nTimeEspera := Config->TempoVerificaAtu nTask := HB_BackGroundAdd( {|| ChecaTempoCorrido() } ) nIdle := HB_IdleAdd( {|| HB_BackGroundRun( nTask ) } ) *-- No final chama as rotinas pra desativar... .... *-- Pra desativar o BackGround HB_BackGroundDel( nTask ) // coloque antes de sair do sistema HB_IdleDel( nIdle ) return nil //------------------------------------------------------------------------------ * Função para controle de rotinas em BackGround function ChecaTempoCorrido() local cTelaChkTime if ( NextKey() > 0 ) nTempo := Seconds() elseIf Seconds() >= ( nTempo + nTimeEspera ) // se ficou ocioso pelo tempo determinado... HB_BackGroundDel( nTask ) // remove as acoes da Idle evitando recursividade HB_IdleDel( nIdle ) *-- Só roda se nao foi feito verificacao no dia. if .not. lVeSeTemAtu MyRun( 'TeuEXE RotinaVerificacao', .F.) // Aki abre uma copia do teu EXE em background com um parametro X q é verificado no inicio do sistema endif nTempo := Seconds() // atualiza nTempo nTask := HB_BackGroundAdd( {|| ChecaTempoCorrido() } ) // reativa a idle nIdle := HB_IdleAdd( {|| HB_BackGroundRun( nTask ) } ) endif return Nil ********************************************************************************************************************** function VerificaAtualizacao() if Config->VendoAtu == 'S' // se Esta Verificando não continua return .f. endif ... Se for FTP ftpServer := 'teuservidorFTP.no-ip.org' // caminho do FTP ftpUser := 'usuario' // usuario do FTP ftpPass := 'senha' // senha de acesso do FTP ftpPorta := 21 cURL := 'ftp://' + ftpuser +':'+ ftppass +'@'+ ftpserver *-- Atencao importante tipclient versoes __XHARBOUR__ < 1 e tipclientftp >1 oURL := TURL():New(cUrl) oCred := TIPCredentials() oFTP := TIPClientFTP():New(oUrl,,.T.) oFTP:nConnTimeout := 20000 oFTP:nDefaultPort := ftpPorta if .NOT. Inetestaconectada() //-> Verefica se tem acesso a internet Fim_Run() Return .F. endif *-- Marca q j tem 1 terminal rodando Config->VendoAtu := 'S' *--------------------------------------------------- ... Rotina pra verificar se tem arquivo no FTP e se é mais atual ... Se sim baixa e entra na sugestão do Ariston comparando as versões e rodando o BAT ... Se for por MySQL ... Conecta no Banco, abre Tabela, verifica se tem registro de nova versão ... Caso tenha, pega informações, compara com as da versão q esta sendo executada ... Caso versao nova vai pra sugestão do Ariston rodando BAT. *-- Marca como nao executando Config->VendoAtu := 'N' return .T.

Ariston, a forma q vc usa seria um mix do q o Marca falou e a sugestão do Kill q eu falei... blz entendi, mas minha dúvida é se isso é executado por um EXE q fica tipo no tray monitorando ou se teu app fica verificando... Acredito q pela forma disposta no código q vc apresentou seja em um EXE externo, mas a dúvida seria, pelo q entendi q ele perguntou, é se vc ou alguém conhece uma forma de fazer isso a partir do próprio EXE.

Talvez não seja a melhor opção o q vou dizer, mas eu entendi q vc não esta conseguindo renomear o teu sistema ou deletar pra rodar a nova versão pq esta em execução correto? E se vc dar um Kill no processo do teu sistema não resolveria?

Marcelo, acredito q a solução no blog q ele falou se refere a este link []´s

Vlw Luis por compartilhar o Link das video aulas do App Inventor e muito mais! Grato []´s

Aproveito para parabenizar o sucesso q vem tendo na mudança, não consigo me ver portando meus sistemas tão rapidamente de uma linguagem para outra, mas isto é assunto pra outra hora e tópico, só não entendi direito qdo vc mencionou Lazarus e depois Delphi, pq até onde eu sabia o Lazarus era Free e o Delphi não, mas enfim isso não seria o foco do tópico. É uma opção o q vc fez, mas se encontrassemos algo q contemplasse Mobile e nossa linguagem seria melhor... Sei q pode ser difícil e talvez nem exista mas tb pode ser q exista por ai afora e não conheçamos, como citei acima o Genexus e o Lianja, ambos desconhecidos pra mim, mas quem sabe algum outro colega utiliza com sucesso e não precisemos migrar radicalmente de linguagem, dos 2 acima o Lianja, pelo q olhei rapidamente, tem uma impressão melhor. []´s

Tem tb o tal do Lianja q pelo q eu li foi feito para aproveitar os programadores FoxPro q a Microsoft deixou de dar suporte, ou seja, pelo q li e entendi utiliza a sintaxe xBase tb além de outras integrações e facilidade para integrar com Mobile etc. Acho q vale a pena o pessoal ler e tirar suas conclusões ou se alguém já conhece compartilhar conosco a experiência.

E o Genexus alguém conhece/usa? http://www.genexus.com/productos/genexus?pt

Procure na pasta do sistema q será convertido ou na maquina q tem ele se tem o DataFlex instalado, vc precisará dele. Se não tiver teria q conseguir, eu não tenho. Com o Dataflex vai executando os EXE q tem (não lembro o nome exato), tem um q abre tipo o antigo DBASE (não sei se vc chegou utilizar) ai vc digita um HELP q aparece os comandos. Vc precisará usar um comando q te permite fazer Relatórios, ai ele vai listar as tabelas (DAT) vc escolhe a q vc quer e as colunas (campos) e se todos os registros e o formato q irá gerar TXT Lembro q na época bati muito a cabeça, mas se tiver o Dataflex na maquina e vc seguir as informações acima e analisar as mensagens q vão aparecendo (tudo ingles - qualquer coisa se não souber usa o Translate do Google q resolve) Resumindo achar qual EXE permite fazer os relatorios... depois HELP (em caso de dúvidas) escolher as tabelas... colunas.... todos os registros... gerar TXT... Ai com os TXT em mãos vc consegue importar usando comandos xBase q conhecemos. Desculpe não poder ajudar mais q isso.