-
Posts
2,514 -
Joined
-
Last visited
-
Days Won
19
Reputation Activity
-
evandro got a reaction from aferra in Processamento do banco MySq"
Olá,
Pô, elogio o cara dizendo que ele sabe tudo e só agora vou discordar e ele vem com "Ola, Bom dia Velinho". Nem vou falar nada! Hehehehe
Mas dependendo dos joins e falta de índices aliados a um subselect, já vi muito servidor parar. Tiveram de reiniciar o serviço.
-
evandro got a reaction from aferra in Visual Studio 2017
Olá,
Vou pedir ao Filipe para passar essas informações pois foi ele que me configurou para mim. E tem recurso pra bater de pau!
-
evandro got a reaction from alex2002 in Visual Studio 2017
Olá,
Uso, há pouco tempo, o VS Code e é muito bom, mas não tenho um tutorial. Teria de fazer um. Pelo menos com o básico ( extensões necessárias, como compilar, etc. ).
-
evandro got a reaction from aferra in O que é melhor?
Olá,
No MySql cria-se tabela temporária também e é o que recomendo pois o ideal é caminhar para não ter nada escrito em forma de DBF. Aí pode-se parar de utilizar qualquer lib externa.
-
evandro got a reaction from Luiz Fernando in Five Win + sql sem as rdds
Olá,
não entendi a falta do USE TABELA no que dificulta Dificulta a migração. O sistema está todo com USE TABELA pois está em DBF. Mesmo meus sistemas que não têm mais nada migrado do DBF, ainda uso o USE TABELA no FastReport. É mais prático. Como estou migrando para Harbour e deixando de usar a SqlLib, tenho de modificar quase todos os relatórios.
Só uma opinião, se você vai migrar de DBF para SGDB, muda para o PostGres, além do mesmo está sempre em evolução, é 100% FREE, diferente do MySql que esta parado no TEMPO e não é 100% Free. Grande Jackson! Nesta aqui você está equivocado. A questão do MySql não ser 100% free é coisa muito, muito antiga. Ele é 100% free, está em evolução, e tem ainda o MariaDB - que eu uso - que é uma evolução do MySql, de código aberto e em evolução constante.
-
evandro got a reaction from Luiz Fernando in Five Win + sql sem as rdds
Olá,
Tanto o FW quanto o Harbour já têm este recurso. Estou migrando o sistema com a opção de um ou outro e, pelo menos nos testes, está tudo muito bom. Criei algumas funções para compatibilizar com a SqlLib. Algumas coisas ficam até melhores ( o retorno da SqlArray() da SqlLib é sempre string e os outros respeitam a origem ). Outras, como não poderia deixar de ser, dificultam, como o uso do USE TABELA e outros recursos como um
DBF, pode esquecer. Não tem.
-
evandro got a reaction from kleyber in Five Win + sql sem as rdds
Olá,
Tanto o FW quanto o Harbour já têm este recurso. Estou migrando o sistema com a opção de um ou outro e, pelo menos nos testes, está tudo muito bom. Criei algumas funções para compatibilizar com a SqlLib. Algumas coisas ficam até melhores ( o retorno da SqlArray() da SqlLib é sempre string e os outros respeitam a origem ). Outras, como não poderia deixar de ser, dificultam, como o uso do USE TABELA e outros recursos como um
DBF, pode esquecer. Não tem.
-
evandro got a reaction from kapiaba in programa externo
Olá,
Não sou nenhum "jênio", nem conheço metade do que o João postou ( GetInstance()? ). De toda forma, segue uma alternativa:
cComando:="javaws.exe d:\progs\esocial\EsocialSign.jar" MyRun( cComando ) return nil /////////////////////////////////////////////////////////////////////////////////////// function MyRun( cComando ) local oShell, oRet oShell := CreateObject( "WScript.Shell" ) oRet := oShell:Run( "%comspec% /c " + cComando, 0, .T. ) oShell := NIL return iif( oRet = 0, .t., .f. ) ///////////////////////////////////////////////////////////////////////////////////////
-
evandro got a reaction from kapiaba in Editor Modo Console
Olá,
Quando você seleciona várias linhas e faz alterações, inserções, etc. em todas elas de uma vez, ou quando insere uma TAG ( to do ) em uma linha e busca pela tag em todo o projeto, ou ainda quando o editor autocompleta, ainda mais na quantidade ilimitada e facilidade de uso de "templates" entre inúmeros outros recursos, verá que vale muito a pena este princípio pouco amistoso. Além do mais, quando se usa mais de uma linguagem ( sei que você não dá conta disso hehehehehe ) ele atende perfeitamente.
-
evandro got a reaction from kapiaba in Editor Modo Console
Olá,
É que passei o link para Windows 64. Segue o link para 32 bits
-
evandro got a reaction from kapiaba in Editor Modo Console
Olá
Sublime Text 3
Dicas para o Sublime Text
Mais dicas
Linguagem Harbour para o Sublime
É um editor cheio de recursos e pacotes (packages) adicionais que o tornam mais poderoso ainda.
-
evandro got a reaction from kapiaba in Editor Modo Console
Olá,
Agora não mostra mais nada, o que pode estar errado? O uso de um editor modo console. Simples assim.
-
evandro got a reaction from kapiaba in Envio de SMS
olá,
Evandro meu rei, sem querer abusar, cadê a tela(.RC) de INPUTS desta rotina? Não tem tela para a rotina. Passo os parâmetros. Estas informações vão depender da rotina de origem.
-
evandro got a reaction from microfly in Do While com macro
Olá,
Evite o uso de macro SEMPRE. Tem outra forma de fazer isto. Pode ter certeza.
-
evandro got a reaction from kapiaba in Venda de sistema com fontes
Olá,
Para se fazer o depósito se faz necessário:
Banco:
Agência:
Conta:
Nome:
CPF:
-
evandro got a reaction from microfly in Venda de sistema com fontes
Olá,
Para se fazer o depósito se faz necessário:
Banco:
Agência:
Conta:
Nome:
CPF:
-
evandro got a reaction from aferra in CURSO DE MYSQL
Olá,
Para não usar DBF nem em temporários, basta criar uma tabela temporária ( create temporary table ). Esta tabela só é visível para a conexão que a criou e se apaga ao final da conexão. Não constatamos nenhum problema em produção, mesmo com muitos usuários na rede.
-
evandro got a reaction from Theotokos in SOCORRO EM SQL
Olá,
O primeiro passo para migrar é "brincar" bastante com o Mysql. Se inteirar o máximo possível do SQL. Recomendo o MariaDB. Não por causa de licença, pois a necessidade dela é coisa antiga, não existe mais. O Maria é mais rápido e é Open. O MySql é da Oracle. Pode mudar a forma de licença a hora que quiser. Os outros bancos, Firebird inclusive, haverá uma maior dificuldade de tudo. RDD, solução nativa, outros usuários, etc.
Para uma migração gradativa, ou seja, mesclar partes em DBF e partes em MySql, tem de ser com uma RDD. Neste caso recomendo a SqlLib. Usei as duas ( SqlLib e SqlRdd ) e, na época, optei largamente pela SqlLib. Se for radical e migrar tudo, tanto o Harbour, quanto o FW mais recente, têm solução nativa. Estou fazendo minhas rotinas com opção para as duas alternativas para poder comparar o desempenho. O que for melhor no cliente, basta alterar uma pequena configuração. Claro que usar a opção nativa é muito melhor, só que não dá para aproveitar nenhum tipo de acesso aos dados ( use, seek, etc. ).
-
evandro got a reaction from Theotokos in Validar um Texto Digitado pelo Usuário
Olá,
eu criei um função, que separa as palavras de uma frase, e depois faz uma separação silábica de cada palavra, agora estou inserindo uma analise que cada silaba, para ver se tem ou faz algum sentido em português. A sugestão que fiz foi por este caminho, fazendo esta separação via REGExp. O corretor do Word não vai barrar vai apontar que tem algum erro.
-
evandro got a reaction from kapiaba in Enviar SMS via Fivewin Grátis Tem?
Olá,
Faça contato com a Zenvia. Eles liberam uma conta com algumas mensagens grátis para teste.
-
evandro got a reaction from kapiaba in TRANSPORTAR UM ARQ EXCELL PARA DBF
Olá,
Isto é que é clareza na resposta!
-
evandro got a reaction from Luiz Fernando in TRANSPORTAR UM ARQ EXCELL PARA DBF
Olá,
Isto é que é clareza na resposta!
-
evandro reacted to Rogerio Figueira in Leitura de email
Evandro, a patir dos exemplos do FW eu criei minhas rotinas, funciona tudo bem, mas só habilito para clientes que usam hospedagem no meu servidor para evitar problemas com os gratuitos.
Usa a classe Tpop3 do fw.
Segue o código:
//=======================================================================================================
Function PegaoMail( )
local oOutMail, oIP, mailport := 587, mailauth
LOCAL host, usuario, senha, pasta
mailport := 587
mailauth := .T.
if ! pegaconf(@host, @usuario, @senha ) // le os dados no arquivo de configuração
msgstop("Dados insuficientes para transmissão!","Falha fatal!")
return .f.
end
WsaStartUp()
oIP :=GETHOSTBYNAME("mail.representantes.info") // aqui entra o servidor de email
//msginfo(oIP,"oIP")
If oIP = "0.0.0.0"
DelLog:=.f.
WsaCleanUp()
msgAlert("E-mail não pode ser lido neste instante.","Atenção!")
return .f.
End
GetMail(host, usuario, senha)
sysrefresh()
return nil
//----------------------------------------------------------------------------//
function GetMail(host, usuario, senha)
local oInMail, oIP :=GETHOSTBYNAME(host)
oInMail = TPop3():New( oIP,, usuario, senha ) // mail server IP
oInMail:lDelMsgs := .t.
oInMail:lHeaderOnly := .f.
oInMail:bConnecting = { || Monitor( "Conectando em "+oIP ) }
oInMail:bConnected = { || Monitor( "Conectado" ) }
oInMail:bDone = { || ReadEmails( oInMail ) }
oInMail:GetMail()
return nil
//----------------------------------------------------------------------------//
function ReadEmails( oInMail )
local n
for n = 1 to Len( oInMail:aMsgs )
salvamail( oInMail:aMsgs[ n ] )
next
return nil
//------------------------------------------------------------
function salvamail(mensagem)
LOCAL cFrom := cSubject := cDate := "" , y := mlcount(mensagem)
if y>0
for i = 1 to y
if subs(memoline(mensagem,100,i),1,5) = "From:"
cFrom := alltrim(subs(memoline(mensagem,100,i),6) )
elseif subs(memoline(mensagem,100,i),1,8) = "Subject:"
cSubject := alltrim(subs(memoline(mensagem,100,i),26) )
elseif subs(memoline(mensagem,100,i),1,5) = "Date:"
cDate := alltrim(subs(memoline(mensagem,100,i),12) )
end
if !empty(cFrom) .and. !empty(cSubject) .and. !empty(cDate)
exit
end
next
SELE CPRINBOX //dbf onde salva as msgs
if Appb_dbf (0) // faz um append blank
Replace CPRINBOX->datamsg with cDate,;
CPRINBOX->remetente with cFrom,;
CPRINBOX->assunto with cSubject,;
CPRINBOX->data with date(),;
CPRINBOX->texto with mensagem
Lock_dbf (DB_FREE_TMP)
else
SndPlaySound( "OPS.wav",1 )
end
end
return nil
-
evandro reacted to kapiaba in FWH MySQL/MariaDB soporte nativo docs
http://forums.fivetechsupport.com/viewtopic.php?f=6&t=33304
-
evandro got a reaction from Theotokos in Visualizar/imprimir PDF
Olá,
Com o FastReport é mole, mole. Tanto de uma forma quanto de outra.