Dim thistime As DateTime
thistime = DateTime.Now
Dim year, month, day, hourse, min, sec, filename, picext, name, strpath, name2, sec2 As String
year = thistime.Year.ToString()
month = thistime.Month.ToString()
day = thistime.Day.ToString()
hourse = thistime.Hour.ToString()
min = thistime.Minute.ToString()
sec = thistime.Second.ToString()
filename = f_FileUpload_Folder.PostedFile.FileName
picext = System.IO.Path.GetExtension(filename)
name = year + month + day + hourse + min + sec + picext
strpath = Request.MapPath(Request.ApplicationPath)
strpath += "\\images\\" + name
f_FileUpload_Folder.PostedFile.SaveAs(strpath)