[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[日期时间] [已解决]如何用批处理实现查看电脑开关机记录?

系统目录下有个TXT文件保存了电脑开关机记录,而且系统日志里面也有记录,那么可以使用批处理来实现直接查看这个记录么?

只需要查看当天的开关机记录就行的。

不知道这个可以实现么?

额是新手,能直接提供代码最好,谢谢!
1

评分人数

    • CrLf: 感谢给帖子标题标注[已解决]字样PB + 2

请问你指的txt文件是什么名称?在哪里的?
为何批处理不适合做界面
为何随风讨厌call命令
http://bbs.bathome.net/thread-4482-1-10.html

TOP

试试这个:
  1. Start "" "%WinDir%\schedlgu.txt"
复制代码
1

评分人数

    • CrLf: 乐于助人PB + 5
一路飘过的鸟~~~

TOP

回复 3# ArdentMan


    噢?我电脑没有这个文件啊~
为何批处理不适合做界面
为何随风讨厌call命令
http://bbs.bathome.net/thread-4482-1-10.html

TOP

另存为.vbs
  1. Set SWDT = CreateObject("WbemScripting.SWbemDateTime")
  2. Set WMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
  3. Set colLoggedEvents = WMI.ExecQuery("Select * from Win32_NTLogEvent Where Logfile = 'System' And EventCode = '6005' Or EventCode = '6006'")
  4. For Each objEvent In colLoggedEvents
  5.     Flag = Flag + 1
  6.     If Flag = 1 Then
  7.         SWDT.Value = objEvent.TimeWritten
  8.         Wscript.Echo "本次开机时间: " & SWDT.GetVarDate(True)
  9.     ElseIf Flag = 2 Then
  10.         SWDT.Value = objEvent.TimeWritten
  11.         Wscript.Echo "上次关机时间: " & SWDT.GetVarDate(True)
  12.     ElseIf Flag = 3 Then
  13.         SWDT.Value = objEvent.TimeWritten
  14.         Wscript.Echo "上次开机时间: " & SWDT.GetVarDate(True)
  15.         Exit For
  16.     End If
  17. Next
复制代码
1

评分人数

    • CrLf: 乐于助人技术 + 1

TOP

能否把txt传一部分上来看看是什么内容?

TOP

本帖最后由 Hello123World 于 2011-8-20 15:50 编辑

http://bbs.bathome.net/viewthrea ... A%BB%FA%CA%B1%BC%E4

搜索 开机时间,善用搜索可以更快速的获得帮助信息。
http://bbs.bathome.net/redirect. ... 2&fromuid=30829
1

评分人数

    • CrLf: 乐于助人PB + 3

TOP

回复 7# Hello123World


    不是说笑,连C:\Windows\System32\eventquery.vbs我也没有~
为何批处理不适合做界面
为何随风讨厌call命令
http://bbs.bathome.net/thread-4482-1-10.html

TOP

回复 8# raymai97


原版XP系统是有的

TOP

奴家用的是盗的~嘻嘻。

TOP

我去试试看

TOP

搜索论坛,搜索系统日志。
寂寞是黑白的,但黑白不是寂寞,是永恒。BAT 需要的不是可能,而是智慧。

TOP

回复 2# raymai97


    SchedLgU.Txt          路径为C:\WINDOWS

TOP

返回列表