|
Fazendo uma Chamada telefonica com o 3CX pelo Windev |
Iniciado por BOLLER, dez., 16 2019 3:33 PM - 1 resposta |
| |
| | | |
|
| |
Membro registado 3.651 mensagems Popularité : +175 (223 votes) |
|
Publicado em dezembro, 16 2019 - 3:33 PM |
Olá Prezados
FAZENDO UMA CHAMADA TELEFONICA USANDO O APP 3CX
O Windev é poderoso como qualquer outra linguagem atual com muitas facilidades que reduz em muito o desenvolvimento, vejamos esse exemplo abaixo:
Procedure F_Call_3CX(NumCall)
IF NumCall = "" OR NumCall = EOT OR Length(NumCall) = 0 THEN Info("Nenhum número informado para ser discado!") ELSE IF fFileExist("C:\Program Files (x86)\3CXPhone\3CXPhone.exe") = True THEN NumCall = Replace(NumCall," ","") NumCall = Replace(NumCall,"(","") NumCall = Replace(NumCall,")","") NumCall = Replace(NumCall,"-","") NumCall = Replace(NumCall,".","") NumCall = Replace(NumCall,"/","") NumCall = Replace(NumCall,"=","") NumCall = Replace(NumCall,"*","") NumCall = Replace(NumCall,"+","") NumCall = NoSpace(NumCall) IF IsNumeric(NumCall) = False THEN Info("Não é um número válido!") END SourceCallExec is string = "" SourceCallExec += "ExeRun("+Charact(34)+"C:\Program Files (x86)\3CXPhone\3CXPhone.exe"+Charact(34)+", exeActive)"+CR SourceCallExec += "Multitask(100)"+CR SourceCallExec += "nHorizontal is int = MyInternalWindow..Width / 2"+CR SourceCallExec += "nVertical is int = MyInternalWindow..Height / 2"+CR SourceCallExec += "EmulateMouse(MyWindow,eiShift,nHorizontal,nVertical)"+CR x,Numero is int = 0 nTotal is int = Length(NumCall) LOOP(nTotal) x++ Numero = NumCall[[x]] SourceCallExec += "SendKey(NumToString("+Numero+"))"+CR END SourceCallExec += "SendKey(CR)" Formula is Procedure = Compile(SourceCallExec) IF ErrorOccurred = False THEN Formula() IF ErrorOccurred = True Info(ErrorInfo()) ELSE END ELSE Info(ErrorInfo()) END ELSE Info("3CX não encontrado em:","C:\Program Files (x86)\3CXPhone\3CXPhone.exe","Por favor valide com o Administrador da Rede.") END END
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 99949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/Mensagem modificada, dezembro, 16 2019 - 3:34 PM |
| |
| |
| | | |
|
| | |
| |
Membro registado 3.651 mensagems Popularité : +175 (223 votes) |
|
Publicado em dezembro, 16 2019 - 3:47 PM |
EXEMPLO
CÓDIGO FONTE
https://repository.windev.com/resource.awp?file_id=281474976710872;fazendo-uma-chamada-telefonica-com-3cx-pelo-windev
https://repository.windev.com/resource.awp…
-- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil +55 (41) 99949 1800 adrianoboller@gmail.com skype: adrianoboller http://wxinformatica.com.br/ |
| |
| |
| | | |
|
| | | | |
| | |
|