touch_xu 发表于 2010-10-25 09:55:03

【已解决】这段IniReadSection代码为何不工作.

本帖最后由 touch_xu 于 2010-10-25 10:47 编辑

$_DelFiles = IniReadSection("set.ini", "Del")

If @error Then
    MsgBox(4096, "", "错误, 读取INI文件失败.")
Else
   $Sum = 0
    For $i = 1 To $_DelFiles
      MsgBox(4096, "", "关键字: " & $_DelFiles[$i] & @CRLF & "值: " &

$_DelFiles[$i])
        If FileDelete($_DelFiles[$i]) Then $Sum += 1
    Next
MsgBox(48, "指示:", "一共删除了" & $Sum & "个文件", 3)
EndIf
set.ini 代码如下:

f1=E:\1.txt
f1="C:\2.txt"
f1="C:\4.txt"

文件确定存在,但是删除提示总是0个文件

水木子 发表于 2010-10-25 10:12:07

Local $Sum = 0

$_DelFiles = IniReadSection("set.ini", "Del")
If @error Then
    MsgBox(4096, "", "错误, 读取INI文件失败.")
Else
    For $i = 1 To $_DelFiles
      MsgBox(4096, "", "关键字: " & $_DelFiles[$i] & @CRLF & "值: " & $_DelFiles[$i])
      If FileDelete($_DelFiles[$i]) = 1 Then $Sum += 1
    Next
        MsgBox(48, "指示:", "一共删除了" & $Sum & "个文件", 3)
EndIf

Set.ini 如下：


f1=E:\1.txt
f2=C:\2.txt
f3=C:\4.txt

touch_xu 发表于 2010-10-25 10:28:07

本帖最后由 touch_xu 于 2010-10-25 10:38 编辑

还是不行啊,还是删除0个文件, 我的文件一定存在的,这是为什么^

touch_xu 发表于 2010-10-25 10:46:37

谢谢
      If FileDelete($_DelFiles[$i])Then $Sum += 1
不用=1也是可行的.

kingfirekkk 发表于 2010-10-25 15:00:15

嗯，值得参考，偶也有过这样的问题。
页: [1]
查看完整版本: 【已解决】这段IniReadSection代码为何不工作.