none
Erro Log de acesso RRS feed

  • Pergunta

  • Bom tarde galera, tenho um script que quando o usuario loga ele inclui em um arquivo na rede a hora do logon e em que servidor o usuario logou, bom pelomenos deveria funcionar assim mas ele so funciona quando executo manual, deixei para executar via GPO:

    mas não aplica:

    Option Explicit
    Set objShell=CreateObject("WScript.Shell")
    Set FileSysObj = CreateObject("Scripting.FileSystemObject")
    Set WSHShell = WScript.CreateObject("WScript.Shell")
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objTextFile = objFSO.OpenTextFile("\\192.10.10.10\dados$\log\logon.log", ForAppending, True)
    Dim objWMIService, objItem, objService, objShell
    Dim strComputerName, strService, colServiceList, FileSysObj, WSHShell, objFSO, objTextFile, strDate, strTime, strUserName, strSessionName, strLogonServer, DateInfo
    'strDate = wshShell.ExpandEnvironmentStrings( "%Date%" )
    'strTime = wshShell.ExpandEnvironmentStrings( "%time%" )
    strComputerName = wshShell.ExpandEnvironmentStrings( "%ComputerName%" )
    strUserName = wshShell.ExpandEnvironmentStrings( "%Username%" )
    strSessionName = wshShell.ExpandEnvironmentStrings( "%sessionname%" )
    strLogonServer = wshShell.ExpandEnvironmentStrings( "%logonserver%" )
    DateInfo = DateInfo & Now & VbCrLf
    'DateInfo = DateInfo & Date & VbCrLf
    'DateInfo = DateInfo & Time & VbCrLf
    
    Const OverWriteFiles = True
    Const ForAppending = 8
    
    objTextFile.WriteLine("Logon Realizado:" & ";" & strUserName & ";" & strComputerName & ";" & strSessionName & ";" & strLogonServer & ";" & DateInfo )

    Aguem pode me dar um help ?

    Vlww




    Tiago Frioli


    Edt. Essa maquina é uma VM que esta no VMware será que isso é problema?
    • Editado Tiago Frioli segunda-feira, 1 de outubro de 2018 18:22 Incluir que a maq é VM
    segunda-feira, 1 de outubro de 2018 17:58

Respostas

  • Olá Tiago,

    Joga esse script no caminho da pasta Sysvol (Netlogon), geralmente essa opção de GPO Logon e Logoff ele puxa por lá. Se colocar em caminhos diferentes, ele não executa.

    Espero que ajude e qualquer coisa entre em contato.


    Vinicius Mozart || MVP - Cloud and Datacenter Management || vinicius.mozart@terra.com.br || http://www.wenz.com.br || Skype:vinicius.mozart || www.wenzcursos.com.br




    segunda-feira, 1 de outubro de 2018 18:38
    Moderador

Todas as Respostas

  • Olá Tiago,

    Joga esse script no caminho da pasta Sysvol (Netlogon), geralmente essa opção de GPO Logon e Logoff ele puxa por lá. Se colocar em caminhos diferentes, ele não executa.

    Espero que ajude e qualquer coisa entre em contato.


    Vinicius Mozart || MVP - Cloud and Datacenter Management || vinicius.mozart@terra.com.br || http://www.wenz.com.br || Skype:vinicius.mozart || www.wenzcursos.com.br




    segunda-feira, 1 de outubro de 2018 18:38
    Moderador
  • Bom dia,

    Por falta de retorno essa thread está encerrada.

    Se necessário favor abrir uma nova thread.

    Atenciosamente,


    Igor F. Kunrath

    Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita

    Technet Community Support

    Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

    sexta-feira, 5 de outubro de 2018 12:13
    Moderador