• advertisement_alt
  • advertisement_alt
  • advertisement_alt

Luiz FERNANDO

Members
  • Content count

    98
  • Joined

  • Last visited

  • Days Won

    25

Posts posted by Luiz FERNANDO


  1. Aleluia deu certo, colegas o único detalhe que entre o "Mysql" e a informação da porta do banco de dados , tinha que colocar um parâmetro a mais ""

    estava fazendo assim

    gnConexao = SQLConnect(p_endereco, p_usuario, p_senha, p_Banco, "MySQL","Server Port = 3306")

    o correto é assim

    gnConexao = SQLConnect(p_endereco, p_usuario, p_senha, p_Banco, "MySQL","","Server Port = 3306")

     

    Obg a todos pela ajuda.

     

     

    3 people like this

  2. Janio muito obg pela força para solucionar o problema, com sua dica agora esta tudo 100% , abs

    FTPListFile(gnConexao,gsGLO_caminho1+gsVendedor+"/v_*.rem","FTPlistaarquivos",ftpFile)
    
    
    
    FOR EACH sArquivo OF garrArquivosFTP
    
    	gbRetornoDownload = FTPGet(gnConexao, gsGLO_caminho1+gsVendedor+"/"+sArquivo ,  gsGlO_retorno+"/"+sArquivo)    
    
    	bGbRetornoDelFtp = FTPDeleteFile(gnConexao,gsGLO_caminho1+gsVendedor+"/"+sArquivo)
    
    END
    
    
    
    PROCEDURE FTPlistaarquivos(sFileName,nFileSize <useful>,sAttribute,sModifDate <useful>,sModifTime <useful>)
    
    	ArrayAdd(WIN_sincronizar.garrArquivosFTP, sFileName)
    
    RESULT True

     

    2 people like this

  3. Pessoal sempre fiz Download de arquivo txt por FTP, mais sempre era arquivos com nomes fixo, da forma abaixo funciona perfeito

    gbRetornoDownload = FTPGet(gnConexao, gsGLO_caminho1+gsVendedor+"/cliente.rem" ,  gsGlO_retorno+"cliente.rem")    
    
    bGbRetornoDelFtp = FTPDeleteFile(gnConexao,gsGLO_caminho1+gsVendedor+"/cliente.rem")

    mais agora estou com uma situação que a unica que sei que os arquivos começa com v_*.rem, e podem ser varios, usando a forma abaixo funciona certo no emulador e tb na windev desktop, porem direto no aparelho , ele consegue apagar o arquivo do ftp, porem fazer download pro aparelho não.

    FTPListFile(gnConexao,gsGLO_caminho1+gsVendedor+"/v_*.rem","FTPlistaarquivos",ftpFile+ftpDirectory)
    
    
    
    
    
    PROCEDURE FTPlistaarquivos(sFileName,nFileSize <useful>,sAttribute,sModifDate <useful>,sModifTime <useful>)
    
    	nResultado is int
    
    	bGbRetornoDelFtp is boolean
    
    	gbRetornoDownload is boolean
    
    
    
    	gbRetornoDownload = FTPGet(WIN_sincronizar.gnConexao, gsGLO_caminho1+gsVendedor+"/"+sFileName ,  gsGlO_retorno+sFileName)
    
    	bGbRetornoDelFtp = FTPDeleteFile(WIN_sincronizar.gnConexao,gsGLO_caminho1+gsVendedor+"/"+sFileName)
    
    
    
    RESULT True

    se alguém tiver uma forma diferente de se fazer isto, realmente estou deste ontem em cima disto sem conseguir solucionar, lembrando que no emulador, e tb na windev desktop funciona normal.

     

    Obg


  4. Pessoal sempre qdo faço alguma alteração na estrutura do banco de dados(hfsql) , ao instalar este apk no tablete da a seguinte mensagem.

    "O aplicativo não está instalado.

    Um pacote existente com o mesmo nome e uma assinatura conflitante já foi instalado."

    Daí preciso desinstalar o aplicativo e instalar ele do zero novamente, e fazer isto com vários usuários é muito trabalhoso, alguém teria uma dica do que posso estar fazendo errado.

    Obg.


  5. Bom dia, colegas hoje eu troco dados do mobile com o retaguarda via arquivos texto usando transferencia por FTP, minha duvida é se vale a pena em investir em webservice,é mais rápido, mais estável. qual seria a vantagem, ou neste caso é bobeira investir tempo nessa mudança.

     


  6. Ola Janio, agora que vi aqui, que o problema não está no fMoveFile ou FRename, e sim que o arquivo que preciso remover acabei de salvar ele com o fWriteLine(nARQuIvO,sTrLinha), é como se o sistema tivesse com ele preso, em xharbour sempre qdo crio o arquivo, eu encerro ele com um end, como fazer isto com windev.

     

    Obg.


  7. Algum colega saberia me dizer pq o comando abaixo não funciona, tenho as pasta certinho, o arquivo esta la, mais não move ele para pasta enviado.

    bRes is boolean = fMoveFile("C:\empregestor\palm\remessa\V013030006022.rem","C:\empregestor\palm\remessa\enviado\V013030006022.rem")
    Info(bRes)


  8. Agradeço as dicas dos colegas, mais pelo incrivel que parece nenhuma forma da certo,inclusive da erro de sintaxe(fica vermelho) nem aceita compilar, não é a primeira vez que tento fazer isto, aqui não trabalho com analysis de banco de dados, talvez seja isto.

    Obs: vou analisar como trabalhar com analysis e faezr o teste, retorno aqui assim que eu tiver um posição.

    Obg a todos

     

     


  9. 1 hora atrás, Ananias Guerra disse:

    No último parâmeetro do SQLConnect, você pode usar o "Server Port=numPorta"

    gnConexao = SQLConnect(p_endereco, p_usuario, p_senha, p_Banco, "MySQL","Server Port=3126;")

    não da erro mais não obedece esse parametro, tipo aqui minha porta é 3306, mesmo colocando 3126 ele acessa normal, embora achei nos help o Server Port, não consigo achar a sintaxe completa com uma situação real, pq as vezes é um detalhe simples de ajuste.

    Obs: o ponto e virgula no final tentei sem tb


  10. Ao criar um multizone via programação tem o seguinte bug

    codigo que crio meu multizone

    
    
    mlzDeleteAll(MZ_area)
    
    
    
    
    
    
    
    WHILE SQLFetch("aSQL") = 0 
    
    
    
    	
    
    
    
    	nSubscript = mlzAddLine(MZ_area)
    
    
    
    	MZ_area[nSubscript].STC_zm_nome = NoSpace(SQLGetCol("aSQL",2))
    
    
    
    	MZ_area[nSubscript].STC_zm_area = NoSpace(SQLGetCol("aSQL",1))
    
    
    
    	MZ_area[nSubscript].STC_OS = Val(SQLGetCol("aSQL",4))
    
    
    
    	
    
    
    
    	i++
    
    
    
    END

    a primeira vez que entro na tela tudo blz

    https://uploaddeimagens.com.br/imagens/fabricio_1-png

    a segunda vez observe que ele criar uma linha a mais

    https://uploaddeimagens.com.br/imagens/fabricio_2-png

    a terceira vez se cria duas linhas a mais

    https://uploaddeimagens.com.br/imagens/fabricio_3-png/mostrar-codigo

    se eu entrar 20 vezes nessa tela, ira criar mais 20 linhas(opções) a mais, mesmo usando mlzDeleteAll(MZ_area)

    https://uploaddeimagens.com.br/imagens/fabricio_4-png

     

     


  11. 55 minutos atrás, Fabrício disse:

    Esse tópico não seria em Bugs?
    Vou começar a postar as dicas aqui... k k k
    Mas referente a questão do bug.. eu desconheço..
    Trabalho com o controle multiline zone e nunca
    tiver problema..

    Fabricio vc desconhece bug no controle multizone, perai abrindo um tópico aqui com um bug do controle. 

     


  12. Pessoal obg pelas respostas, a string da instrução sempre qdo tenho problema uso ToClipboard(sSQLConsulta) e analiso se tem erro, neste caso estava tudo ok, o problema estava na seguinte situação, um pedido de venda com 100 itens por exemplo, eu tinha que pegar o numero do pedido uma unica vez, e não 100 vezes, realmente passou despercebido, com volume pequeno até passava, mais qdo puxava um período maior ocorria isto, mais uma vez vlw pela força de todos, e desculpa de usar o forum por algo que não era sintaxe, e sim logica errada minha.

     

    Abs

    1 person likes this