Jump to content
Fivewin Brasil

vagner

Membros
  • Posts

    4,981
  • Joined

  • Last visited

  • Days Won

    9

Everything posted by vagner

  1. Fala Evandro, blz ? www.dropbox.com/Install Vc cria uma conta no drop, seu cliente tb cria uma, vc compartilha uma pasta com ele e pronto vc copia o que quiser nessa pasta e o cliente recebe (vice e versa). Eu geralmente instalo o dropbox no servidor, e compartilho, então modifiquei o errorsys e mando o error.log para essa pasta, recebo arrumo o que precisar e mandou o programa novamente, lógico que tenho um "robô" que verifica o programa e instala, tudo automático
  2. Concordo com o Jackson, realmente a SEFAZ muda e coloca imagens onde ficam os valores, cnpjs e alguns outros dados, as vezes liberam novamente, mas melhor é pedir para o seu cliente forçar o fornecedor a enviar o xml (o que é uma obrigação dele )
  3. Kapi, Veja o TestSmtp.prg, hoje em dia eu ainda uso envio por e-mail dos erros, mas estou mudando tudo para o DropBox, (Certeza de chegar, não para na caixa de span, vem muito mais rápido que alguns provedores de e-mail, e uso também para atualização do programa )
  4. Olá Sambomb, Mas aí não ficaria como nos aparelhos "Android" ou seja, vc estaria passando do 1 sobre o 2 para poder ir ao 3 e o interessante seria não fazer uma "curva" e sim em linhas , quanto a passar mais de uma vez no número (números já marcados), não vejo problema é até bom pois poderia ter mais dígitos para a senha (creio que seja esse o intuito) e poderia ver se já tivesse passados por ele mudar a cor da linha P.S.: Ainda não consigo colocar nada aqui , nem mesmo responder por quote
  5. Olá, Pode se mudar a bLostFocus e a bGotFocus para se ter esse tipo de efeito Override Method LostFocus In Class TDialog With MyLostFocus Override Method GotFocus in Class TDialog With MyGetFocus Func MyLostFocus() Local Self := HB_QSelf() PintaDialogSemiTransparent(::hDc...) ::lFocused := .F. If ::bLostFocus != Nil ; Eval(::bLostFocus) ; Endif Retu(Nil)
  6. Olá, Encontrei algumas falhas, sendo que dá para passar do ponto 1 para o ponto 6 por exemplo ou do 2 para o 9, então teria que bloquear isso , mas de resto está legal
  7. Olá, se possível colocar uma parte do fonte para podermos verificar
  8. Olá, creio que vc criando um índice temporário, seria mais interessante DbSelect("Cli") Index On Cli->(indexKey()) Tag _Temp_ To ArquTempo Custom Additive Memory Cli->(DbGoTop()) bBloc := <|| If Cli->Vendedor == VP_Usu .or. Cli_Vendedor1 == VP_USU .or. Cli.... Cli->(OrdKeyAdd("_Temp_") Endif > Cli->(DbEval(bBlc)) Cli->(DbSetOrder("_Temp_")) Cli->(DbGoTop())
  9. Olá, eu não consigo postar nada aqui, depois vou mandar para o kapiaba e ver se ele posta por mim
  10. Bom, como eu não faço indexações (raras vezes coisa de a cada 6 ou 8 anos), continuo afirmando, inclusive tem um post meu antigo sobre isso
  11. Olá, antes vc está regravando os índices os fields chave tb, isso só deve ser feito em uma inclusão, senão vai estourar mesmo os índices, ou mude para dbsetorder(0) e depois volte para o normal
  12. Olá Edu, só uma coisa, não é Chr() e sim o Asc() :$, falha nossa
  13. Kapi, Troque o &H... para 0x... e use como o Daniel, disse Chr(0x...)
  14. Olá Edu, A muiiito tempo atrás eu montei algo assim, mas ainda trabalha com dbII e dbrun, mas vamos ver se consigo lhe ajudar se eu lembrar tudo né ? o primeiro field começa sempre na posição 27, contêm 10 caracteres e + 1 de espaço, aí entra o tipo e +1 de espaço, depois mais 3 caracteres que é o tamanho ex.: TESTE C 123 Onde o 123 vc precisa colocar o chr() ou seja 3 caractes dá o Chr(3), eu não me lembro exatamente onde fica localizada a posição do primeiro registro, porém é dentro desses primeiros 27 caracters, sabendo-se que até o 4 caracter do dbf define o tipo de arquivo. vou ver se consigo montar algo pra vc Abraços Vendo uns dos post do Kapiaba, Ví que o tamanho do reader, é a 10ª posição com duas casas, também em CHR(), então fica fácil
  15. Antes que pergunte CHR$(&HA) = Chr(10) - Line Feed
  16. Olá Kapi, Se não me engano o &H significa Hexadecimal, então provavelmente se eu não estiver errado,. seria Chr(29)
  17. Olá Kapi. Nem com quote , mas vai lá veja que as variáveis estão em DEFAULT
  18. Olá Boingo, Creio que não se não me engano por causa da lei da transparência, mudaram, e já aproveitaram para "ajudar" mais a gente
  19. Houve mudança no site, e não dá mais para puxar, colocaram <SPAM> em todo lugar
  20. Olá Valdir, Coloque um syswait() dentro do While Não sei pq eu não consigo mais colar nada no fórum , nem responder com quote então coloque um syswait, e veja se está retornando a quantidade de bytes
  21. Nesse 2º caso não irá funciona se houver acentuação
  22. Olá Kapi, No site da sefaz acho que tem um download do xml
×
×
  • Create New...