Pular para o conteúdo principal

Postagem em destaque

BlackTDN NEWS :: 2025.02.13 :: 21:42:18

_Créditos das imagens: ChatGPT # Robótica Avançada: o que é, como funciona e quais os benefícios? **Fonte:** Tecmundo.com.br **Autor:** Maura Martins **Publicado em:** 2025-02-13T14:30:00Z ![Imagem](https://tm.ibxk.com.br/2025/01/02/02114816778102.jpg?ims=1200xorig) > Hoje as empresas vivenciam uma nova fase na tecnologia voltada à produção. A chamada fase da Indústria 4.0 também é apontada pelos especialistas como uma "Quarta Revolução Industrial". Nesse momento histórico, entre os destaques, está o desenvolvimento da rob… [Leia mais](https://www.tecmundo.com.br/mercado/401252-robotica-avancada-o-que-e-como-funciona-e-quais-os-beneficios.htm) --- # Ex-chefe da Activision Blizzard minimiza acusações de assédio e sugere que são conspirações de sindicatos **Fonte:** Tecmundo.com.br **Autor:** Gabriel Morais Silva de Oliveira **Publicado em:** 2025-02-13T17:30:00Z ![Imagem](https://tm.ibxk.com.br/2025/02/13/13142625239056.jpg?ims=1200xorig) > Durante uma entrevist...

Protheus :: apconnxcontrol.ocx, PowerShell e SendMessage para envio de Mensagem a Usuário Específico

No “post” anterior, Protheus :: apconnxcontrol.ocx & PowerShell – Forçando a Desconexão de Usuário, vimos como instalar o componente apconnxcontrol.ocx e consumi-lo via Windows PowerShell para “Forçar” a Desconexão de usuário específico. Veremos, agora, como usar o Método SendMessage para o envio de Mensagens.

Instale/Registre o compontente conforme descrito no “post” anterior. Através do PowerShell instancie um novo objeto COM e efetue a conexão ao Protheus.

#Instanciando um novo objeto com 
$TObj = New-Object -Com apconnxcontrol.apconnx;

#Definindo as variaveis para Conexao
$TEnv = "NDJ_01";
$TSrv = "127.0.0.1";
$TPort = 4321;
$TUser = "TOTVS";
$TPWD = "SIGA";

#Atribuindo as variaveis para Conexao às Propriedades do objeto
$TObj.Environment = $TEnv;
$TObj.Password = $TPWD;
$TObj.Port = $TPort;
$TObj.Server = $TSrv;
$TObj.User = $TUser;

#Conectando
$TObj.Connect();


image



Obtenha os usuários conectados







$TObj.GetUsers();









PS C:\Documents and Settings\marinaldo.jesus.NALDO-PC\Meus documentos> $TObj.GetUsers();
marinaldo.jesus;NALDO-PC;3712;
;2740;1769103725;naldo.jesus



image



image


e, agora, usando SendMessage (string, string, string, string, string) envie-lhe(s) uma mensagem.







$TObj.SendMessage('marinaldo.jesus','NALDO-PC','3712','','ola')




image



image



image


O exemplo acima foi executado no Protheus 10, mas serve também para a versão 11. Observe:


image 





$TObj.GetUsers();

image





$TObj.SendMessage('marinaldo.jesus','NALDO-NOTE-MVPC','1996','','message from PowerShell')

image

image

image

[]s
иαldσ dj

Comentários

Postar um comentário

Postagens mais visitadas