定时关机程序

天乐

@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

这里有这个贴了吧