Função para saber se o webagente está ativado

Framework - Linha Protheus Performance
1

Bom dia, existe alguma função advpl para indicar se o webagent foi habilitado ?

2

Bom dia.

Tente isso


Local cLib        := ""
Local lWebAgent   := .F.
Local nRemoteType := GetRemoteType(@cLib)
If !Empty(GetRmtInfo()[9]) .AND.;                  //Navegador (Quando executado pelo SmartClient HTML) ou Marca (Quando executado por um dispositivo móvel)
    (    ("WIN"   $ cLib .And. nRemoteType == 1);    //Smart Client das verões 8 e 10 em ambiente Windows (*).
    .Or. ("LINUX" $ cLib .And. nRemoteType == 2);    //Smart Client das verões 8 e 10 em ambiente Linux (*).
    .Or. ("MAC"   $ cLib .And. nRemoteType == 2))    //Smart Client das verões 8 e 10 em ambiente MacOS (*).
    lWebAgent := .T.
EndIf
3

Gratidão Felipe Caido, no meu caso, o nRemoteType retorna 1 quando o webagent esta ativado e 5 quando não esta!!