;一 保存数据的时候的相关操作
Func _save();保存数据
;1 设置一个配置文件,记录当前的保存状态。 非0 代表正在保存, 0 代表保存完成
_write_file('配置文件',1)
;2 进行数据保存的相关操作(假设分解为9个动作)
For $i = 1 To 9
_write_file('配置文件','1-'&$i)
;正在保存第$i个数据 并进行相关操作
Next
;3 数据保存完成后
_write_file('配置文件',0)
EndFunc
;二 程序下次启动的时候的相关操作
Local $file = FileOpen('配置文件.txt',0)
Local $read = FileRead($file);正在保存数据
FileClose($file)
If $read = 0 Then
MsgBox(0,'正常启动','之前程序正常保存数据')
Else
MsgBox(0,'异常','之前程序保存数据异常')
EndIf
Func _read_file($file)
Local $f = FileOpen($file,0)
Local $temp = FileRead($f)
FileClose($f)
Return $temp
EndFunc
Func _write_file($file,$x)
Local $f = FileOpen($file,2)
FileWrite($f,$x)
FileClose($f)
EndFunc
我基础差,只能想到这样操作 |