Trang chủ
Bài viết mới
Diễn đàn
Bài mới trên hồ sơ
Hoạt động mới nhất
VIDEO
Mùa Tết
Văn Học Trẻ
Văn Học News
Media
New media
New comments
Search media
Đại Học
Đại cương
Chuyên ngành
Triết học
Kinh tế
KHXH & NV
Công nghệ thông tin
Khoa học kĩ thuật
Luận văn, tiểu luận
Phổ Thông
Lớp 12
Ngữ văn 12
Lớp 11
Ngữ văn 11
Lớp 10
Ngữ văn 10
LỚP 9
Ngữ văn 9
Lớp 8
Ngữ văn 8
Lớp 7
Ngữ văn 7
Lớp 6
Ngữ văn 6
Tiểu học
Thành viên
Thành viên trực tuyến
Bài mới trên hồ sơ
Tìm trong hồ sơ cá nhân
Credits
Transactions
Xu: 0
Đăng nhập
Đăng ký
Có gì mới?
Tìm kiếm
Tìm kiếm
Chỉ tìm trong tiêu đề
Bởi:
Hoạt động mới nhất
Đăng ký
Menu
Đăng nhập
Đăng ký
Install the app
Cài đặt
Chào mừng Bạn tham gia Diễn Đàn VNKienThuc.com -
Định hướng Forum
Kiến Thức
- HÃY TẠO CHỦ ĐỀ KIẾN THỨC HỮU ÍCH VÀ CÙNG NHAU THẢO LUẬN Kết nối:
VNK X
-
VNK groups
| Nhà Tài Trợ:
BhnongFood X
-
Bhnong groups
-
Đặt mua Bánh Bhnong
CÔNG NGHỆ
Công Nghệ Thông Tin
Thủ Thuật Tin học
Kiểm tra thời điểm log on máy tính
JavaScript is disabled. For a better experience, please enable JavaScript in your browser before proceeding.
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an
alternative browser
.
Trả lời chủ đề
Nội dung
<blockquote data-quote="Mr.Quangvd" data-source="post: 67397" data-attributes="member: 3995"><p><strong>Bạn muốn biết lượng thời gian mà mình đã log on vào máy tính, user nào đã đăng nhập vào máy tính của bạn lần cuối cùng. Hãy để script sau giúp đỡ bạn làm điều này</strong></p><p> </p><p style="text-align: center"><a href="https://www.winhelponline.com/blog/wp-content/uploads/h2-10/lastlogon-1.png" target="_blank"><img src="https://www.winhelponline.com/blog/wp-content/uploads/h2-10/lastlogon-1.png" alt="" class="fr-fic fr-dii fr-draggable " data-size="" style="" /></a></p><p></p><p> Bạn hãy copy đoạn mã sau vào Notepad và lưu lại dưới tên <span style="color: red"><strong>lastlogon.vbs</strong></span></p><p> <em></em></p><p> <em>Option Explicit</em></p><p> <em>Dim objWMIService, colItems, WshNetwork, strComputer</em></p><p> <em>Dim objUser, objItem, dtmLastLogin, strLogonInfo</em></p><p> <em>Set WshNetwork = CreateObject("Wscript.Network")</em></p><p> <em>strComputer = WshNetwork.ComputerName</em></p><p> <em></em></p><p> <em>Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")</em> <em></em></p><p> <em>Set colItems = objWMIService.ExecQuery _</em></p><p> <em>("Select * from Win32_UserAccount Where Domain = '" & strComputer & "'")</em></p><p> <em></em></p><p> <em>For Each objItem in colItems</em> <em></em></p><p><em> dtmLastLogin = ""</em></p><p><em> On Error Resume Next</em></p><p><em> Set objUser = GetObject("WinNT://" & strComputer _</em></p><p><em> & "/" & objItem.Name & ",user")</em></p><p><em> dtmLastLogin = objUser.lastLogin</em></p><p><em> On Error Goto 0</em></p><p> <em></em></p><p><em> strLogonInfo = strLogonInfo & vbCrLf & objItem.Name & ": " & dtmLastLogin</em> <em></em></p><p> <em>Next</em><em></em></p><p> <em>MsgBox strLogonInfo, vbOKOnly + vbInformation, "Last Logon Information for Local Users"</em></p><p> <em></em> </p><p> </p><p> </p><p> </p><p> Nếu bạn cần biết các thông tin đăng nhập lần cuối cùng, bạn hãy đặt script này vào thư mục Startup Để mở thư mục Startup: </p><p> <span style="color: blue">Run > "shell:startup" (không có dấu ngoặc kép) và nhấn ENTER. </span></p><p> Kéo tập tin <span style="color: red">lastlogon.vbs</span> vào thư mục Startup.</p><p> </p><p style="text-align: center"><a href="https://www.winhelponline.com/blog/wp-content/uploads/h2-10/lastlogon-2.png" target="_blank"><img src="https://www.winhelponline.com/blog/wp-content/uploads/h2-10/lastlogon-2.png" alt="" class="fr-fic fr-dii fr-draggable " data-size="" style="" /></a></p><p></p><p> Nếu bạn muốn kiểm tra thời gian sử dụng máy tính, bạn chỉ cần click vào tập tin trên là ok.</p></blockquote><p></p>
[QUOTE="Mr.Quangvd, post: 67397, member: 3995"] [B]Bạn muốn biết lượng thời gian mà mình đã log on vào máy tính, user nào đã đăng nhập vào máy tính của bạn lần cuối cùng. Hãy để script sau giúp đỡ bạn làm điều này[/B] [CENTER][URL="https://www.winhelponline.com/blog/wp-content/uploads/h2-10/lastlogon-1.png"][IMG]https://www.winhelponline.com/blog/wp-content/uploads/h2-10/lastlogon-1.png[/IMG][/URL][/CENTER] Bạn hãy copy đoạn mã sau vào Notepad và lưu lại dưới tên [COLOR=red][B]lastlogon.vbs[/B][/COLOR] [I] Option Explicit Dim objWMIService, colItems, WshNetwork, strComputer Dim objUser, objItem, dtmLastLogin, strLogonInfo Set WshNetwork = CreateObject("Wscript.Network") strComputer = WshNetwork.ComputerName Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")[/I] [I] Set colItems = objWMIService.ExecQuery _ ("Select * from Win32_UserAccount Where Domain = '" & strComputer & "'") For Each objItem in colItems[/I] [I] dtmLastLogin = "" On Error Resume Next Set objUser = GetObject("WinNT://" & strComputer _ & "/" & objItem.Name & ",user") dtmLastLogin = objUser.lastLogin On Error Goto 0 strLogonInfo = strLogonInfo & vbCrLf & objItem.Name & ": " & dtmLastLogin[/I] [I] Next[/I][I] MsgBox strLogonInfo, vbOKOnly + vbInformation, "Last Logon Information for Local Users" [/I] Nếu bạn cần biết các thông tin đăng nhập lần cuối cùng, bạn hãy đặt script này vào thư mục Startup Để mở thư mục Startup: [COLOR=blue]Run > "shell:startup" (không có dấu ngoặc kép) và nhấn ENTER. [/COLOR] Kéo tập tin [COLOR=red]lastlogon.vbs[/COLOR] vào thư mục Startup. [CENTER][URL="https://www.winhelponline.com/blog/wp-content/uploads/h2-10/lastlogon-2.png"][IMG]https://www.winhelponline.com/blog/wp-content/uploads/h2-10/lastlogon-2.png[/IMG][/URL][/CENTER] Nếu bạn muốn kiểm tra thời gian sử dụng máy tính, bạn chỉ cần click vào tập tin trên là ok. [/QUOTE]
Tên
Mã xác nhận
Gửi trả lời
CÔNG NGHỆ
Công Nghệ Thông Tin
Thủ Thuật Tin học
Kiểm tra thời điểm log on máy tính
Top
