VB 更改文件名 出错了....救命.....

来源:百度知道 编辑:UC知道 时间:2024/06/17 04:40:54
更改文件名出错了.提示

Run-time Error "53"
File not found!

这是怎麼回事啊?在线等~~~~~

在本机可以正常!到了别的机子就会出现这个错误!!!
Dim oldfilename, newfilename
tpath = App.Path & "\"
oldname = tpath & "new.rar": newname = DateValue(Now() - 0) & ".rar" ' 定义文件名。
Name oldname As newname ' 更改文件名
我是这样写的.有什麼地方错了吗?
new.rar 是绝对的文件名.
newname 是当天的日期.
tpath = App.Path & "\"这里是工程的路径.没有用绝对值啊.
有没有人知道是怎麼一回事?

是不是要在别的机子上在装VB的运行库?

肯定是你用了绝对路径.
如果用d:\folder1\subfod1\fil
建议将文件与工程放在同一文件夹中
然后用app.path & "\文件名.后缀"
格式调用
app.path返回的是当前工程所在的文件夹,当你将工程放于不同的路径.该值返回的值是相应的更改.

如果满意我的回答,请采纳,谢谢

没有找到文件。