批处理之家 - Powered by Discuz! Board

标题: [日期时间] [已解决]如何用批处理实现查看电脑开关机记录？ [打印本页]

作者: amwrjvh 时间: 2011-8-20 12:02 标题: [已解决]如何用批处理实现查看电脑开关机记录？

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

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

不知道这个可以实现么？

额是新手，能直接提供代码最好，谢谢！

作者: raymai97 时间: 2011-8-20 12:12

请问你指的txt文件是什么名称？在哪里的？

作者: ArdentMan 时间: 2011-8-20 12:18

试试这个：

Start "" "%WinDir%\schedlgu.txt"
复制代码

作者: raymai97 时间: 2011-8-20 12:25

回复 3# ArdentMan

噢？我电脑没有这个文件啊~

作者: fastslz 时间: 2011-8-20 14:11

另存为.vbs

Set SWDT = CreateObject("WbemScripting.SWbemDateTime")
Set WMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colLoggedEvents = WMI.ExecQuery("Select * from Win32_NTLogEvent Where Logfile = 'System' And EventCode = '6005' Or EventCode = '6006'")
For Each objEvent In colLoggedEvents
    Flag = Flag + 1
    If Flag = 1 Then
        SWDT.Value = objEvent.TimeWritten
        Wscript.Echo "本次开机时间: " & SWDT.GetVarDate(True)
    ElseIf Flag = 2 Then
        SWDT.Value = objEvent.TimeWritten
        Wscript.Echo "上次关机时间: " & SWDT.GetVarDate(True)
    ElseIf Flag = 3 Then
        SWDT.Value = objEvent.TimeWritten
        Wscript.Echo "上次开机时间: " & SWDT.GetVarDate(True)
        Exit For
    End If
Next
复制代码

作者: CUer 时间: 2011-8-20 14:26

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

作者: Hello123World 时间: 2011-8-20 15:47

本帖最后由 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

作者: raymai97 时间: 2011-8-20 15:55

回复 7# Hello123World

不是说笑，连C:\Windows\System32\eventquery.vbs我也没有~

作者: CUer 时间: 2011-8-20 19:44

回复 8# raymai97

原版XP系统是有的

作者: wolfan 时间: 2011-8-20 23:02

奴家用的是盗的~嘻嘻。

作者: xslxslxsl 时间: 2011-8-20 23:31

我去试试看

作者: cjiabing 时间: 2011-8-21 00:16

搜索论坛，搜索系统日志。

作者: amwrjvh 时间: 2011-8-30 16:01

回复 2# raymai97

SchedLgU.Txt 路径为C:\WINDOWS

欢迎光临批处理之家 (http://www.bathome.net/)