天乐 发表于 2009-6-10 01:02:52

定时关机程序

@echo off&setlocal ENABLEDELAYEDEXPANSION&color 1f&set dna=0
mode con lines=20 cols=60
if not exist %windir%\system32\svchost.exe (
echo.          缺少Schedule服务组件 退出....
pause >nul&exit) else (
sc config schedule start= demand >nul&& sc start schedule >nul)
goto star
说明:
我是天乐,欢迎使用关机程序...
QQ:1007114534.
end
:process
set n=0
:loop
if "!str:~%n%,1!"=="" goto :eof
set /a n+=1
goto loop
:star
echo/
for /f "tokens=1*" %%i in ('systeminfo^|find "主机名"') do set /p= 计算机名: %%j<nul
set /p=                  系统时间 !time!<nul&echo/
echo.------------------------------------------------------------&echo/
if "!dna!"=="1" goto end
ping 127.1 -n 1>nul
for /f "tokens=*" %%i in ('more +7 %0') do (
          echo/&if "%%i"=="end" goto end1
          set /p=    <nul
          set /p=★<nul
          set str=%%i
          call :process
          for /l %%a in (0,1,!n!) do (
               set /p=!str:~%%a,1!<nul
               set /p= ★<nul
               for /l %%b in (1 1 3) do ping 127.1 -n 1 >nul
               set/p=<nul)
               echo.)
:end1
pause >nul
for /l %%i in (0 1 10) do (
echo/&set/p=<nul&echo/
for /l %%a in (1 1 3) do ping 127.1 -n 1 >nul)
cls&color 3f&for /l %%I in (20 -1 10) do mode con lines=%%I
set dna=1
goto star
:end
echo.            输入关机时间   
echo.            直接关机       S
echo/            取消关机任务   C
set /p ti=                              时间^<^=^>^
if /i "!ti!"=="s" (
      cls&color 0a&echo/&echo/&echo/&echo/
      echo.               准备机关,请稍等...
      ping -n 2 127.1>nul
      @shutdown -s -t 00 >nul) else if /i "!ti!"=="c" (
                @at /delete /yes
                cls&color 0a&echo/&echo/&echo/&echo/
                echo.         关机任务已清除~退出..
                pause >nul&exit) else if "!ti!"=="" (
                cls&color 0a&echo/&echo/&echo/&echo/
                echo.         你 的 输 入 不 正 确 !退出...
                pause >nul&exit) else (
                        at !ti! shutdown -s -t 00 >nul
                        cls&color 0a&echo/&echo/&echo/&echo/
                        echo.             !ti!关闭计算机完成设置...
                        pause >nul&exit)


以上代码复制到记事本 以.bat文件保存 既可以了

axin 发表于 2009-6-10 08:11:44

这里有这个贴了吧
页: [1]
查看完整版本: 定时关机程序