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.

145 lines
3.0 KiB

  1. <%@ LANGUAGE = VBScript %>
  2. <% Option Explicit %>
  3. <!-- #include file="directives.inc" -->
  4. <% if Session("FONTSIZE") = "" then %>
  5. <!--#include file="iito.inc"-->
  6. <% else %>
  7. <%
  8. dim quote
  9. quote = chr(34)
  10. %>
  11. <!--#include file="iibkuphd.str"-->
  12. <!--#include file="iistat.str"-->
  13. <!--#include file="iisetfnt.inc"-->
  14. <!--#include file="date.str"-->
  15. <!--#include file="date.inc"-->
  16. <HTML>
  17. <HEAD>
  18. <TITLE></TITLE>
  19. </HEAD>
  20. <BODY BGCOLOR="<%= Session("BGCOLOR") %>" LINK="#000000" VLINK="#000000" TOPMARGIN=10 TEXT="#000000" onLoad="setList();loadHelp();">
  21. <FORM NAME="userform">
  22. <TABLE WIDTH=490 BORDER=0>
  23. <TR>
  24. <TD COLSPAN=3 >
  25. <%= sFont("","","",True) %>
  26. <B><%= L_BACKUPCONFG_TEXT %></B><P>
  27. <%= L_PREVBACKUPS_TEXT %>
  28. <BR>&nbsp;
  29. </FONT>
  30. </TD>
  31. </TR>
  32. </TABLE>
  33. </FORM>
  34. </BODY>
  35. <SCRIPT LANGUAGE="JavaScript">
  36. <!--#include file="iijsfuncs.inc"-->
  37. <!--#include file="iijsls.inc"-->
  38. function loadHelp(){
  39. top.title.Global.helpFileName="iipx_1";
  40. }
  41. function setList()
  42. {
  43. parent.list.location.href = "iibkupls.asp?text=" + escape( "<%= L_LOADING_TEXT %>" );
  44. top.hlist.location = "iibkupset.asp";
  45. }
  46. function loadList(){
  47. parent.list.location.href="iibkupls.asp";
  48. }
  49. function addBkupItem(){
  50. i=cachedList.length
  51. blocation = prompt("<%= L_GETNAME_TEXT %>","<%= L_SAMPLEBACKUP_TEXT %>");
  52. if ((blocation != "") && (blocation != null)){
  53. top.hlist.location.href = "iiaction.asp?a=Backup&bkupName=" + escape(blocation);
  54. listFunc.sel =i;
  55. }
  56. }
  57. function delBkupItem()
  58. {
  59. if (listFunc.sel >= 0)
  60. {
  61. if( confirm( "<%= L_CONFIRMDELETE_TEXT %>" ) )
  62. {
  63. i=eval(listFunc.sel );
  64. blocation = escape(cachedList[i].blocation);
  65. bversion = escape(cachedList[i].bversion);
  66. top.hlist.location.href = "iiaction.asp?a=BackupRmv&bkupName=" + blocation + "&bkupVer=" + bversion;
  67. }
  68. }
  69. else
  70. {
  71. alert("<%= L_SELECTITEM_TEXT %>");
  72. }
  73. }
  74. function buildListForm(){
  75. numrows=0;
  76. for (var i=0; i < cachedList.length; i++) {
  77. numrows=numrows + 1;
  78. }
  79. qstr="numrows="+numrows;
  80. qstr=qstr+"&cols=ServerBindings&cols=SecureBindings"
  81. top.hlist.location.href="iihdn.asp?"+qstr;
  82. <% 'the list values will be grabbed by the hiddenlistform script... %>
  83. }
  84. function SetListVals(){
  85. }
  86. var dateFormatter = new UIDateFormat( <%= DATEFORMAT_SHORT %> );
  87. function SetLocale(datestr)
  88. {
  89. var thisdate = new Date();
  90. if( datestr != "" )
  91. {
  92. // Time is in GMT, so the Date object handles the conversion
  93. thisdate.setTime( Date.parse(datestr) );
  94. }
  95. return getNeutralDateString( thisdate ) + " " + dateFormatter.getTime( thisdate );
  96. }
  97. function listObj(i,d,l,v){
  98. this.id = i;
  99. this.deleted=false;
  100. this.newitem=false;
  101. this.updated=false;
  102. d = initParam(d,"");
  103. this.blocation=initParam(l,"");
  104. this.bversion=initParam(v,"");
  105. this.bdate=SetLocale(d);
  106. }
  107. listFunc=new listFuncs("blocation","",top.opener.top);
  108. listFunc.addItem = addBkupItem;
  109. listFunc.delItem = delBkupItem;
  110. cachedList=new Array()
  111. </SCRIPT>
  112. <FORM NAME="hiddenform">
  113. <INPUT TYPE="hidden" NAME="slash" VALUE="\">
  114. </FORM>
  115. </HTML>
  116. <% end if %>