[已解决]有偿求助20R，根据当前时间自动修改文档字段

pinghoo

文件名：config.ini

[main]
edit_dszdqxjy_hour=10
edit_dszdqxjy_min=6

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

有偿求助20R


微信：fkeefkee
tel：18960600273

pinghoo

越简练越好，批处理或者VBS都可以

cmd1152

@echo off
setlocal enabledelayedexpansion
:i
echo;[main]>config.ini
set sz=!time:~0,2!+1
if "%sz%"=="24" (set sz=0)
echo;edit_dszdqxjy_hour=%sz%>>config.ini
echo;edit_dszdqxjy_min=6>>config.ini
ping -n 4 127.1>nul
goto :iCOPY

zaqmlp

@echo off&mode con lines=15 cols=50&cd /d "%~dp0"
set "inifile=D:\xxx\config.ini"
if not exist "%inifile%" (echo;"%inifile%" 未找到&pause&exit)
set "h=#"
:loop
title %time%
for /f "delims=:" %%a in ("%time%") do set hour=%%a
set "hour=00%hour: =%"
set /a "hour=1%hour:~-2% - 100"
if "%hour%" equ "23" (set hour2=0) else (set /a hour2=hour+1)
if "%hour%" neq "%h%" (
	cls&echo;%time% --^> [%hour2%]
	set "h=%hour%"
	call :change
	echo;monitoring……
)
>nul ping /n 2 0
goto loop
pause
exit
:change
for /f "delims=[]" %%a in ('type "%inifile%"^|find /n "edit_dszdqxjy_hour="') do set "line=%%a"
(for /f "tokens=1* delims=:" %%a in ('type "%inifile%"^|findstr /n .*') do (
	if "%%a" neq "%line%" (
		echo;%%b
	) else echo;edit_dszdqxjy_hour=%hour2%
))>t.t
move /y t.t "%inifile%"
pause
exitCOPY

pinghoo

回复 3# cmd1152


   收到，有效联系方式留一个，
  刚才人在外边3楼已经加我微信交了一份作业。
  我一会试下你的，如果可以用我支付一半给你

cmd1152

回复 5# pinghoo


    不需要了，给评个分就行