<%@ Import Namespace="System" %>
<%@ Import Namespace="System.IO" %>
<%@ Page Language="VB" %>
Public Sub Page_Load(Source As Object, E As EventArgs)
MessageLiteral.Text = ""
End Sub
Public Sub DeleteFile(Source As Object, E As EventArgs)
'Delete the file if it exists
Try
If File.Exists(FileNameTextBox.Text) Then
File.Delete(FileNameTextBox.Text)
MessageLiteral.Text = "File has been deleted."
Else
MessageLiteral.Text = FileNameTextBox.Text & " does not exist."
End If
Catch _Error As Exception
MessageLiteral.Text = _Error.Message
End Try
End Sub
Deleting a File
Type Path/Name of file to delete it (disabled for live demo)