Image store to Web-Folder Class

Imports Microsoft.VisualBasic
Public Class StoreToFolder
Function WebFolderImg(ByVal FileUploadId As FileUpload, ByVal FolderName As String, ByVal FileName As String, ByVal Operation As String) As String
If Operation = "Insert" Then
Dim NewFileName As String = ""
Dim File As String = System.IO.Path.GetFileName((FileUploadId).PostedFile.FileName)
Dim extension As String = System.IO.Path.GetExtension((FileUploadId).PostedFile.FileName)
'*** Add File To Web-Folder
NewFileName = Format(Now(), "ddMMyyHHmmss") + extension
Dim Path As String
Path = HttpContext.Current.Server.MapPath("..\" + FolderName + "\") + NewFileName
FileUploadId.SaveAs(Path)
Return NewFileName
ElseIf Operation = "InsertProduct" Then
Dim NewFileName As String = ""
Dim File As String = System.IO.Path.GetFileName((FileUploadId).PostedFile.FileName)
Dim extension As String = System.IO.Path.GetExtension((FileUploadId).PostedFile.FileName)
'*** Add File To Web-Folder
NewFileName = FileName + Format(Now(), "ddMMyyHHmmss") + extension
Dim Path As String
Path = HttpContext.Current.Server.MapPath("..\" + FolderName + "\") + NewFileName
FileUploadId.SaveAs(Path)
Return NewFileName
ElseIf Operation = "Delete" Then
Dim DeletedFile As String = HttpContext.Current.Server.MapPath("..\" + FolderName + "\" + FileName)
System.IO.File.Delete(DeletedFile)
End If
Return ""
End Function
End Class