您的位置:首页 > 其它

关于Max贴图路径的重新查找指定

2011-06-16 12:14 459 查看
这个范例只是演示基本需要的东西,本身速度并不好并且只是针对单个Max文件操作。有需要的人自己修改。

此外,用相对路径可以完全避免此类问题,有兴趣的看这里

/article/6183151.html

View Code

Fn SetDirectoryAccessControlType inputDirectoryInfo =
(
tempUserName = (DotNetClass "System.Environment").UserName
fileSystemRights = (DotNetClass "System.Security.AccessControl.FileSystemRights").Modify
accessControlType = (DotNetClass "System.Security.AccessControl.AccessControlType").Allow
fileSystemAccessRule = DotNetObject "System.Security.AccessControl.FileSystemAccessRule" tempUserName fileSystemRights accessControlType
directorySecurity = inputDirectoryInfo .GetAccessControl()
directorySecurity.AddAccessRule fileSystemAccessRule
inputDirectoryInfo .SetAccessControl directorySecurity
)

Fn GetAllFiles targetPath fileFilter  =
(
local SearchOption,DotNetDirectoryInfo
SearchOption = DotNetClass "System.IO.SearchOption"
DotNetDirectoryInfo = DotNetObject "System.IO.DirectoryInfo" targetPath
SetDirectoryAccessControlType DotNetDirectoryInfo
result = for tfi in (DotNetDirectoryInfo.GetFiles fileFilter SearchOption.AllDirectories) collect tfi.FullName
result
)

Fn GetStringParseCount inputString1 inputString2 =
(
result = 0
referenceString = inputString1
if inputString1.count > inputString2.count do referenceString = inputString2
for i = 0 to referenceString.count - 1 do
(
if inputString1[inputString1.Count - i] == inputString2[inputString2.Count - i] then
(
result += 1
)
else
(
exit
)
)
result
)

Fn GetRootTrackNode = (refs.Dependents RootNode)[1]

Fn RecursionProcessFilePath inputTargetNode inputNewPath =
(
for i = 1 to inputTargetNode.numSubs do
(
tempSubAnim = getSubAnim  inputTargetNode i
tempNode = (getSubAnim  inputTargetNode i).object
if ClassOf tempNode == Bitmaptexture do
(
oldFileFullName = tempNode.FileName
if oldFileFullName != "" and  not DoesFileExist oldFileFullName do
(
oldFileName = FilenameFromPath oldFileFullName
newFilelist = GetAllFiles inputNewPath oldFileName
maxParseFileName = ""
for tempFileName in newFilelist where
(
GetStringParseCount tempFileName oldFileName > GetStringParseCount tempFileName maxParseFileName
)
do
(
maxParseFileName = tempFileName
)
if maxParseFileName != "" do tempNode.FileName =  maxParseFileName
)
)
if tempSubAnim.numSubs > 0 do RecursionProcessFilePath tempSubAnim  inputNewPath
)
)
newPath = GetSavePath()
if undefined !=  newpath do RecursionProcessFilePath (GetRootTrackNode()) newPath
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: