From 73c5255bd596b9058646091646fb01fbccffe6cc Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 10 Mar 2020 11:44:49 +0100 Subject: [PATCH] add debuggerstepthrough attribute to MoveFile --- Modules.Filesystem/File.vb | 2 ++ 1 file changed, 2 insertions(+) diff --git a/Modules.Filesystem/File.vb b/Modules.Filesystem/File.vb index 1d73a274..b6b30ae8 100644 --- a/Modules.Filesystem/File.vb +++ b/Modules.Filesystem/File.vb @@ -161,11 +161,13 @@ Public Class File Return True End Function + Public Sub MoveTo(FilePath As String, Directory As String) Dim oFileInfo As New FileInfo(FilePath) IO.File.Move(FilePath, Path.Combine(Directory, oFileInfo.Name)) End Sub + Public Sub MoveTo(FilePath As String, NewFileName As String, Directory As String) Dim oFileInfo As New FileInfo(FilePath) IO.File.Move(FilePath, Path.Combine(Directory, NewFileName))