标题: 懒人计划---加班记入器
[打印本页]
作者: mgchl
时间: 2008-1-9 22:26
标题: 懒人计划---加班记入器
先要说的是其中有好多代码来至网络各兄弟姐妹的
也请大家检查各中的问题
因为时间的原因没做加班单统一存放某个空间直接放在了本地,可以做到>>\\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 -=按 [Q] 结束加班=-
echo -----------------------------------Spirit-------
set /p jbjs=结束加班请按[Q]:
:: 结束程序的时间统计
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 ]
作者: zh159
时间: 2008-1-9 23:19
建议VBS改为:
echo msgbox wscript.arguments(0),48,wscript.arguments(1)>temp.vbs
call temp.vbs "说明" "标题"
不用del太多
建议学学HTA(html+vbs/java),更好处理,界面也好

作者: mgchl
时间: 2008-1-12 12:16
谢谢 但我比较喜欢DOS