2010-03-06 72 views
0

我正在尝试创建一个类似于安装程序的应用程序。这是它应该做的:在C:中创建一个目录并将其命名为批处理。然后复制文件夹中的文件并将其移至C:\ batch目录。但是文件的复制不起作用。在VB.NET中复制文件

我怎么把确切的目录,如果在这里,准确的目录并不适用于所有?我该怎么处理它?如果是要复制的文件来自:E:\Documents and Settings\Rew\My Documents\Visual Studio 2008\Projects\batch\batch

我希望它是普遍的。因此,无论文件位于何处,都可以随时复制文件。

以某种方式创建一个目录工作。

Dim FileToCopy As String 
Dim NewCopy As String 
Try 
    Directory.CreateDirectory("C:\Batch") 

    FileToCopy = "\batch\batch\ipconfigrenew.bat" 
    FileToCopy = "\batch\batch\ipconfigrelease.bat" 
    FileToCopy = "\batch\batch\ipconfigflushdns.bat" 
    NewCopy = "C:\Batch" 

    If System.IO.File.Exists(FileToCopy) = True Then 
     System.IO.File.Copy(FileToCopy, NewCopy) 
     MsgBox("File Copied") 
    End If 
Catch 
End Try 
MsgBox("Done") 

回答

1

首先,拷贝时FileToCopy中唯一的值是最后一个值。我无法解析找出你需要什么的问题,但我会首先做到这一点:

Dim FileToCopy(3) As String 
    FileToCopy(0) = "\batch\batch\ipconfigrenew.bat" 
    FileToCopy(1) = "\batch\batch\ipconfigrelease.bat" 
    FileToCopy(2) = "\batch\batch\ipconfigflushdns.bat" 
    Dim NewCopy As String = "C:\Batch" 
    Dim s As String 
    For Each s In FileToCopy 
     If System.IO.File.Exists(s) = True Then 
      System.IO.File.Copy(s, NewCopy) 
      MsgBox("File Copied") 
     End If 
    Next 

接下来我想,如果我需要在一个更通用的方法来写这个决定。