如何生成和自身文件名相同的配置文本

fugq0fff · 发表于 2010-4-16 18:22:54

如何生成和自身文件名相同的 ini 配置文本
例如系统工具.au3 生成后总是系统工具.au3.ini

3mile · 发表于 2010-4-16 18:40:26

#include <file.au3>
#include <array.au3>
Dim $szDrive, $szDir, $szFName, $szExt
$TestPath = _PathSplit(@ScriptFullPath, $szDrive, $szDir, $szFName, $szExt)
;_ArrayDisplay($TestPath,"Demo _PathSplit()")
MsgBox(0,0,$testpath[0]&$testpath[1]&$testpath[2]&$testpath[3]&".ini")

maxkingmax · 发表于 2010-4-17 09:33:53

$inifullpath=StringRegExpReplace ( @ScriptFullPath, "\.[^\.]*$", ".ini")
MsgBox(0,$inifullpath,$inifullpath)

menfan · 发表于 2010-4-17 10:21:29

楼上正解，还是正则方便哈

fugq0fff · 发表于 2010-4-17 14:57:06

谢谢已解决

风行者 · 发表于 2010-4-17 21:08:39

$name = StringSplit(@ScriptName,".")
MsgBox(0,"",$name[1]&".ini")

lanfengc · 发表于 2010-4-18 18:53:49

本帖最后由 lanfengc 于 2010-4-18 18:55 编辑

风行者发表于 2010-4-17 21:08

这个代码也可以。哈哈。
这样就更完美了。

$name = StringSplit(@ScriptName,".")
MsgBox(0,"",@ScriptDir&""&$name[1]&".ini")

dajun · 发表于 2010-5-8 18:03:11

楼上代码完美！

dajun · 发表于 2010-5-8 18:06:57

$name = StringSplit(@ScriptFullPath,".")
MsgBox(0,"",$name[1]&".ini")
这样就更加完美了。

afan · 发表于 2010-5-8 22:09:43

$name = StringSplit(@ScriptFullPath,".")
MsgBox(0,"",$name[1]&".ini")
这样就更加完美了。
dajun 发表于 2010-5-8 18:06

这样显然会容易出错。如果文件名含有“.”就嗝屁了

pingfan5888 · 发表于 2011-2-18 20:41:11

呵呵，，收藏学习下。

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

[AU3基础] 如何生成和自身文件名相同的配置文本

评分

评分