Thaiadmin

script ดู user ที่ logged on อยู่

0 สมาชิก และ 1 บุคคลทั่วไป กำลังดูหัวข้อนี้

A

script ดู user ที่ logged on อยู่
« เมื่อ: 6 มกราคม 2007, 22:09:56 »
enumLoggedOnUser.vbs
โค๊ด: [Select]
Const strComputerName = "localhost"

Dim arrData

Set objWMIService = GetObject("winmgmts:\\" & strComputerName & "\root\CIMV2")
Set colItems = objWMIService.ExecQuery("SELECT Antecedent FROM Win32_LoggedOnuser",,48)

WScript.Echo "Logged On Users:"
For Each objItem in colItems
arrData =  Split(objItem.Antecedent, Chr(34), -1, 1)
WScript.Echo arrData(1) & "\" & arrData(3)
Next

แนะนำให้ใช้ cscript เรียกนะครับ

ปล. สำหรับคนที่รู้มากเกี่ยวกับ windows จะเห็นว่ามันแสดงไม่ครบขาด user ที่ไม่มีชื่อไม่มี SID และ user ที่ชื่อ SYSTEM ก็หมายถึง ชื่อเครื่อง$ ที่อาจจะเคยเห็น
ปล2. ที่จริงมันมี tool ในการดึงอยู่แล้วคือ logonsessions จาก sysinternals แต่แบบว่ากำลังเบื่อๆ

ออฟไลน์ M.a.k.u.b.e.x

  • Global Project Leader
  • *****
  • 3,790
  • 88
  • เพศ: ชาย
  • Are you alone in the Dark?
    • IT Solutions Consultant and Services Co., Ltd.
Re: script ดู user ที่ logged on อยู่
« ตอบกลับ #1 เมื่อ: 19 ธันวาคม 2014, 11:12:13 »
ขุดให้ได้อ่านกัน