vb.net File應用(Move,Copy,Delete) [Manage File]

1 2 3 4 5 6 7 8 9

Private Sub btnRestore_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRestore.Click File.Move(Application.StartupPath & "/DataBase.mdb", Application.StartupPath & "/BackUp/AutoSave" & DateTime.Now.ToString("yyyy-MM-dd hh-mm-ss") & ".mdb") File.Copy(Application.StartupPath & "/BackUp/" & DateTime.Now.ToString("yyyy-MM-dd hh-mm-ss") & ".mdb", Application.StartupPath & "/DataBase.mdb", True) File.Delete(Application.StartupPath & "/BackUp/" & DateTime.Now.ToString("yyyy-MM-dd hh-mm-ss") & ".mdb") End Sub