找回密码  加入

AUTOIT CN

搜索
查看: 159|回复: 2

[AU3基础] 【已解决】数组写入ini文件问题

[复制链接]
发表于 2022-5-24 16:33:31 | 显示全部楼层 |阅读模式
本帖最后由 voiovoiov 于 2022-5-24 17:10 编辑

想将以下数组写入ini里边


想要达到的效果:

代码:

For $i = 1 To $Array[0][0]
        $Series = StringRegExp($Array[$i][0], '(\w+)-', 1)
        If @error Then
                ContinueLoop
        Else
                IniWrite("c:/test.ini", "Class", "Series", $Series[0]&"-|")
                $SubSeries = StringRegExp($Array[$i][0], '-(\w+)', 1)
                If Not @error Then
                        IniWrite("c:/test.ini", "Class", $Series[0] & "-", $SubSeries[0] & "|")
                EndIf
        EndIf
Next

以上代码出来的实际效果:


请问是哪里错了?麻烦指导一下,谢谢。





本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?加入

x

评分

参与人数 1金钱 +20 收起 理由
afan + 20 及时结贴+

查看全部评分

发表于 2022-5-24 17:03:17 | 显示全部楼层
先取现有数据,再连接
  1. Local $fini = "c:\test.ini"
  2. For $i = 1 To $Array[0][0]
  3.         $Series = StringRegExp($Array[$i][0], '(\w+)-', 1)
  4.         If @error Then
  5.                 ContinueLoop
  6.         Else
  7.                 IniWrite($fini, "Class", "Series", IniRead($fini, "Class", "Series", "") & $Series[0] & "-|")
  8.                 $SubSeries = StringRegExp($Array[$i][0], '-(\w+)', 1)
  9.                 If Not @error Then
  10.                         IniWrite($fini, "Class", $Series[0] & "-", IniRead($fini, "Class", $Series[0] & "-", "") & $SubSeries[0] & "|")
  11.                 EndIf
  12.         EndIf
  13. Next
复制代码
 楼主| 发表于 2022-5-24 17:09:49 | 显示全部楼层
afan 发表于 2022-5-24 17:03
先取现有数据,再连接

感谢A版,测试过没问题,受益匪浅
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|小黑屋|手机版|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2022-6-26 06:52 , Processed in 0.156250 second(s), 30 queries .

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表