vagner

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

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 )

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 )

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

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)

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

Olá, se possível colocar uma parte do fonte para podermos verificar

No Pelles,

Basta incluir "VERSION"

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())

Olá, eu não consigo postar nada aqui, depois vou mandar para o kapiaba e ver se ele posta por mim

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

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

Olá Edu, só uma coisa, não é Chr() e sim o Asc() :$, falha nossa

Kapi,
Troque o &H... para 0x... e use como o Daniel, disse

Chr(0x...)

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

Antes que pergunte
CHR$(&HA) = Chr(10) - Line Feed

Olá Kapi,
Se não me engano o &H significa Hexadecimal, então provavelmente se eu não estiver errado,. seria Chr(29)

Fala Kapi,
o H1B - é o 27
CHR(27)+"@"

Olá Kapi,
VBtnBmp

Olá Kapi.

Nem com quote , mas vai lá veja que as variáveis estão em DEFAULT

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

Houve mudança no site, e não dá mais para puxar, colocaram <SPAM> em todo lugar

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

Nesse 2º caso não irá funciona se houver acentuação

Olá Kapi,
No site da sefaz acho que tem um download do xml