中国DOS联盟

先要说的是其中有好多代码来至网络各兄弟姐妹的
也请大家检查各中的问题
因为时间的原因没做加班单统一存放某个空间直接放在了本地,可以做到>>\\IP\JB\%jbname%.txt
小弟在此谢了


@echo off
::自动生成加班单
::加班的内容以及开始时间和结束时间
::亮点之一，可以根据用户名的不同建立个人的加班单。
color 1f
title 个人加班单输入器－由芒果精灵制作(QQ:444266175) %date% %time%
cls
echo MSGBox "个人加班单输入器，未结束前请不要Q!!!",48,"安装前说明：" >readme.vbs &&call readme.vbs &&del readme.vbs
set time_begin=%time:~0,-3%
:: 运行程序的时间统计
set _time_start=%time%
set /a hour_start=%_time_start:~0,2%
set /a minute_start=1%_time_start:~3,2%-100
set /a second_start=1%_time_start:~6,2%-100
echo.
echo.
echo ■■Spirit ■■■■■■■■■■■■■■■■
echo ■ ■
echo 程序开始运行时间是 %time_begin%
echo.
echo 根据名字不同，生成的日志也不同
echo.
echo ■ ■
echo ■■■■■■■■■■■■JE T'AIME■■■■■



echo.
echo.
echo.
set /p jbname=输入你的姓名：
::下面这句可有可无,是给自己留的特定的代码
if /i %jbname%==Spirit set jbname=芒果
echo ＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝加班开始＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝>>%jbname%.txt
echo. >>%jbname%.txt
set mgdate=%date%
echo 加班开始时间 %mgdate% %time_begin% >> %jbname%.txt
echo. >>%jbname%.txt
echo 加班人员姓名：%jbname% >>%jbname%.txt
echo. >>%jbname%.txt
set /p jb=请输入加班内容：
echo 加班内容：%jb% >>%jbname%.txt
echo. >>%jbname%.txt
cls
:nu
cls
echo.
echo.
echo.
echo ----------------------------------加班单--------
echo 加班时间为： %mgdate% %time_begin%
echo.
echo 加班人员：%jbname%
echo.
echo 加班内容：%jb%
echo.
echo －＝按 结束加班＝－
echo -----------------------------------Spirit-------
set /p jbjs=结束加班请按:
:: 结束程序的时间统计
set _time_end=%time%
set /a hour_end=%_time_end:~0,2%
set /a minute_end=1%_time_end:~3,2%-100
set /a second_end=1%_time_end:~6,2%-100

:: 计算秒数
if %second_end% lss %second_start% (
set /a second_end=%second_end%+60
set /a minute_end=%minute_end%-1
)
set /a second=%second_end%-%second_start%

:: 计算分钟数
if %minute_end% lss %minute_start% (
set /a minute_end=%minute_end%+60
set /a hour_end=%hour_end%-1
)
set /a minute=%minute_end%-%minute_start%

:: 计算小时数
if %hour_end% lss %hour_start% (
set /a hour_end=%hour_end%+24
)
set /a hour=%hour_end%-%hour_start%

if /i "%jbjs%"=="" echo MSGBox "输入错误请重新选择!!!",48,"错误提示：" >nos.vbs &&call nos.vbs &&del nos.vbs &&goto nu
if /i %jbjs%==Q echo 加班结束时间%date% %time% >> %jbname%.txt &&echo 共花了%hour% 小时 %minute% 分 %second% 秒 >>%jbname%.txt &&goto end
if /i %jbjs%==q echo 加班结束时间%date% %time% >> %jbname%.txt &&echo 共花了%hour% 小时 %minute% 分 %second% 秒 >>%jbname%.txtgoto end
echo MSGBox "输入错误请重新选择!!!",48,"错误提示：" >nos.vbs &&call nos.vbs &&del nos.vbs &&goto nu
:end
echo MSGBox "加班结束时间为%date% %time_end%,共花了 %hour% 小时 %minute% 分 %second% 秒",48,"加班日志：" >nos.vbs &&call nos.vbs &&del nos.vbs
echo ＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝加班结束＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝>>%jbname%.txt
set mgdate=
set mgtime=
set jbname=
set jb=
set jbjs=
set time_end=

[ Last edited by mgchl on 2008-1-12 at 12:38 PM ]

建议VBS改为：
echo msgbox wscript.arguments(0),48,wscript.arguments(1)>temp.vbs call temp.vbs "说明" "标题"
不用del太多

建议学学HTA（html+vbs/java），更好处理，界面也好

谢谢 但我比较喜欢DOS