vb.net重命名文件夾，里面存在文件夾和文件，不用移動(dòng)和復(fù)制的

Microsoft.VisualBasic.FileSystem.Rename(原文件夾完整路徑名稱，新的文件夾名稱）

讓客戶滿意是我們工作的目標(biāo)，不斷超越客戶的期望值來(lái)自于我們對(duì)這個(gè)行業(yè)的熱愛(ài)。我們立志把好的技術(shù)通過(guò)有效、簡(jiǎn)單的方式提供給客戶，將通過(guò)不懈努力成為客戶在信息化領(lǐng)域值得信任、有價(jià)值的長(zhǎng)期合作伙伴，公司提供的服務(wù)項(xiàng)目有：域名與空間、虛擬空間、營(yíng)銷軟件、網(wǎng)站建設(shè)、臨縣網(wǎng)站維護(hù)、網(wǎng)站推廣。

Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2\1")‘當(dāng)路徑不對(duì)時(shí)會(huì)把原文件夾剪切到“D:\2\”下面文件夾名稱不變

Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2\2")")‘當(dāng)路徑不對(duì)時(shí)會(huì)把原文件夾剪切到“D:\2\”下面文件夾名稱 更改為 2

Microsoft.VisualBasic.FileSystem.Rename("D:\1", "D:\2")’當(dāng)路徑相同時(shí)只改文件夾名稱 不移動(dòng)文件

希望能幫到你

VB中重命名文件名

把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

Next

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

另外提問(wèn)的時(shí)候要注意把已知的條件和要達(dá)到的效果說(shuō)清楚，“已知文件名的若干文件”到底是什么樣的文件名，有沒(méi)有什么規(guī)律？是否在同一文件夾下？或者是否已將文件名存放在一個(gè)字符串?dāng)?shù)組中？不說(shuō)清楚別人怎么能幫你，只能給你一個(gè)實(shí)現(xiàn)的思路了

vb.net監(jiān)控路徑上的任一文件夾，當(dāng)重命名時(shí)觸發(fā)事件。

你用兩個(gè) FileSystemWatcher，一個(gè)監(jiān)控父文件夾，并禁止其改名，另一個(gè)監(jiān)控子文件夾，并改名后提示就是了