Dim upload As String = Request.GetUploadedFile("order")
File.Copy(server.TempFolder, upload, CurrentPath, Request.GetParameter("order"))
File.Copy(server.TempFolder, upload, File.DirRootExternal & "/" & bestanden.filedir, "1.dat") 'the file name is sent as a parameter
File.Delete(server.TempFolder, upload) 'delete the temporary file.