Source code of Windows XP (NT5)
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

127 lines
4.9 KiB

  1. <%@ LANGUAGE = VBScript %>
  2. <% Option Explicit %>
  3. <!-- #include file="directives.inc" -->
  4. <!--#include file="iiamap.str"-->
  5. <!--#include file="iiamapls.str"-->
  6. <!--#include file="iisetfnt.inc"-->
  7. <HTML>
  8. <HEAD>
  9. <TITLE></TITLE>
  10. <SCRIPT LANGUAGE = "JavaScript">
  11. <!--#include file="iijsfuncs.inc"-->
  12. function SetUpdated(){
  13. if (parent.head.listFunc.noupdate)
  14. {
  15. parent.head.listFunc.noupdate = false;
  16. }
  17. else
  18. {
  19. i = parent.head.listFunc.sel;
  20. parent.head.cachedList[i].ext = document.listform.editMe.value;
  21. parent.head.cachedList[i].exclusions = document.listform.exclusions.value;
  22. parent.head.cachedList[i].path = document.listform.exepath.value;
  23. parent.head.cachedList[i].checkfiles = document.listform.checkfiles.checked;
  24. parent.head.cachedList[i].scripteng = document.listform.scripteng.checked;
  25. parent.head.cachedList[i].displaypath = crop(document.listform.exepath.value,18);
  26. parent.head.cachedList[i].updated = true;
  27. }
  28. }
  29. function chgStatus(indexnum){
  30. parent.head.listFunc.sel=indexnum
  31. self.location.href = "iiamapls.asp";
  32. }
  33. function chkPath(pathCntrl){
  34. if (pathCntrl.value != ""){
  35. top.connect.location.href = "iichkpath.asp?path=" + escape(pathCntrl.value) + "&ptype=1";
  36. }
  37. }
  38. </SCRIPT>
  39. </HEAD>
  40. <BODY BGCOLOR="FFFFFF" LEFTMARGIN = 0 TOPMARGIN = 0>
  41. <FORM NAME="listform">
  42. <SCRIPT LANGUAGE="JavaScript">
  43. editOK = false;
  44. sel = eval(parent.head.listFunc.sel);
  45. var writestr = "<TABLE WIDTH =<%= L_AMAPTABLEWIDTH_NUM %> BORDER=0 CELLPADDING = 2 CELLSPACING = 0>"
  46. for (var i = 0; i < parent.head.cachedList.length; i++) {
  47. if (!parent.head.cachedList[i].deleted){
  48. <% if Session("IsAdmin") then %>
  49. if (sel != i) {
  50. <% else %>
  51. if (true){
  52. <% end if %>
  53. // If there are no verbs defined we want to display "ALL" in the list.
  54. var strVerbs = "<I><%= L_ALLVERBS_TEXT %></I>";
  55. if( parent.head.cachedList[i].exclusions != "" )
  56. {
  57. strVerbs = crop(parent.head.cachedList[i].exclusions, <%= L_EXCLUSIONSCHARS_NUM %>);
  58. }
  59. writestr += "<TR>"
  60. writestr += parent.head.listFunc.writeCol(1,<%= L_EXTENSIONCOLWIDTH_NUM %>,"<A HREF='javascript:chgStatus("+i+");'>" + parent.head.cachedList[i].ext +"&nbsp;</A>","");
  61. writestr += parent.head.listFunc.writeCol(1,<%= L_EXEPATHCOLWIDTH_NUM %>,parent.head.cachedList[i].displaypath,"");
  62. writestr += parent.head.listFunc.writeCol(1,<%= L_EXCLUSIONSCOLWIDTH_NUM %>,strVerbs,"");
  63. if (parent.head.cachedList[i].scripteng){
  64. writestr += parent.head.listFunc.writeCol(1,<%= L_SCRIPTENGINECOLWIDTH_NUM %>,"<IMG HSPACE=4 SRC='images/checkon.gif'>","");
  65. }
  66. else{
  67. writestr += parent.head.listFunc.writeCol(1,<%= L_SCRIPTENGINECOLWIDTH_NUM %>,"<IMG HSPACE=4 SRC='images/checkoff.gif'>","");
  68. }
  69. if (parent.head.cachedList[i].checkfiles){
  70. writestr += parent.head.listFunc.writeCol(1,<%= L_CHKFILECOLWIDTH_NUM %>,"<IMG HSPACE=4 SRC='images/checkon.gif'>","");
  71. }
  72. else{
  73. writestr += parent.head.listFunc.writeCol(1,<%= L_CHKFILECOLWIDTH_NUM %>,"<IMG HSPACE=4 SRC='images/checkoff.gif'>","");
  74. }
  75. writestr += "</TR>";
  76. }
  77. else {
  78. editOK = true;
  79. writestr += "<TR>"
  80. writestr += parent.head.listFunc.writeCol(1,<%= L_EXTENSIONCOLWIDTH_NUM %>,"<INPUT NAME='editMe' SIZE='2' VALUE='" + parent.head.cachedList[i].ext + "' <%= Session("DEFINPUTSTYLE") %> OnBlur='SetUpdated();'>","");
  81. writestr += parent.head.listFunc.writeCol(1,<%= L_EXEPATHCOLWIDTH_NUM %>,"<INPUT NAME='exepath' SIZE='25' VALUE='" + parent.head.cachedList[i].path + "' <%= Session("DEFINPUTSTYLE") %> OnBlur='SetUpdated();'>","");
  82. writestr += parent.head.listFunc.writeCol(1,<%= L_EXCLUSIONSCOLWIDTH_NUM %>,"<INPUT NAME='exclusions' SIZE='8' VALUE='" + parent.head.cachedList[i].exclusions + "' <%= Session("DEFINPUTSTYLE") %> OnBlur='SetUpdated();'>","");
  83. if (parent.head.cachedList[i].scripteng){
  84. writestr += parent.head.listFunc.writeCol(1,<%= L_SCRIPTENGINECOLWIDTH_NUM %>,"<INPUT TYPE='checkbox' NAME='scripteng' CHECKED ONCLICK='SetUpdated();'>","");
  85. }
  86. else{
  87. writestr += parent.head.listFunc.writeCol(1,<%= L_SCRIPTENGINECOLWIDTH_NUM %>,"<INPUT TYPE='checkbox' NAME='scripteng' ONCLICK='SetUpdated();'>","");
  88. }
  89. if (parent.head.cachedList[i].checkfiles){
  90. writestr += parent.head.listFunc.writeCol(1,<%= L_CHKFILECOLWIDTH_NUM %>,"<INPUT TYPE='checkbox' NAME='checkfiles' CHECKED ONCLICK='SetUpdated();'>","");
  91. }
  92. else{
  93. writestr += parent.head.listFunc.writeCol(1,<%= L_CHKFILECOLWIDTH_NUM %>,"<INPUT TYPE='checkbox' NAME='checkfiles' ONCLICK='SetUpdated();'>","");
  94. }
  95. writestr += "</TR>";
  96. }
  97. }
  98. }
  99. writestr += "</TABLE>";
  100. document.write(writestr);
  101. </SCRIPT>
  102. </FORM>
  103. <% if Session("IsAdmin") then %>
  104. <SCRIPT LANGUAGE="JavaScript">
  105. if (editOK){
  106. document.listform.editMe.focus();
  107. document.listform.editMe.select();
  108. }
  109. </SCRIPT>
  110. <% end if %>
  111. </BODY>
  112. </HTML>