刪除文件時未指定路徑

我想重命名文件，然後刪除相同文件路徑中的舊文件。刪除文件時未指定路徑

我想刪除舊文件，必須指定一個路徑。

Private Sub CommandButton4_Click() 

    Dim src As String, dst As String, fl As String 
    Dim rfl As String 

    'Source directory 
    src = ActiveWorkbook.Path 

    'Destination directory 
    dst = ActiveWorkbook.Path 

    'File name 
    fl = "file.mdb" 

    'Rename file 
    rfl = "file_OLD.mdb" 

    On Error Resume Next 
     FileCopy src & "\" & fl, dst & "\" & rfl 
     If Err.Number <> 0 Then 
      MsgBox "Copy error: " & src & "\" & rfl 
     End If 
    On Error GoTo 0 

    Kill file 


End Sub

來源

2017-08-07 Max Bridge

當你重命名文件，沒有舊文件。舊文件被重命名爲新文件名。你在找什麼？ – shahkalpesh

這都不合理。你有一條路徑，爲什麼你不指定路徑很重要（更不用說像@shahkalpesh說重命名文件會使舊名字消失）。 – JNevill

注意：'FileCopy src＆「\」＆fl，dst＆「\」＆rfl'不是**重命名**文件，而是**複製**文件 - 重新命名它（並可能移動它）你會說'Name src＆「\」＆fl As dst＆「\」＆rfl' – YowE3K

您可以使用 Name src & "\" & fl As dst & "\" & rfl

來源

2017-08-08 09:32:29 SayaliT

謝謝，只會刪除當前文件夾中的文件，而不必指定路徑（因爲它總是不同的）幫幫我！ –

刪除文件時未指定路徑

回答

相關問題