我只想復制特定檔案，但它會復制目錄中的所有檔案。有沒有辦法實作它？
這是我的代碼：
Dim dir As DirectoryInfo = New DirectoryInfo("\\SERVER-PC\BrokerDatabase\BrokerDatabase\Attachments")
For Each fi As FileInfo In dir.GetFiles()
fi.CopyTo("D:\" fi.Name)
Next
uj5u.com熱心網友回復：
它復制目錄中的所有檔案，因為您正在回圈 .CopyTo 沒有任何條件。如果您要查找的檔案的檔案名是靜態的，請添加一個條件，這樣它就不會復制所有檔案。
Dim dir As DirectoryInfo = New DirectoryInfo("\\SERVER-PC\BrokerDatabase\BrokerDatabase\Attachments")
For Each fi As FileInfo In dir.GetFiles()
If fi.Name = "FileToBeCopied.txt" Then
fi.CopyTo("D:\" fi.Name)
End If
Next
uj5u.com熱心網友回復：
另一種（花哨的）方式，
Dim allSeries As IEnumerable(Of String) =
Directory.EnumerateFiles(root, file, SearchOption.AllDirectories)
If allSeries.Count = 0 Then
MsgBox("not found.")
End If
其中“root”是帶有檔案路徑的字串，“file”是帶有檔案名的字串
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/467000.html
標籤：VB.net
上一篇：動態變數變化VB.NET