找回密码
 加入
搜索
查看: 3737|回复: 5

[AU3基础] 【已解决】新手关于写入、读取ini出错,求助

  [复制链接]
发表于 2010-10-18 01:29:35 | 显示全部楼层 |阅读模式
本帖最后由 leaive 于 2010-10-18 13:55 编辑

要实现的目的:
1,判断程序所在目录$wxkfoder是否存在ini文件,否则创建
2,获取变量并写入ini
3,读取ini中的变量写入$wxkfoder

问题:写入/读取ini时出错,求助.....
Dim $wxkfoder,$inidata
$inifile = (@ScriptDir & "\wxnoad.ini")
If FileExists (@ScriptFullPath & "wxnoad.ini") -1 Then
        IniWriteSection($inifile,"配置信息",$inidata)
ElseIf FileExists (@ScriptFullPath & "\wxnoad.ini") Then
        IniRead(@ScriptDir & "\wxnoad.ini","配置信息","程序目录")
        ConsoleWrite($wxkfoder)
Else        
        $wxkfoder = FileSelectFolder("请选择服务端所在目录.", "") 
If FileExists ($wxkfoder & "\wxdbserv.exe") -1 Then
        MsgBox(0,"目录不正确","请重新选择")        
ElseIf FileExists ($wxkfoder & "\WxDBServ.exe") Then
        MsgBox(0,"tips","目录正确")
ConsoleWrite($wxkfoder)
IniWrite($inifile,"配置信息","程序目录","$wxkfoder")
MsgBox(0,"tips","写入ok")
 EndIf

评分

参与人数 1金钱 +10 收起 理由
afan + 10 感谢主动将修改帖子分类为[已解决],请继续 ...

查看全部评分

发表于 2010-10-18 11:54:30 | 显示全部楼层
“If FileExists (@ScriptFullPath & "wxnoad.ini") -1 Then” 改为
“If Not FileExists($inifile) Then” 其它错误类似~
发表于 2010-10-18 12:10:40 | 显示全部楼层
A版就是牛P,学习了
 楼主| 发表于 2010-10-18 13:55:06 | 显示全部楼层
谢谢A版,已搞定~
发表于 2014-5-6 07:28:37 | 显示全部楼层
雷锋精神传天下!谢谢分享!
发表于 2015-12-13 20:42:53 | 显示全部楼层
学习了 感谢分享
您需要登录后才可以回帖 登录 | 加入

本版积分规则

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

GMT+8, 2024-11-23 11:09 , Processed in 0.076816 second(s), 24 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

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