Acesso remoto

[xtsystem]

Ola pessoal.

Pesquisando, achei a função abaixo que segundo o informado, não deixaria o sistema ser ativado remotamente.

#define SM_REMOTESESSION 4096

If !( GetSysMetrics( SM_REMOTESESSION ) == 0 )

quit

Endif

Fiz os teste remoto, mas o sistema conseguiu carregar, ou seja, não bloqueou o acesso.

Alguem sabe como fazer isso.

Obrigado

[rochinha]

Amiguinho,

Isto depende do que voce acha ser ...ativado remotamente...

O valor de SM_REMOTESESSION = 0x2001 usado em GetSysMetrics() só serve quando usado dentro de uma sessão remota, ou seja, quando uma maquina acessa o servidor por Terminal Services.

[xtsystem]

Ok Jose Carlos

Na verdade, eu não quero que o cliente tenha acesso remotamente, via Teamviewer ou outros programas de comunicação.

Claro, para acessar o meu sistema. Entende ? Sera que existe uma forma de barrar isso ?

Obrigado

[MatheusFarias]

Cara o que você pode fazer é tentar contornar verificando os processos abertos com gettask http://wiki.fivetechsoft.com/doku.php?id=fivewin_function_gettasks
verifica se o team view e outros estão abertos, ou pode procurar por funcçoes do habour na web sobre a disponibilidade da porta de acesso , caso ela esteja sendo usada você pode bloquear

e da uma olhada nas portas mais usadas, também pode verificar para o programa validar os protocolos de comunicação remota costumeiramente usados

[edutraini]

Eu tenho vários clientes que usam o acesso remoto aonde assim que conecta ja abre o sistema e assim que sair do sistema fecha a sessão

[xtsystem]

OK Pessoal;

Vou dar uma pesquisada. Depois posto aqui.

Obrigado

[rochinha]

Amiguinhos,

    aTasks = GetTasks()
    cProcessLog := "Lista de processos sendo executados: " + ;
                   AllTrim( Str( Len( aTasks ) ) ) + CRLF
    for n = 1 to Len( aTasks )
        cProcessLog += "    " + Str( n, 3 ) + " " + aTasks[ n ] + CRLF
    next
    MemoEdit( cProcessLog )

Monte um vetor com nomes de aplicativos que deseja barrar.

Depois de listar com o código acima faça uma critica e finalize o seu sistema.

Veja que eu disse, finalize o seu sistema, ou seja, se for encontrado algum dos aplicativos indesejados, rodando, não permita que seu sistema seja executado.

Voce não deve, de sobremaneira, barra o uso destes aplicativos de acesso remoto na maquina do cliente, mesmo porque o cliente pode desejar que aconteçam acessos as suas máquinas para diversos fins, inclusive de segurança, para saber se o funcionário está ou não trabalhando, etc.