Board logo

标题: [已解决]有偿求助20R,根据当前时间自动修改文档字段 [打印本页]

作者: pinghoo    时间: 2021-8-17 20:38     标题: [已解决]有偿求助20R,根据当前时间自动修改文档字段

本帖最后由 pinghoo 于 2021-8-17 22:46 编辑

文件名:config.ini

[main]
edit_dszdqxjy_hour=10
edit_dszdqxjy_min=6

每个小时根据当前时间修改一次hour值,比如13点时修改为14、14点时修改为15、23点时修改为0.

有偿求助20R


微信:fkeefkee
tel:18960600273
作者: pinghoo    时间: 2021-8-17 20:38

越简练越好,批处理或者VBS都可以
作者: cmd1152    时间: 2021-8-17 21:29

本帖最后由 cmd1152 于 2021-8-17 21:32 编辑
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. :i
  4. echo;[main]>config.ini
  5. set sz=!time:~0,2!+1
  6. if "%sz%"=="24" (set sz=0)
  7. echo;edit_dszdqxjy_hour=%sz%>>config.ini
  8. echo;edit_dszdqxjy_min=6>>config.ini
  9. ping -n 4 127.1>nul
  10. goto :i
复制代码

作者: zaqmlp    时间: 2021-8-17 21:56

本帖最后由 zaqmlp 于 2021-8-25 19:02 编辑
  1. @echo off&mode con lines=15 cols=50&cd /d "%~dp0"
  2. set "inifile=D:\xxx\config.ini"
  3. if not exist "%inifile%" (echo;"%inifile%" 未找到&pause&exit)
  4. set "h=#"
  5. :loop
  6. title %time%
  7. for /f "delims=:" %%a in ("%time%") do set hour=%%a
  8. set "hour=00%hour: =%"
  9. set /a "hour=1%hour:~-2% - 100"
  10. if "%hour%" equ "23" (set hour2=0) else (set /a hour2=hour+1)
  11. if "%hour%" neq "%h%" (
  12. cls&echo;%time% --^> [%hour2%]
  13. set "h=%hour%"
  14. call :change
  15. echo;monitoring……
  16. )
  17. >nul ping /n 2 0
  18. goto loop
  19. pause
  20. exit
  21. :change
  22. for /f "delims=[]" %%a in ('type "%inifile%"^|find /n "edit_dszdqxjy_hour="') do set "line=%%a"
  23. (for /f "tokens=1* delims=:" %%a in ('type "%inifile%"^|findstr /n .*') do (
  24. if "%%a" neq "%line%" (
  25. echo;%%b
  26. ) else echo;edit_dszdqxjy_hour=%hour2%
  27. ))>t.t
  28. move /y t.t "%inifile%"
  29. pause
  30. exit
复制代码

作者: pinghoo    时间: 2021-8-17 22:48

回复 3# cmd1152


   收到,有效联系方式留一个,
  刚才人在外边3楼已经加我微信交了一份作业。
  我一会试下你的,如果可以用我支付一半给你
作者: cmd1152    时间: 2021-8-18 10:19

回复 5# pinghoo


    不需要了,给评个分就行




欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2