home *** CD-ROM | disk | FTP | other *** search
/ Program Collection for Windows 95 #17 / Win95-17.iso / system.win / osr25 / win95_23.cab / diraddu.htr < prev    next >
Text File  |  1996-08-24  |  2KB  |  61 lines
  1. <html>
  2. <%onerror error%>
  3. <title>Internet Services Administrator - Directory</title>
  4. <body bgcolor="#FFFFFF" BACKGROUND="/htmla/spec1.gif" LINK=#802020 VLINK=#802020>
  5. <%if reqparam RF "bdir"%>
  6. <%redirect%>/HtmlaScripts/htmla.dll?dir/bdir+<%servname%>/diradd?rootdir?<%msgbody.rootdir%><%/redirect%>
  7. <%endif%>
  8. <%if reqparam RF "cancel"%>
  9. <%goto end%>
  10. <%endif%>
  11. <%if reqparam RF "doalias"%>
  12. <%!AliasVirtDir "/" msgbody.rootaddr%>
  13. <%elif msgbody.rootishome EQ "1"%>
  14. <%!CheckForVirtDir "/" msgbody.rootaddr%>
  15. <%endif%>
  16. <%if msgbody.rootdir EQ "" %>
  17.  Path for  virtual directory is invalid. Please correct. <p>
  18.  <%goto main%>
  19. <%endif>
  20. <%!AddVirtDir%>
  21. <%!Update%>
  22. <%label end%>
  23. <%redirect%>/HtmlaScripts/htmla.dll?<%servname%>/dir<%/redirect%>
  24. <%label error%>
  25. <%if reqstatus EQ 14000%>
  26. <form method="POST" action="/HtmlaScripts/htmla.dll?<%servname%>/diraddu">
  27. A home directory already exists for this service.
  28. Creating a new home directory will cause the existing directory
  29. to no longer be a home directory.
  30. An alias will be created for the existing home directory.<p>
  31. <input type="hidden" name=rootdir value="<%msgbody.rootdir%>">
  32. <input type="hidden" name=rootishome value="<%msgbody.rootishome%>">
  33. <input type="hidden" name=rootname value="<%msgbody.rootname%>">
  34. <%if platformtype NE 3%>
  35. <!-- Not on Windows 95 (CHICAGO) -->
  36. <input type="hidden" name=rootacctname value="<%msgbody.rootacctname%>">
  37. <input type="hidden" name=rootacctpw value="<%msgbody.rootacctpw%>">
  38. <%endif%>
  39. <input type="hidden" name=rootaddr value="<%msgbody.rootaddr%>">
  40. <%if reqparam RF "rootisread"%>
  41. <input type="hidden" name=rootisread value="<%msgbody.rootisread%>">
  42. <%endif%>
  43. <%if reqparam RF "rootiswrite"%>
  44. <input type="hidden" name=rootiswrite value="<%msgbody.rootiswrite%>">
  45. <%endif%>
  46. <%if reqparam RF "rootisexec"%>
  47. <input type="hidden" name=rootisexec value="<%msgbody.rootisexec%>">
  48. <%endif%>
  49. <%if reqparam RF "rootisssl"%>
  50. <input type="hidden" name=rootisssl value="<%msgbody.rootisssl%>">
  51. <%endif%>
  52. <input type="submit" name="doalias" value=" OK ">
  53. <input type="submit" name="cancel" value=" CANCEL ">
  54. </form>
  55. <%else%>
  56. Error encountered : <%reqstatus%>
  57. <%endif%>
  58. <%label main%>
  59. <a href="/htmla/htmla.htm">Return to main menu</a>
  60. </html>
  61.