程序因需要系统日期和实际日期绝对一致，不一致时提供使用 RUN/N CONTROL timedate.cpl 来修改系统日期。

问题是运行后明明已经修改系统日期成功了，可显示的日期不能及时刷新。

请问如何解决。

（附件已重新上传）

[此贴子已经被作者于2023-4-21 09:46编辑过]

文件不全

就是只有表单文件2个啊

打包中差类

可以考虑读SQL服务器时间日期作为系统标准时间，避免本地机时间日期不一致问题

同意，或者取网络标准时间用来对表

附件已重新上传，谢谢各位。

是异步打开control，想要修改完确定关闭control才生效就要同步执行control

谢谢版主，这个如何操作，我还是搞不定。

最好不要用control.exe来调用shell32.dll的timedate功能，因control.exe是调用rundll32.exe来运行shell32.dll的timedate，否则获取rundll32.exe进程句柄有点麻烦。

DECLARE long CreateProcess       IN kernel32 long,string,long,long,long,long,long,long,string@,string@
DECLARE long WaitForSingleObject IN kernel32 long,long
si = BINTOC(68,"4rs") + REPLICATE(0h00,64)
pi = REPLICATE(0h00,16)
CreateProcess(0,"rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,0",0,0,0,0,0,0,@si,@pi)
WaitForSingleObject(CTOBIN(LEFT(pi,4),"4rs"), -1)
? DATETIME()