home *** CD-ROM | disk | FTP | other *** search
/ PC World 2001 January / PCWorld_2001-01_cd.bin / Software / Topware / sambar / _SETUP.1 / create.stm < prev    next >
Text File  |  2000-10-17  |  2KB  |  67 lines
  1. <HTML>
  2. <HEAD><TITLE>Sambar Server Document Manager</TITLE>
  3. <SCRIPT language="JavaScript">
  4. <!--
  5.  
  6. var strValid = "abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789.-_";
  7.  
  8. function Form_Validator(theForm)
  9. {
  10.     var alertstr = "Please correct the following\n";
  11.  
  12.     if (theForm.name.value == "")
  13.     {
  14.         alert(alertstr + "Enter a value for the document \"name\" field.");
  15.         theForm.name.focus();
  16.         return (false);
  17.     }
  18.  
  19.     for (j = 0; j < theForm.name.value.length; j++)
  20.     {
  21.         if (strValid.indexOf(theForm.name.value.charAt(j)) == -1)
  22.         {
  23.             alert(alertstr + "The \"name\" contains invalid characters.");
  24.             theForm.name.focus();
  25.             return (false);
  26.         }
  27.     }
  28. }
  29. //-->
  30. </SCRIPT>
  31. </HEAD>
  32. <BODY bgcolor=#ffffff>
  33. <center><FONT SIZE=6>Sambar Server Document Manager</FONT>
  34. <P>
  35. <TABLE border=0 cellspacing=8>
  36. <TR><TD>
  37. <br>
  38. <B><FONT SIZE=+2 COLOR=#000088>Upload File</FONT></B><BR>
  39. <FORM METHOD="POST" ACTION="/session/dm-create" onsubmit="return Form_Validator(this)" enctype="multipart/form-data">
  40. <input type=hidden name="home" value="<RCSbrowse>">
  41. <input type=hidden name="root" value="<RCPdir>">
  42. <input type=hidden name="path" value="<RC@txt2html(RC$path)>">
  43. <TABLE border=0 cellspacing=4>
  44. <TR><TD><B>Path:</B></TD>
  45.     <TD><FONT SIZE=+1><I><RC$path></I></FONT></TD></TR>
  46. <TR><TD><B>File:</B></TD>
  47.     <TD><input type=text name="name" value="new.htm" size=40></TD></TR>
  48. <TR><TD></TD><TD><I>(Note: File name may not contain spaces!)</I></TD></TR>
  49. </TABLE>
  50. <br>
  51. <input type=file name="upfile" size=60>
  52. <br>
  53. <I>(Maximum file size is 100KB).</I>
  54. <br>
  55. <br>
  56. <input type=submit value="Upload File">
  57. </FORM>
  58. <BR>
  59. Return to browsing: 
  60.     <A HREF="<RCSbrowse>/browse.stm?path=<RC@urlescape(RC$path)>"><RC$path></A>
  61. <BR>
  62. </TD></TR>
  63. </TABLE>
  64. </CENTER>
  65. </BODY>
  66. </HTML>
  67.