oeminfo.ini 新添尾行问题

afan · 发表于 2011-10-20 16:17:50

回复 15# suntech

仅此？ 2#即可

3mile · 发表于 2011-10-20 16:22:54

本帖最后由 3mile 于 2011-10-20 16:29 编辑

貌似理解力出了问题？

#include <array.au3>

$ini=IniReadSection("oeminfo.ini","Support Information")
_ArrayDisplay($ini)
MsgBox(0,0,"最后一行："&$ini[$ini[0][0]][0])

#include <array.au3>

$ini=IniReadSection("oeminfo.ini","Support Information")
_ArrayDisplay($ini)
MsgBox(0,0,"最后一行："&$ini[$ini[0][0]][0])
ReDim $ini[UBound($ini)+1][2]
$ini[0][0]=UBound($ini)-1
$ini[$ini[0][0]][0]="Line"&$ini[0][0]
IniDelete("oeminfo.ini","Support Information")
IniWriteSection("oeminfo.ini","Support Information",$ini)
ShellExecute("oeminfo.ini")

xzxnovice · 发表于 2011-10-20 16:28:53

老大出手问题就解决了。

lixiaolong · 发表于 2011-10-20 17:27:00

$ini = FileOpen("oeminfo.ini")
$Test = StringRegExp(FileRead($ini), '(?s)(?i)\[Support Information\].+(line)(\d*)=.*$', 1)
FileClose($ini)
IniWrite("oeminfo.ini", "Support Information", $Test[0] & $Test[1] + 1, "")
ShellExecute("oeminfo.ini")

suntech · 发表于 2011-10-20 21:22:24

回复 19# lixiaolong

3Q 实现了预期的效果。非常感谢！！！

suntech · 发表于 2011-10-20 21:27:49

回复 17# 3mile

3mile 的代码也实现了预期效果，非常感谢！！！

afan · 发表于 2011-10-20 21:41:08

原来楼主还有写ini文件的困扰……

suntech · 发表于 2011-10-20 21:43:10

$ini = FileOpen("C:\WINDOWS\system32\oeminfo.ini")
$Test = StringRegExp(FileRead($ini), '(?s)(?i)\[Support Information\].+(line)(\d*)=.*$', 1)
FileClose($ini)
IniWrite("C:\WINDOWS\system32\oeminfo.ini", "Support Information", $Test[0] & $Test[1] + 1, "这是测试lixiaolong")
ShellExecute("C:\WINDOWS\system32\oeminfo.ini")

#include <array.au3>
$ini=IniReadSection("C:\WINDOWS\system32\oeminfo.ini","Support Information")
_ArrayDisplay($ini)
MsgBox(0,0,"最后一行："&$ini[$ini[0][0]][0])
ReDim $ini[UBound($ini)+1][2]
$ini[0][0]=UBound($ini)-1
$ini[$ini[0][0]][0]="Line"&$ini[0][0]
IniDelete("C:\WINDOWS\system32\oeminfo.ini","Support Information")
IniWriteSection("C:\WINDOWS\system32\oeminfo.ini","Support Information",$ini)
IniWrite("C:\WINDOWS\system32\oeminfo.ini", "Support Information", "Line"&$ini[0][0], "这是测试3mile")
ShellExecute("C:\WINDOWS\system32\oeminfo.ini")

hzxymkb · 发表于 2011-10-20 21:56:05

正则看不懂的路过！

user3000 · 发表于 2011-10-25 15:02:42

这个其实是操作INI配置文件的问题
可以不用正则的
3笑的例子就是

penguinl · 发表于 2011-10-26 10:54:02

你这个是个标准的INI的话，直接获取整个[Support Information]，不就可以知道有多少line了吗？

lonkystar · 发表于 2012-12-23 13:01:30

呵呵学到了

		自动登录	找回密码
密码			加入

[效率算法] oeminfo.ini 新添尾行问题