diff options
Diffstat (limited to 'ShiftOS-TheRevival/MainForms/FileManagement.vb')
| -rw-r--r-- | ShiftOS-TheRevival/MainForms/FileManagement.vb | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/ShiftOS-TheRevival/MainForms/FileManagement.vb b/ShiftOS-TheRevival/MainForms/FileManagement.vb index fcff2d6..32d7822 100644 --- a/ShiftOS-TheRevival/MainForms/FileManagement.vb +++ b/ShiftOS-TheRevival/MainForms/FileManagement.vb @@ -8,6 +8,12 @@ Module FileManagement End If End Sub + Public Sub DeleteFile(filename As String) + If File.Exists(Terminal.CurrentDirectory & "\" & filename) = True Then + File.Delete(Terminal.CurrentDirectory & "\" & filename) + End If + End Sub + Public Sub SaveFile(filename As String) 'If File.Exists(Terminal.CurrentDirectory & "\" & filename) = False Then ' File.WriteAllText(Terminal.CurrentDirectory & "\" & filename, Terminal.TextBox1.Text) |