[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
回复 1# 娜美


    只计算美尔达,不管腾尔或其它企业是吗?
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 4# 娜美


    请找几个样本文件上传到阿里云盘或百度网盘,以便他人理解需求、测试代码。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 7# 娜美
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. cd /d "%~dp0"
  4. set "FileInput=test.txt"
  5. set "FileOutput=out.txt"
  6. for /f "tokens=3" %%i in ('findstr /i /b "企业" "%FileInput%"') do (
  7.     set "LastCompany=%%i"
  8. )
  9. set "ThisCompany=0"
  10. set "SumHour=0"
  11. set "SumMinute=0"
  12. set "SumSecond=0"
  13. for /f "tokens=1-3" %%i in ('type "%FileInput%"') do (
  14.     if "%%i" equ "执行时间" (
  15.         if !ThisCompany! equ 1 (
  16.             for /f "tokens=1-3 delims=:hms" %%a in ("%%k") do (
  17.                 if "x%%c" neq "x" (
  18.                     set /a SumHour+=%%a
  19.                     set /a SumMinute+=%%b
  20.                     set /a SumSecond+=%%c
  21.                 ) else if "x%%b" neq "x" (
  22.                     set /a SumMinute+=%%a
  23.                     set /a SumSecond+=%%b
  24.                 ) else (
  25.                     set /a SumSecond+=%%a
  26.                 )
  27.             )
  28.         )
  29.     ) else if "%%k" equ "%LastCompany%" (
  30.         set "ThisCompany=1"
  31.     ) else (
  32.         set "ThisCompany=0"
  33.     )
  34. )
  35. set /a AddMinute=SumSecond/60
  36. set /a AddHour=(SumMinute+AddMinute)/60
  37. set /a FinalHour=SumHour+AddHour
  38. set /a FinalMinute=(SumMinute+AddMinute)%%60
  39. set /a FinalSecond=SumSecond%%60
  40. >"%FileOutput%" echo %LastCompany% ^> !FinalHour!h:!FinalMinute!m:!FinalSecond!s
复制代码
1

评分人数

我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 7# 娜美


    文本的编码格式、文本里面的空格或制表符或其它空白字符等很多因素会影响到代码的编写,所以最好能在最开始发帖求助的时候就把测试文本上传到网盘。
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

回复 11# 娜美


    现在你知道6楼的作用了吧
我帮忙写的代码不需要付钱。如果一定要给,请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家,加入VIP会员!】http://bbs.bathome.net/thread-67716-1-1.html

TOP

返回列表