ASP批量修改文件名的问题

yjs901 2010-07-15 09:36:48
<%
Dim fso:Set fso=Server.CreateObject("Scripting.FileSystemObject")
Dim files:Set files=fso.GetFolder(Server.MapPath("dll")).files
Dim fileName,Ext,NewFileName,TempArr
For Each f In files
TempArr=split(f.name,".")
Ext=TempArr(1)
fileName=TempArr(0)
NewFileName="三分之二"&"-"&fileName&"."&Ext
f.name=NewFileName
Next
Set files=Nothing
Set fso=Nothing
Response.Write "操作完成"
%>

现在情况是这样,执行过后所有文件前面增加了三次“三分之二”和“-”,这是为什么呢?
...全文
122 7 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
yjs901 2010-07-15
  • 打赏
  • 举报
回复
不可能哦,我只刷新了一次。
lionz1023 2010-07-15
  • 打赏
  • 举报
回复
测试了下,没有问题,能够正常命名,你不会刷新了三次吧,刷一次加一个。
yjs901 2010-07-15
  • 打赏
  • 举报
回复
一个文件也是重复命名三次的,2、3、4、5个文件都是重复命名三次
lionz1023 2010-07-15
  • 打赏
  • 举报
回复
是不是里面一共就三个文件?
你留一个试试看看增加几个相同的名字,
然后4个是不是就四个重复命名呢?
yjs901 2010-07-15
  • 打赏
  • 举报
回复
高人呢?求解啊
lionz1023 2010-07-15
  • 打赏
  • 举报
回复
放一个服务器测试下吧
lionz1023 2010-07-15
  • 打赏
  • 举报
回复
[Quote=引用 5 楼 yjs901 的回复:]
不可能哦,我只刷新了一次。
[/Quote]
那应该是你那边本身的原因了,我测试良好!

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧