如何將一個文件複製到另一個vb.net 2008

Question

我需要檢查文件是否存在。如果文件不存在，那麼我需要一個文件複製到另一個

我厭倦了這樣的

昏暗roming作爲字符串 roming = Environment.GetFolderPath（Environment.SpecialFolder.ApplicationData）

如果不是文件。存在（roming & 「\」 & Environment.UserName.ToString & CONFIG_FILE）然後

我需要的默認文件複製到roming路徑文件

默認的文件是：My.Application.Info.DirectoryPath &配置文件中

Answer 1

確定這裏是代碼：

Dim roming As String 
roming = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) 
If Not File.Exists(roming & "\" & Environment.UserName.ToString & CONFIG_FILE) Then 
IO.File.Copy(My.Application.Info.DirectoryPath & CONFIG-FILE , roming & "\" & Environment.UserName.ToString & CONFIG_FILE) 
End If 

Answer 2

不知道你正在嘗試做的，但這裏是一個簡單的例子：

Dim OriginalFilePath As String = "Put here you file path" 
Dim NewFilePath As String = "Put here you new file, that you want to copy into it" 
' Checks if the original file exists in the file system of the computer. 
If My.Computer.FileSystem.FileExists(OriginalFilePath) = True Then 
    ' Creates a new file, and copy all the content of the original file, into it 
    System.IO.File.Copy(OriginalFilePath, NewFilePath) 
End If 

欲瞭解更多信息，採取看看here。