vb.net重命名文件,vb 复制文件并重命名

vb.net重命名文件夹，里面存在文件夹和文件，不用移动和复制的

Microsoft.VisualBasic.FileSystem.Rename(原文件夹完整路径名称，新的文件夹名称）

我们提供的服务有：成都做网站、成都网站制作、成都外贸网站建设、微信公众号开发、网站优化、网站认证、成安ssl等。为千余家企事业单位解决了网站和推广的问题。提供周到的售前咨询和贴心的售后服务，是有科学管理、有技术的成安网站制作公司

Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2\1")‘当路径不对时会把原文件夹剪切到“D:\2\”下面文件夹名称不变

Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2\2")")‘当路径不对时会把原文件夹剪切到“D:\2\”下面文件夹名称更改为 2

Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2")’当路径相同时只改文件夹名称不移动文件

希望能帮到你

把D:\test\目录下的所有jpg文件重命名为pic###.jpg的代码：

Dim i As Integer

i = 1

Set fs = CreateObject("scripting.filesystemobject")

Set fd = fs.GetFolder("d:\test")

For Each f In fd.Files

If LCase(f.ShortName) Like "*.jpg" Then

f.Name = "pic" Format(i, "000") ".jpg"

i = i + 1

End If

如果文件名已确定，可以用Set f=fs.GetFile("[完整路径和文件名]")，然后用f.Name="[新文件名]"

另外提问的时候要注意把已知的条件和要达到的效果说清楚，“已知文件名的若干文件”到底是什么样的文件名，有没有什么规律？是否在同一文件夹下？或者是否已将文件名存放在一个字符串数组中？不说清楚别人怎么能帮你，只能给你一个实现的思路了

要在同目录下就是和页面在一起

Dim filepath1,filepath2 as String

filepath1=Server.MapPath("File/txtname.Text")

filepath2=Server.MapPath("File/"name1)

System.IO.File.Copy(filepath2,filepath1)

System.IO.File.Delete(filepath2)

新闻标题：vb.net重命名文件,vb 复制文件并重命名
链接地址：http://azwzsj.com/article/hophgp.html