none
[問題]請問如何寫Script記錄Domain中使用者的登入記錄 RRS feed

  • 問題

  •  

    我要記錄每一天登user登入電腦的狀況,所以現寫了一個logon scrtip執行如下:
    cscript \\server1\NETLOGON\GetInf.vbs >> J:\logonlog.txt
    [J:\logonlog.txt]是一個網路磁碟下的一個txt檔。
    目前結果如下:
    電腦名稱 Client2
    ==============================================================
    登入使用者 Domain\roye
    ==============================================================

    我的問題是:如何寫出一個記錄
    1.登入使用者可以串出AD中的Account中的Display name 嗎?
    2.要增加記錄登入的日期.時間
    3.可以將檔案依每天的日期,自動命名為"日期.txt"嗎? 例:20080820.txt
    4.除了用cscript >> *.TXT外,可以用wscript的方式不Show出訊息,而將需要的資訊寫到例:20080820.txt嗎?

    我很想學,但無從開始,請各位先進幫忙了,謝謝。

    [GetInf.vbs的內容如下:]
    [

    strComputers = CreateObject("WScript.Shell").ExpandEnvironmentStrings("%COMPUTERNAME%")

    If WScript.Arguments.count = 1 Then
    strComputers = WScript.Arguments(0)
    End If

    arrComputers = Split(strComputers,",")
    For Each objComputer In arrComputers
    strComputer = trim(objComputer)
    On Error Resume Next
    Set objHW = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate, authenticationLevel=pktPrivacy}!\\" _
    & strComputer & "\root\cimv2")

    S = "電腦名稱" & vbTab & strComputer & vbCrLf & "==============================================================" &vbCrLf
    Set colCS = objHW.InstancesOf("Win32_computerSystem")
    S = S & "登入使用者" & vbTab
    For Each objCS in colCS
    S = S & objCS.Username
    Next
    S = S & vbCrLf & "==============================================================" &vbCrLf
    Wscript.Echo S
    Next

    ]

    2008年8月20日 上午 08:09

所有回覆

  •  

    為什麼大大不用本身 的gpo 來看..

    我只是用 event viewer 來看

     

    不像大大那麼專業

    2008年8月25日 上午 02:33