edutraini

Bom dia Eu tenho uma rotina que meus clientes usam se puder ajudar me chama no skype emtinformatica

Boa tarde, Pessoal Uso esse comando oMyOutlook := CreateObject("Outlook.Application") para chamar o outlook Funciona perfeitamente, sabem me dizer qual comando devo usar para chamar o Windows LIve Email pois nao abre com esse comando nao abre

Deu certo Obrigado a todos

Bom dia Qual o parametro correto usando o comando cGetfile para que ele caia no diretorio que eu determinar pois na minha rotina abre sempre no ultimo diretorio aberto pelo windows

Agora a certisign lançou esse cartao com validade de 5 anos que fica nas nuvens Mas como ele nao fica no repositorio do windows nao da para usar

Data: 08-07-2020 14:25:33 Nome: Equipe de Suporte Mensagem: Prezado Sr. eduardo mazur traini, Não sabemos dizer se funciona com a dll, pois a DLL só reconhece certificado do repositório my do usuário que está logado no windows, se o senhor tiver acesso ao certificado digital na nuvem, poderia efetuar os testes. Resposta Flexdocs

Obrigado Kapi vou verificar

Boa tarde, Pessoal Um cliente meu esta perguntando se esse tipo de certificado da para usar dentro do Sistema de Nfe Uso flexdocs

Bom dia pessoal, Um cliente me pediu para que alguns campos pulassem e so aceitava caso der um duploclick no campo ou seja precisava habilitar o tabstop Existe alguma forma de fazer isso via programa senao teria que criar outra dialog so para esse cliente Obrigado

Bom dia, Desculpa a demora O problema estava na assinatura do Bol do cliente que não era pago Ele fez uma assinatura e voltou a funcionar Obrigado a todos

uso essa configuracao {"@bol.com.br", "smtp.bol.com.br", 587, .f. }

Bom dia Uso a rotina do rmail para mandar meus email Estou tendo problema para enviar o email usando o provedor bol Alguem sabe me dizer se mudou a regra de smtp, porta ou algo assim Obrigado

Obrigado pela dica , achei que no ascan tinha alguma coisa como set sotft on

Bom dia, Pessoal Tenho um Browse conforme exemplo abaixo. Gostaria de saber quando faço uma busca por um campo e caso nao exista a busca ele caia no mais proximo Exemplo : Busquei 06/04/2020 e nao tem essa data queria que caisse no dia 07/04/2020 nPos := ASCAN( iClientesAte, {|x|x[23] == cData } ) @ 5, 0 XBROWSE oBrw SIZE ScreenWidth(),ScreenHeight()-580 AUTOSORT CELL LINES NOBORDER FOOTERS; FIELDS "",; TRANS(iClientesAte[oBrw:nArrayAt][2],'99999999') ,; // CODCLI iClientesAte[oBrw:nArrayAt][3] ,; // NOME iClientesAte[oBrw:nArrayAt][4] ,; // FANTASIA iClientesAte[oBrw:nArrayAt][6] ,; // UF iClientesAte[oBrw:nArrayAt][7] ,; // TELEFONE1 iClientesAte[oBrw:nArrayAt][8] ,; // TELEFONE2 iClientesAte[oBrw:nArrayAt][9] ,; // FAX iClientesAte[oBrw:nArrayAt][22] ,; //CONTATO TRANS(iClientesAte[oBrw:nArrayAt][10],"999")+"-"+TRANS(iClientesAte[oBrw:nArrayAt][11],"999")+"-"+TRANS(iClientesAte[oBrw:nArrayAt][12],"999")+"-"+TRANS(iClientesAte[oBrw:nArrayAt][13],"999") ,; //vendedorES iClientesAte[oBrw:nArrayAt][18] ,; //POTENCIAL dtoc(iClientesAte[oBrw:nArrayAt][23]) ,; //dt.ult.Ped dtoc(iClientesAte[oBrw:nArrayAt][24]) ,; //dt.ult.cot dtoc(iClientesAte[oBrw:nArrayAt][25]) ; //dt.ult.OBS HEADERS " ","CÓDIGO","NOME","FANTASIA","UF","TELEFONE","TELEFONE","FAX","CONTATO","VENDEDOR","POTENCIAL","ULT.PEDIDO","ULT.COTACAO","ULT.OBS."; FIELDSIZES 30,80,150,100,30,100,100,100,100,100,100,70,70,70 ; OF oWndTelemar UPDATE

pessoal ja descobri oBrwCot:aCols[2]:bStrData := { || nro_venda() } Obrigado

Bom dia, Pessoal Tem como colocar um coluna no xbrowse aonde essa coluna e o resultado de uma funcao NRO_VENDA() Ja tenho isso no xbrowse conforme exemplo abaixo mas conforme estou navegando em cima do browse ele começa embaralhar Teria como adicionar usando essa parametro oBrw:aCols[1] REDEFINE XBROWSE oBrwCot FIELDS ; "" ,; Nro_venda(),; STR(COT->NROCOTA,6)+"-"+STR(COT->ITEM,3), ; COT->DESCRICAO, ; COT->UNIDADE ,; STR(COT->QTDE,6,2),; TRANS(COT->UNITARIO,"999,999.99"),; TRANS(COT->PESO,"999,999.999"),; COT->PEDCLIENTE, ; STR(COT->CODPROD,7)+'-'+COT->LOTE,; DTOC(COT->DATA),; iif(COT->marcausi,hBitMapusi," "),; COT->NOMEUSU,; STR(COT->NROREQ,6) ; HEADERS 'PV','Nr.PV/Status','Item','Descrição','Uni','Qtde','$Unitário',' Peso ','Ped.Cli','Cod.Pro','Dt.Cotacao','Usinagem','Usuario','Nr.Req' ; SIZES 20,65,60,220,25,40,50,50,60,50,60,60,60,60; alias COT->(alias()) ID 18 OF oFld:aDialogs[8] UPDATE FONT oFont

Obrigado Eroni deu certo

Boa tarde, Pessoal Tenho um campo memo aonde controlo o nro de caracteres digitados atraves do comando VarPut() Existe alguma forma de controlar o nro de linhas tambem O problema é que alguns clientes esse campo memo cabe ate 10 linhas e outros somente 6 linhas ai nao precisaria ter duas dialogs

Boa tarde , Um cliente meu quer usar coletor de dados via wi-fi para lançar estoque Alguem poderia dar uma dica de como usar, marca etc Ou tambem alguem que queira fazer uma parceria pois nunca trabalhei com isso

Obrigado a todos vou testar depois passo a solucao

Obrigado Kapi na verdade eu tambem queria mudar no Ribbonbar

Boa tarde, Pessoal Qual a propriedade que mudo para mudar a cor do Menu que esta em Azul claro

Boa tarde, Pessoal Um feliz 2020 com muita Saude, Paz e Sucesso Uma duvida em uma tabela de produtos em um browse existe alguma forma de eu selecionar varios itens Exemplo item 1 ate o item 10 dessa tabela segurando um shift como é no windows ou tenho que selecionar um a um

Obrigado Kapi e Rogerio vou fazer o teste

Boa tarde, Pessoal Eu uso o programa rmail para enviar os emails dos clientres tanto de nota eletronica, boleto Bancario etc Um cliente me pediu se tem como colocar o logotipo da empresa no corpo do email Alguem poderia dar alguma dica