/packages/fcl-web/examples/fptemplate/fileupload/templates/uploadform.html

https://github.com/slibre/freepascal · HTML · 67 lines · 55 code · 12 blank · 0 comment · 0 complexity · 26111793ae4006d504f7895b38353600 MD5 · raw file

  1. <html>
  2. <head>
  3. <script type="text/javascript" language="JavaScript1.2">
  4. function chkFields(){
  5. var Error = false;
  6. if ( document.DataForm.uploaderperson.value == '')
  7. { alert('Please enter an uploader person.'); }
  8. else if ( (document.DataForm.file1.value == '') && (document.DataForm.file2.value == '') )
  9. { alert('Please select a file to upload.'); }
  10. else
  11. Error = true;
  12. return Error;
  13. }
  14. </script>
  15. </head>
  16. <body>
  17. File upload screen<br>
  18. <small>Last refresh: {+DATETIME [-FORMAT=MM/DD/YYYY hh:mm:ss.zzz-]+}</small><br><br>
  19. {+MESSAGES [-TOOBIG=<font color="red">You have tried to upload a file that exceeds the size limit.</font>-]
  20. [-NOTFOUND=<font color="red">File not found for delete.</font>-]
  21. +}
  22. <br><br>Maximum allowed file size to be stored: {+MAX_SIZE+}MB<br>
  23. <form action="/fileuploader/listfiles" method="post" enctype="multipart/form-data" name="DataForm" onsubmit="return chkFields();">
  24. <table>
  25. <tr>
  26. <td>Uploader:</td>
  27. <td><input type="text" name="uploaderperson" value=""></td>
  28. </tr>
  29. <tr>
  30. <td>File1:</td>
  31. <td><input name="file1" type="file" size="60"></td>
  32. </tr>
  33. <tr>
  34. <td>File2:</td>
  35. <td><input name="file2" type="file" size="60"></td>
  36. </tr>
  37. <tr>
  38. <td colspan=2 align="center"><input type="submit" value="Upload"></td>
  39. </tr>
  40. </table>
  41. </form><br><br>
  42. Uploaded File List (.../{+UPLOAD_DIR+}):
  43. <table border=1>
  44. <tr><th>File Name</th><th>Uploader</th></tr>
  45. {+FILELIST
  46. [-ONE_ROW=
  47. <tr><td><pre>~FILENAME</pre></td><td>~UPLOADER</td><td><a href="/fileuploader/listfiles?delete=~DFILENAME">Delete</a></td></tr>
  48. -]
  49. [-NOTHINGTOLIST=
  50. <tr><td colspan=3>No files to list</td></tr>
  51. -]
  52. +}
  53. </table>
  54. </body>
  55. </html>