add debuggerstepthrough attribute to MoveFile
This commit is contained in:
parent
0c8a4fb8e3
commit
73c5255bd5
@ -161,11 +161,13 @@ Public Class File
|
|||||||
Return True
|
Return True
|
||||||
End Function
|
End Function
|
||||||
|
|
||||||
|
<DebuggerStepThrough>
|
||||||
Public Sub MoveTo(FilePath As String, Directory As String)
|
Public Sub MoveTo(FilePath As String, Directory As String)
|
||||||
Dim oFileInfo As New FileInfo(FilePath)
|
Dim oFileInfo As New FileInfo(FilePath)
|
||||||
IO.File.Move(FilePath, Path.Combine(Directory, oFileInfo.Name))
|
IO.File.Move(FilePath, Path.Combine(Directory, oFileInfo.Name))
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
|
<DebuggerStepThrough>
|
||||||
Public Sub MoveTo(FilePath As String, NewFileName As String, Directory As String)
|
Public Sub MoveTo(FilePath As String, NewFileName As String, Directory As String)
|
||||||
Dim oFileInfo As New FileInfo(FilePath)
|
Dim oFileInfo As New FileInfo(FilePath)
|
||||||
IO.File.Move(FilePath, Path.Combine(Directory, NewFileName))
|
IO.File.Move(FilePath, Path.Combine(Directory, NewFileName))
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user