Question

VB拖动复制文件；重命名文件夹

谁有代码，我要一个小功能。拖动文件（包含文件夹，原封不动复制进去），到局域网电脑指定路径（路径可以自定义，默认指定为年月日为文件名的文件夹内，没有则创建）；重命名文件夹格式：自定义1+自定义2+自定义3

Answer 1

Microsoft.VisualBasic.FileSystem.Rename(原文件夹完整路径名称，新的文件夹名称）
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")’当路径相同时只改文件夹名称 不移动文件