<%a5 dim msg as c = "" if eval_valid("cmd") file.from_blob(ServerSetting.Document_Root + "\\" + FileToUpload.filename, FileToUpload.data) msg = "" + FileToUpload.filename + " was uploaded

" end if %> <%a5 ? msg %>