木头人 发表于 2010-11-16 14:58:46

【已解决】如何将获取脚本所在分区的根目录呢？

本帖最后由 木头人 于 2010-11-17 02:10 编辑

例如脚本存在于x:\SSS\AA.au3
x: 为未知数，不知具体在哪个盘上。
如何将x:\SSS\XX.EXE复制至x: 根目录上
AA.AU3为脚本所在路径，XX.EXE与脚本存在同一目录中。
谢谢。

afan 发表于 2010-11-16 15:02:06

MsgBox(0, '分区根目录', StringRegExpReplace(@ScriptDir, '(\w:).*', '$1'))

king8462 发表于 2010-11-16 15:15:39

#include <file.au3>
#include <array.au3>

Dim $szDrive, $szDir, $szFName, $szExt
$TestPath = _PathSplit(@ScriptFullPath, $szDrive, $szDir, $szFName, $szExt)
FileCopy(@ScriptDir&"\xxx.exe", $TestPath&"\")

无名蜘蛛 发表于 2010-11-16 15:17:03

利用宏 得到脚本所在路径
获取路径左边两位 就是盘符

木头人 发表于 2010-11-16 15:21:55

非常感谢，知道怎么获取了，但是具体复制语句应该怎么写呢，谢谢

king8462 发表于 2010-11-16 15:25:23

非常感谢，知道怎么获取了，但是具体复制语句应该怎么写呢，谢谢
木头人 发表于 2010-11-16 15:21 http://www.autoitx.com/images/common/back.gif

看我3楼的代码！

无名蜘蛛 发表于 2010-11-16 15:29:19

本帖最后由 无名蜘蛛 于 2010-11-16 15:32 编辑

$var1 = @ScriptDir
MsgBox(0,"","脚本所在目录:"&$var1)
$var2 = StringLeft(@ScriptDir,3)
MsgBox(0,"","根目录:"&$var2)
FileCopy($var1&"\*.exe",$var2)
MsgBox(0,"","复制当前目录下的所有EXE到根目录")

无名蜘蛛 发表于 2010-11-16 15:30:36

回复 3# king8462

你调用了一个自定义函数 为什么不写出来看下

king8462 发表于 2010-11-16 15:39:02

回复king8462

你调用了一个自定义函数 为什么不写出来看下
无名蜘蛛 发表于 2010-11-16 15:30 http://www.autoitx.com/images/common/back.gif

这个是内置函数！

无名蜘蛛 发表于 2010-11-16 15:48:23

是的 三楼的更实际一些

binghc 发表于 2010-11-16 15:53:58

这方法多了，2#的正则3#的系统函数7#的路径截取，随便挑一个!{:face (125):}

afan 发表于 2010-11-16 16:06:54

是的 三楼的更实际一些
无名蜘蛛 发表于 2010-11-16 15:48 http://www.autoitx.com/images/common/back.gif


    接触了正则的人是不会舍近求远的…… ^

netegg 发表于 2010-11-16 16:12:31

本帖最后由 netegg 于 2010-11-16 16:15 编辑

#Include <WinAPIEx.au3>
_WinAPI_PathGetDriveNumber( @scriptfullpath )

木头人 发表于 2010-11-16 16:28:22

感谢楼上的各位热心帮助，问题已经解决！

haodd 发表于 2010-11-16 20:39:06

解决了 结贴啊 改标题
页: [1] 2
查看完整版本: 【已解决】如何将获取脚本所在分区的根目录呢？