按键精灵:写一个脚本,对一个文件夹内指定格式的文件做重命名处理,命名从1开始,依次下去。

如题所述

lib.文件.找个命令库 按键精灵又自带的。如果你的按键精灵没有问题的话 直接复制就可以用了

Dim 路径, i, a
路径 = "C:\Users\Administrator\Desktop\新建文件夹" //你改成自己要用的路径
数组 = Lib.文件.遍历指定目录下所有文件名(路径)
For i = 0 To UBound(数组) - 1
a = i + 1
Call Plugin.File.ReNameFile(路径 & "\" & 数组(i), 路径 & "\" & a & ".txt")
TracePrint 路径 & "\" & a & ".txt"
TracePrint 路径 & 数组(i)
Next
温馨提示:内容为网友见解,仅供参考
无其他回答

按键精灵:写一个脚本,对一个文件夹内指定格式的文件做重命名处理,命名...
lib.文件.找个命令库 按键精灵又自带的。如果你的按键精灵没有问题的话 直接复制就可以用了 Dim 路径, i, a 路径 = "C:\\Users\\Administrator\\Desktop\\新建文件夹" \/\/你改成自己要用的路径 数组 = Lib.文件.遍历指定目录下所有文件名(路径)For i = 0 To UBound(数组) - 1 a = i + 1 ...

我用按键精灵做角本,要对一个文件夹中有N个WORD文件进行相同操作,现以...
MessageBox "鼠标指向第一个文件,然后按键盘任意键"\/\/这个"任意键"不能使窗口有明显变动 WaitKey GetCursorPos x0, y0 MessageBox "鼠标指向最后一个文件,然后按键盘任意键"\/\/这个"任意键"不能使窗口有明显变动 WaitKey GetCursorPos x1, y1 dx=(x1-x0)\/(C-1)dy=(y1-y0)\/(R-1)n=0 For...

按键精灵中如何重命名文件夹中第一个未知的文件?
可选中1个或多个下面的关键词,搜索相关资料。也可直接点“搜索资料”搜索整个问题。 按键精灵 重命名 文件夹 搜索资料 本地图片 图片链接 代码 提交回答 匿名 回答自动保存中 你的回答被采纳后将获得: 系统奖励15(财富值+成长值)+难题奖励10(财富值+成长值)+提问者悬赏5(财富值+成长值)为你推荐:特别推荐...

按键精灵全盘查找某个指定名字的文件,返回文件路径
回答:准确的告诉你 我可以做出来 但是这么强大的脚本你觉得我可能会告诉你怎么做吗 百度知道100分 可以换取计算机的搜索功能吗

用按键精灵或bat做批量重命名
我用的是按键精灵,我提供一个基本代码,你自己理解代码后可修改,代码如下:For i = 1 To N \/\/N是图片数目 j = i + 21 If i < 10 Then i = "0" & i End If \/\/下面那一句是一行 Call Plugin.File.ReNameFile("C:\\User\\M\\Desktop\\图片\\" & j & ".jpg", "C:\\User\\M\\...

用按键精灵怎么实现复制一个文件夹中指定生成时间段的所有文件(今天的...
'我使用的是懒人插件【lxj1985】,使用要先导入懒人插件 Set FSO = CreateObject("Scripting.FileSystemObject")path = "d:\\TEMP\\temp" '原文件夹 d_path = "d:\\TEMP\\temp2" '目标文件夹 R=Plugin.lxj_Plug.lxj_LookFile(path,"*.txt",1) '文件类型 For i=1 to R(0)txtDate = FSO....

按键精灵如何在文件夹内的图片批量重命名
\/\/遍历目录下的所有文件 数组 = lib.文件.遍历指定目录下所有文件夹名("C:\\")For i=0 to UBound(数组)-1 TracePrint 数组(i)Next \/\/改名 Plugin.File.ReNameFile 参数1,参数2 有不明白的可以去全部命令里搜索一下命令,有详细的说明

用按键精灵做一个自动搜索并删除文件夹的脚本该怎么写
看样子你懂VB,按键精灵自带的两个函数你可以参考运用一下,再结合其它函数就能实现你想要的操作,只能给函数你,删除那些你自己写 Function 遍历指定目录下所有文件名(文件夹路径)\/\/注意:返回的是数组变量,存储着每一个文件名。\/\/例子:数组 = lib.文件.遍历指定目录下所有文件名("C:\\")\/\/ F...

用按键精灵帮我写一个每次运行改文件名称
;\/\/随机一个文件名 srand((int)time(NULL));i=rand()%i;\/\/重命名 sprintf(cmd,"rename C:\\123\\%s %s",nowname,tmp[i]);system(cmd);\/\/保存修改后的名字 sprintf(cmd,"\\"%s\\" > list.txt",tmp[i]);\/\/运行 sprintf(cmd,"C:\\123\\%s",tmp[i]);system(cmd);\/\/结束 return 0;...

按键精灵有什么代码可以删除一个文件夹内的所有文件?
For Each f In files FileName = FileName & f.name & ","Next Set fso = Nothing AllFileName = Split(FileName, ",")End Function 上面代码,第一行引号内写文件夹目录,就可以删除文件夹内所有的文件,但是,文件夹里面的文件夹是不删除的,由于你只说删除文件,我就写了只删除文件。

相似回答