home *** CD-ROM | disk | FTP | other *** search
/ com!online 2002 June / comonline0602.iso / software / cogitum / CoTracker.exe / app.___ < prev    next >
Encoding:
Text File  |  2001-04-24  |  43.6 KB  |  1,648 lines
  1. <HTML>
  2. <HEAD> 
  3. <TITLE>Image Co-Tracker</TITLE>
  4. <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8">
  5.   <HTA:APPLICATION ID="oMyApp" 
  6.     APPLICATIONNAME="{130C4DD1-7A96-11d4-BE19-00C0F0489117}"
  7.     BORDER="yes"
  8.     CAPTION="yes"
  9.     ICON=".\\bpad.ico"
  10.     SHOWINTASKBAR="yes"
  11.     SINGLEINSTANCE="yes"
  12.     SYSMENU="yes"
  13.     WINDOWSTATE="maximize">    
  14. </HTA:APPLICATION>    
  15. <OBJECT ID="Engine" CLASSID="CLSID:04AB20C2-D25A-11D3-A94C-00C0F048995B">
  16. </OBJECT>
  17.  
  18. <SCRIPT language="javascript">
  19.  
  20. // File2Tracker constants
  21. @set @NEW_XMLDB=0
  22. @set @OPEN_XMLDB=1
  23. @set @SAVE_XMLDB=2
  24.  
  25.  
  26. var gnImageNum = 0;
  27. var gIntId=null;
  28. var bOpenList = 0;
  29. var szPath, szProductPath;
  30. var bCallTPrint=0;
  31. var gnPicLoopCount = 0;          
  32. var idLoadPicIntv = 0;
  33. var bInsertOrRename = false;
  34. var bOk = false;
  35.  
  36.  
  37. szPath = new String (top.location.pathname);
  38. szPath = szPath.toLowerCase();
  39. if (szPath.charAt(0) == "/")
  40.  szPath = szPath.substring(1, szPath.length);
  41. nPos =  szPath.search ("app.hta");
  42. szProductPath = unescape(szPath.substring(0,nPos-1));
  43.  
  44. var    sz_XSLPath = szProductPath + "\\store.xsl";
  45.  
  46.  
  47. var    Source;
  48. var    Style;
  49. var    StyleFirst;
  50. //var    WshShell;
  51.  
  52. var sc_BeforeChange = "";
  53. var ChangeParent = null;
  54. var bNoRestore = 0;
  55. var idImgTimer = 0;
  56. var idTimeout = 0;
  57. var idDis = 0;
  58. var IEVersion;
  59.  
  60.  
  61. function SaveSource()
  62. {
  63.     var str; 
  64.  
  65.     // check XML base encoding         
  66.     if (Source.childNodes[0].attributes[1].nodeValue != "utf-8")
  67.      Source.childNodes[0].attributes[1].nodeValue ="utf-8";
  68.  
  69.     dbversion = Source.selectSingleNode ("root[@dbversion]");
  70.     if (dbversion == null)
  71.     {
  72.        Root = Source.selectSingleNode ("root");
  73.        Root.setAttribute ("dbversion", "1.0");
  74.     }
  75.  
  76.  
  77.     if (!Engine)
  78.      alert("Unable to create Image Co-Tracker object!");
  79.  
  80.     str = Engine.commitChanges(Source, 0);
  81.  
  82.     return str;
  83. }
  84.  
  85. function ChangeStringValue(ItemToChange)
  86. {   
  87.     
  88.     ChangeParent = ItemToChange.offsetParent; // BANNER
  89.     sc_BeforeChange = ChangeParent.innerHTML;
  90.     var sc_OldValue = ChangeParent.all.item("Value").innerText;
  91.     
  92.     ChangeParent.innerHTML = "<INPUT TYPE=TEXT CLASS=width80 onkeydown=top.ChangeOnKeyPress(this) id=TEXT1 name=TEXT1 onblur=top.MyClick()></INPUT>"
  93.     ChangeParent.firstChild.value = sc_OldValue;
  94.     ChangeParent.firstChild.select();
  95.     ChangeParent.firstChild.focus();
  96. }
  97.  
  98.  
  99. function GetSortMode ()
  100. {
  101.    var sz_Sort= top.frames[0].document.all.item("SortOrder").value;
  102.    switch (sz_Sort)
  103.    {
  104.     case "All categories":
  105.       return 0;
  106.     case "-@CreationDate":
  107.       return 1;
  108.     case "@Name; -@CreationDate":
  109.       return 2;
  110.     case "-@LastAccess":
  111.       return 3;
  112.     case "@Comment; -@CreationDate":
  113.       return 4;
  114.    case  "@ID_CATEGORY; -@CreationDate":
  115.       return 5;
  116.   }
  117.   return 0;
  118. }
  119.  
  120. function IsNeedSort (szSlotName)
  121. {
  122.  switch (szSlotName)
  123.  {
  124.   case "Name":
  125.    if (GetSortMode() == 2)
  126.     return 1;
  127.    else
  128.     return 0;
  129.     
  130.   case "Comment":
  131.    if (GetSortMode() == 4)
  132.     return 1;
  133.    else
  134.     return 0;
  135.     
  136.   case "Category":
  137.    if (GetSortMode() == 5)
  138.     return 1;
  139.    else
  140.     return 0;    
  141.  }
  142.  return 0;
  143. }
  144.  
  145. function OnListKeyDown (Select)
  146. {    
  147.     var Key=top.frames[1].event.keyCode;
  148.     if (Key == 27)    
  149.     {        
  150.         ChangeParent.innerHTML = sc_BeforeChange;
  151.         ChangeParent.focus();
  152.         bOpenList = 0;        
  153.         ChangeParent = null;
  154.     }
  155.     else
  156.      if (Key == 13)    
  157.      {       
  158.        ChangeBannerCategory(Select);
  159.        ChangeParent = null; 
  160.      }
  161. }
  162.  
  163.  
  164. function ChangeBannerCategory (Select)
  165. { 
  166.    var    Banner = Source.selectSingleNode("root\/BANNERBASE\/BANNER[@UIN="+ChangeParent.offsetParent.id+"]");
  167.    sc_NewValue = Select.options[Select.selectedIndex].value;
  168.    if (Banner != null)    
  169.    {
  170.      Banner.setAttribute("ID_CATEGORY", sc_NewValue);
  171.      szNewCTName = Select.options[Select.selectedIndex].text;
  172.      ChangeParent.innerHTML = sc_BeforeChange;         
  173.      ChangeParent.all.item("Value").innerText = szNewCTName;
  174.      ChangeParent.focus();         
  175.      Sort(1);          
  176.      ChangeParent = null; 
  177.    }       
  178.    bOpenList = 0;
  179. }
  180.  
  181.  
  182. // call XSL on category/change
  183. function ChangeCategoryValue(ItemToChange)
  184. {   
  185.   bOpenList = 1;
  186.  
  187.   var    CTListNames = Source.selectNodes("root\/CTLIST\/CATEGORY\/@Name");
  188.   var    CTListIDs =   Source.selectNodes("root\/CTLIST\/CATEGORY\/@CID");    
  189.   var   b_cat;
  190.   var    Banner;
  191.   var   k=0;
  192.   
  193.   if ((CTListNames == null) || (CTListIDs == null))
  194.    return;   
  195.   
  196.   ChangeParent = ItemToChange.offsetParent;
  197.   sc_BeforeChange = ChangeParent.innerHTML;    
  198.   var sc_OldValue = ChangeParent.all.item("Value").innerText;
  199.   ChangeParent.innerHTML = "<SELECT NAME=INT_CT_LIST ALIGN=ABSMIDDLE CLASS=width40p id=INTCTLIST onkeydown=top.OnListKeyDown(this) onblur=top.MyClick() onchange=top.ChangeBannerCategory(this) ondblclick=top.ChangeBannerCategory(this)><\SELECT>";  
  200.   
  201.   Banner = Source.selectSingleNode("root\/BANNERBASE\/BANNER[@UIN="+ChangeParent.offsetParent.id+"]");
  202.   if (Banner != null)
  203.    b_cat = Banner.getAttribute("ID_CATEGORY");
  204.    
  205.   for (i=0; i < CTListIDs.length; i++)
  206.   {  
  207.    var objOption= top.frames[1].document.createElement ("OPTION");
  208.    objOption.text = CTListNames[i].nodeValue;
  209.    objOption.value =CTListIDs[i].nodeValue;
  210.    if (Banner && (b_cat == objOption.value))
  211.     k=i;
  212.    top.frames[1].document.all["INT_CT_LIST"].options.add (objOption);   
  213.  }  
  214.  top.frames[1].document.all["INT_CT_LIST"].selectedIndex = k;
  215.  ChangeParent.firstChild.focus(); 
  216. }
  217.  
  218.  
  219. function ChangeOnInsertOrRename(Edit, bInsert, bMode)
  220. { 
  221.  var Key;
  222.  if (bMode)
  223.   Key=13;
  224.  else
  225.   Key=top.frames[0].event.keyCode;        //27 - Esc, 13 - Enter  
  226.  
  227.  if (Key == 27)    
  228.  {
  229.     ChangeParent.style.display = "none";    
  230.     ChangeParent.innerHTML = "";
  231.     ChangeParent.insertAdjacentHTML("beforeEnd", sc_BeforeChange);
  232.     ChangeParent.style.display = "";                
  233.     ChangeParent = null; 
  234.     return;
  235.  }
  236.  if (Key != 13)
  237.    return;  
  238.  
  239.  var   CatName = Edit.value;   
  240.  
  241.  if ((CatName == null) || (CatName == "") || (CatName == " ") || (CatName == "  "))
  242.  {   
  243.    alert ("The category name cannot be blank.");
  244.    //ChangeParent.firstChild.focus();
  245.    return;  
  246.  }
  247.    
  248.  
  249.   var    CTListNames = Source.selectNodes("root\/CTLIST\/CATEGORY\/@Name");
  250.   var    CIDs =   Source.selectNodes("root\/CTLIST\/CATEGORY\/@CID");  
  251.   var    CurrentCT = Source.selectSingleNode("root\/CTLIST\/@CurrentCategory");  
  252.   
  253.   if (((CurrentCT.nodeValue == "0000000000000000") || (CurrentCT.nodeValue == "0000000000000001")) && (!bInsert))
  254.   {
  255.    return;
  256.   }  
  257.   
  258.   var    Category =   Source.selectSingleNode("root\/CTLIST\/CATEGORY[@CID="+CurrentCT.nodeValue+"]");  
  259.   var   newCID = 0;
  260.    
  261.   for (i=0; i < CTListNames.length; i++)
  262.   {
  263.     if (CTListNames[i].nodeValue == CatName)
  264.     {
  265.         alert("This category already exists!");        
  266.             //ChangeParent.firstChild.focus();
  267.         return;
  268.     }
  269.   }  
  270.       
  271.  if (bInsert)   
  272.  {
  273.       for (Index = 0; Index < CIDs.length; Index++)    
  274.       {
  275.         if (parseInt(CIDs[Index].text, 10) > newCID)
  276.           newCID = parseInt(CIDs[Index].text, 10);
  277.       }
  278.       newCID++;
  279.       var    sc_CID = "0000000000000000" + newCID;
  280.       sc_CID = sc_CID.substr(sc_CID.length - 16); 
  281.   
  282.         // check empty page
  283.         var    Root = Source.selectSingleNode("root");
  284.         if (Root == null)
  285.         {
  286.             // insert processing instruction
  287.             ElXML = Source.createProcessingInstruction('xml', ' version="1.0" encoding="utf-8" ');                
  288.             Source.insertBefore(ElXML, null);                
  289.  
  290.             //  insert root element 
  291.             Root = Source.createElement("root");
  292.             Root.text = "\n\t";
  293.             Source.appendChild(Root);
  294.         }            
  295.         var    CtList = Source.selectSingleNode("root/CTLIST");            
  296.         if (CtList == null)    
  297.         {                
  298.             CtList = Source.createElement("CTLIST");
  299.             CtList.setAttribute("CurrentCategory", "0000000000000000");
  300.             CurrentCT = Source.selectSingleNode("root\/CTLIST\/@CurrentCategory");  
  301.         }
  302.                     
  303.         CtNew = Source.createElement("CATEGORY");
  304.         CtNew.setAttribute("CID", sc_CID);                
  305.         CtNew.setAttribute("Name",  CatName);                
  306.         CtNew.text = "\n";
  307.                     
  308.         Root.appendChild(CtList);
  309.         CtList.appendChild(CtNew);    
  310.         
  311.         AddCTToList (CatName, sc_CID, CurrentCT.nodeValue);          
  312.     }
  313.     else
  314.     {     
  315.       Select=top.frames[0].document.all["CT_LIST"];    
  316.       Select.options[Select.selectedIndex].text=CatName; 
  317.       Category.setAttribute("Name",  CatName);      
  318.     }
  319.     
  320.     ChangeParent.style.display = "none";    
  321.     ChangeParent.innerHTML = sc_BeforeChange;        
  322.     ChangeParent.style.display = "";
  323.     if (bInsert)
  324.      SaveSource ();
  325.     else
  326.      Sort(1);     
  327.     ChangeParent = null; 
  328. }
  329.  
  330.  
  331. function UpdateDisabledButtons ()
  332. {
  333.  var    CurrentCT = Source.selectSingleNode("root\/CTLIST\/@CurrentCategory");  
  334.    if ((CurrentCT.nodeValue == "0000000000000000") || (CurrentCT.nodeValue == "0000000000000001"))
  335.     {
  336.      top.frames[0].document.all["btnDelCT"].src = "delct_d.gif";
  337.      top.frames[0].document.all["btnRenameCT"].src = "renct_d.gif";
  338.      top.frames[0].document.all["btnRenameCT"].runtimeStyle.cursor = "default";
  339.      top.frames[0].document.all["btnDelCT"].runtimeStyle.cursor = "default";
  340.      top.frames[0].document.all["btnDelCT"].UpdateButton(1, 0);
  341.      top.frames[0].document.all["btnRenameCT"].UpdateButton(1, 0);
  342.     }
  343.     else
  344.     {
  345.      top.frames[0].document.all["btnDelCT"].src = "delct_g.gif";
  346.      top.frames[0].document.all["btnRenameCT"].src = "renct_g.gif";
  347.      top.frames[0].document.all["btnRenameCT"].runtimeStyle.cursor = "hand";
  348.      top.frames[0].document.all["btnDelCT"].runtimeStyle.cursor = "hand";
  349.      top.frames[0].document.all["btnDelCT"].UpdateButton(0, 0);
  350.      top.frames[0].document.all["btnRenameCT"].UpdateButton(0, 0);
  351.     }
  352. }
  353.  
  354. function CheckToolbar ()
  355. {
  356.   if (top.frames[0].document.all["btnDelCT"]!=null)  
  357.   {
  358.     clearInterval (idDis);
  359.     UpdateDisabledButtons();
  360.   } 
  361. }
  362.  
  363.  
  364. function InsertOrRenameCategory (ItemToChange, bInsert)
  365. {
  366.    bOk = false;
  367.    var    CurrentCT = Source.selectSingleNode("root\/CTLIST\/@CurrentCategory");  
  368.    if (((CurrentCT.nodeValue == "0000000000000000") || (CurrentCT.nodeValue == "0000000000000001")) && (!bInsert))
  369.    { 
  370.      //alert ("This category cannot be renamed.");
  371.      return;
  372.     }        
  373.  
  374.     SetButtonImage(ItemToChange, 1);
  375.  
  376.     ChangeParent = ItemToChange.parentElement; //offsetParent;    
  377.     sc_BeforeChange = ChangeParent.innerHTML;    
  378.     if (bInsert)
  379.     {
  380.       ChangeParent.innerHTML = "<INPUT TYPE=TEXT id=idEdit onkeydown=top.ChangeOnInsertOrRename(this,1) onblur='setTimeout(\"top.MyClick()\", 500)' id=TEXTINSERT name=TEXTINSERT style='width:160px; height:20px;margin-bottom:9px; font-size:11px;'></INPUT><BUTTON TYPE=BUTTON ONCLICK='bOk=true;top.ChangeOnInsertOrRename(idEdit,1, true);return false;' style='margin-bottom:9px; font-family: Verdana,Arial; font-size: 8pt;'>ok</BUTTON>";      
  381.       ChangeParent.firstChild.value = "";
  382.     }
  383.     else
  384.     {
  385.       var    Category =   Source.selectSingleNode("root\/CTLIST\/CATEGORY[@CID="+CurrentCT.nodeValue+"]");        
  386.       CatName = Category.getAttribute("Name");
  387.       ChangeParent.innerHTML = "<INPUT TYPE=TEXT id=idEdit onkeydown=top.ChangeOnInsertOrRename(this,0) onblur='setTimeout(\"top.MyClick()\", 500)' id=TEXTRENAME name=TEXTRENAME style='width:160px; height:20px; margin-bottom:9px; font-size:11px;'></INPUT><BUTTON TYPE=BUTTON ONCLICK='bOk=true;top.ChangeOnInsertOrRename(idEdit,0, true);return false;' style='margin-bottom:9px; font-family: Verdana,Arial; font-size: 8pt;'>ok</BUTTON>";
  388.       ChangeParent.firstChild.value = CatName;
  389.       ChangeParent.firstChild.select();
  390.     }    
  391.  
  392.     ChangeParent.firstChild.focus();    
  393.     ChangeParent.firstChild.focus();
  394.     ChangeParent.firstChild.focus();    
  395.  
  396.     bInsertOrRename = true;
  397. }
  398.  
  399.  
  400. function DeleteCategory ()
  401. {  
  402.  
  403.    szCID = top.frames[0].document.all["CT_LIST"].options[top.frames[0].document.all["CT_LIST"].selectedIndex ].value;
  404.    
  405.    if ((szCID == "0000000000000000") || (szCID == "0000000000000001")) // all categories
  406.    {    
  407.     //alert ("This category cannot be deleted.");
  408.     return;    
  409.    }
  410.    
  411.    
  412.    if (szCID == "0000000000000001") // common category
  413.    {
  414.     //alert ("This category cannot be deleted.");
  415.     return;    
  416.    }
  417.  
  418.    if (top.confirm ("Do you want to delete a category and all the images it contains?") == 0)
  419.     return;
  420.  
  421.     
  422.     if (Source.readyState == 4)    
  423.     {        
  424.         var    Banners =   Source.selectNodes("root\/BANNERBASE\/BANNER[@ID_CATEGORY="+szCID+"]");  
  425.         var    Category =  Source.selectSingleNode("root\/CTLIST\/CATEGORY[@CID="+szCID+"]");  
  426.         
  427.         if (Category != null)
  428.           Category.parentNode.removeChild(Category);                 
  429.         
  430.         for (i = 0; i < Banners.length; i++)    
  431.         {         
  432.          var Banner = Banners[i];
  433.          Engine.DeleteImageFile (Banner);
  434.          Banner.parentNode.removeChild(Banner);
  435.          }        
  436.          top.frames[0].document.all["CT_LIST"].options.remove(top.frames[0].document.all["CT_LIST"].selectedIndex);
  437.          top.frames[0].document.all["CT_LIST"].selectedIndex = 0;                
  438.          
  439.          
  440.          //set "all categories"; save document, too
  441.          SetCategory();
  442.     }
  443. }
  444.  
  445.  
  446. function MyClick ()
  447. {   
  448.    //if ((!bInsertOrRename) && (!bOpenList)) 
  449.    if (!ChangeParent)
  450.     return;
  451.  
  452.    if (bInsertOrRename) 
  453.    {
  454.     bInsertOrRename = false;
  455.     idDis = setInterval (CheckToolbar, 400);
  456.     
  457.     if (bOk)
  458.     {
  459.         bOk=false;
  460.     return;
  461.     }
  462.    }
  463.     
  464.    if (bOpenList)
  465.     bOpenList = 0;   
  466.    ChangeParent.innerHTML = sc_BeforeChange;
  467.    
  468.    ChangeParent = null; 
  469. }
  470.  
  471.  
  472. function ChangeOnKeyPress(EditBox, bMode)
  473. {
  474.     var Key;
  475.     if (bMode)
  476.         key = 13;
  477.     else
  478.         Key=top.frames[1].event.keyCode;        //27 - Esc, 13 - Enter
  479.  
  480.     if (Key == 27)    
  481.     {
  482.         EditBox.style.display = "none";     
  483.         ChangeParent.innerHTML = sc_BeforeChange;
  484.         ChangeParent.focus();        
  485.         ChangeParent = null; 
  486.     }
  487.     else
  488.      if (Key == 13)    
  489.      {
  490.         var bDestroyMap = true;
  491.         bNoRestore = 1;  
  492.         var    Banner = Source.selectSingleNode("root\/BANNERBASE\/BANNER[@UIN="+ChangeParent.offsetParent.id+"]");
  493.         var sc_NewValue = EditBox.value;
  494.         ChangeParent.innerHTML = sc_BeforeChange;
  495.         if ((top.frames[1].document.all.item("" + ChangeParent.offsetParent.id + "-IMG").useMap != "") && (ChangeParent.all.item("Value").name == "Url"))
  496.         {
  497.             if (confirm("Changing the URL here will destroy the multiple URL references accosiated with the image.\nAre you sure?"))
  498.             {                
  499.                 ChangeParent.all.MURL.outerHTML = "";
  500.                 top.frames[1].document.all.item("" + ChangeParent.offsetParent.id + "-IMG").useMap = "";
  501.                 if (Banner != null)
  502.                 {
  503.                     Banner.setAttribute("Map", "");
  504.                     //SaveSource();
  505.                 }
  506.             }
  507.             else
  508.             {
  509.                 bDestroyMap = false;
  510.             }
  511.         }
  512.         if (bDestroyMap)
  513.         {
  514.             if (ChangeParent.all.item("Value").name == "Url")
  515.             {
  516.                 strl = sc_NewValue;
  517.                 str = new String (strl);
  518.                 if ((str.search ('://') == -1) && (str.search ('@') == -1) && (str.length>0))
  519.                 {             
  520.                  strl="http://"+strl;
  521.                  sc_NewValue = strl;
  522.                 }
  523.                 if ((str.search('@')!=-1) && (str.search('mailto:') == -1))
  524.                 {
  525.                     strl = "mailto:" + strl;
  526.                     sc_NewValue = strl;
  527.                 }            
  528.                 top.frames[1].document.all.item("" + ChangeParent.offsetParent.id + "-URL").href = sc_NewValue;                
  529.                 ChangeParent.all.item("Value").href=sc_NewValue;
  530.             }        
  531.             else if (ChangeParent.all.item("Value").name == "Name")
  532.             {
  533.                 top.frames[1].document.all.item("" + ChangeParent.offsetParent.id + "-IMG").alt = sc_NewValue;
  534.             }
  535.         
  536.             EditBox.style.display = "none";     
  537.             ChangeParent.all.item("Value").innerHTML = sc_NewValue;
  538.             ChangeParent.focus();        
  539.  
  540.             if (Banner != null)    
  541.             {
  542.              Banner.setAttribute(ChangeParent.all.item("Value").name, sc_NewValue);                          
  543.             }
  544.         }
  545.         bNoRestore = 0;        
  546.         if (IsNeedSort(ChangeParent.all.item("Value").name))        
  547.          Sort(1);
  548.         else
  549.          SaveSource();        
  550.  
  551.         ChangeParent = null; 
  552.      }
  553. }
  554.  
  555. function RealySort()
  556. {
  557.  Sort(1);  
  558.  top.focus();
  559. }
  560.  
  561.  
  562. function Sort( bSave )
  563. {    
  564.  
  565.     var SortOrder = top.frames[0].document.all.item("SortOrder");
  566.     if (SortOrder != null)    
  567.     {
  568.         var sz_Order = SortOrder.value;
  569.  
  570.         if (Source.readyState == 4)    
  571.         {
  572.             var Orders = Source.getElementsByTagName("root/BANNERBASE/@SortOrder");
  573.             for (var Index = 0; Index < Orders.length; Index++)
  574.                 Orders[Index].nodeValue = sz_Order;
  575.  
  576.             if (bSave) 
  577.              SaveSource();
  578.         }
  579.  
  580.         if (Style.readyState == 4)    
  581.         {
  582.             var Orders = Style.getElementsByTagName("*/xsl:for-each/@order-by");
  583.             var OrdersF = StyleFirst.getElementsByTagName("*/xsl:for-each/@order-by");
  584.  
  585.  
  586.             // set order for second xsl template
  587.             for (var Index = 0; Index < Orders.length; Index++)
  588.                 Orders[Index].nodeValue = sz_Order;
  589.  
  590.             // set order for first xsl template
  591.             for (var Index = 0; Index < OrdersF.length; Index++)
  592.                 OrdersF[Index].nodeValue = sz_Order;
  593.  
  594.             
  595.             DisplayDocument(1);
  596.         }
  597.     }
  598. }
  599.  
  600. function DeleteAll()
  601. {
  602.    
  603.     if (showModalDialog ("wrn.htm", "", "dialogWidth:292px; dialogHeight:140px; center:yes; border:thin; status:no; scroll:no; help:no;") == 0)
  604.      return;   
  605.  
  606.     if (Source.readyState == 4)    
  607.     {        
  608.         var    Banners = Source.getElementsByTagName("root/BANNERBASE/BANNER");
  609.  
  610.         for (i=0; i < Banners.length; i++)    
  611.         {
  612.             var    Banner = Banners[i];
  613.             Engine.DeleteAllImages (Banner.parentNode);
  614.             Banner.parentNode.removeChild(Banner);
  615.         }        
  616.  
  617.         Sort(1);        
  618.     }
  619. }
  620.  
  621.  
  622.  
  623.  
  624.  
  625.  
  626. function DeleteBanner(sz_Index)
  627. {
  628.     
  629.     if (Source.readyState == 4)    
  630.     {
  631.     
  632.         var ConfirmDelete = Source.selectSingleNode("root\/BANNERBASE\/@ConfirmDelete");  
  633.         if (ConfirmDelete &&  (ConfirmDelete.nodeValue == 1))
  634.          if (!confirm("Do you want to delete this image?"))
  635.           return;
  636.     
  637.         var    Banners = Source.selectNodes("root\/BANNERBASE\/BANNER[@UIN="+sz_Index+"]");
  638.  
  639.         if (Banners.length > 0)    
  640.         {
  641.             var    Banner = Banners[0];
  642.             Engine.DeleteImageFile (Banner);
  643.             Banner.parentNode.removeChild(Banner);
  644.         }        
  645.  
  646.         
  647.         SaveSource();            
  648.         CurElement = top.frames[1].event.srcElement;
  649.         Div=CurElement.parentElement.parentElement.parentElement.parentElement.parentElement;
  650.         Div.style.display = "none";
  651.         //Div.outerText="";        
  652.         if (!LoadPictures ())
  653.          setTimeout (LoadPictures, 100); 
  654.     }    
  655. }
  656.  
  657. function AccessBanner(sz_Index)
  658. {    
  659.  
  660.     if (Source.readyState == 4)    
  661.     {
  662.         var    Banner = Source.selectSingleNode("root\/BANNERBASE\/BANNER[@UIN="+sz_Index+"]");
  663.   
  664.         if (Banner != null)    
  665.         {
  666.             var    sc_Time = "0000000000000000" + Date.parse(new Date());
  667.             sc_Time = sc_Time.substr(sc_Time.length - 16);
  668.  
  669.             Banner.setAttribute("LastAccess", sc_Time);
  670.             SaveSource();                        
  671.             if (GetSortMode() == 3)
  672.              Engine.UpdateData (null);             
  673.         }
  674.     }
  675. }
  676.  
  677. function ReplaceCTToTop (newCIN)
  678. {
  679.  var    CTList = Source.selectSingleNode("root/CTLIST");
  680.  var    child = Source.selectSingleNode("root\/CTLIST\/CATEGORY[@CID="+newCIN+"]");  
  681.  var    childOldFirst = CTList.firstChild; 
  682.  
  683.     if (child && (child !== childOldFirst))
  684.     {
  685.      CTList.removeChild(child);
  686.      CTList.insertBefore(child, childOldFirst);
  687.      return 1;
  688.     }        
  689.     else
  690.      return 0;
  691. }
  692.  
  693.  
  694. function SetCategory ()
  695. { 
  696.  var    CurrentCT = Source.selectSingleNode("root\/CTLIST\/@CurrentCategory"); 
  697.  var CIN = top.frames[0].document.all["CT_LIST"].options[top.frames[0].document.all["CT_LIST"].selectedIndex].value;
  698.  if (CurrentCT == null)
  699.   return;
  700.   
  701.  CurrentCT.nodeValue=CIN;
  702.  if ((CIN== "0000000000000000") || (CIN== "0000000000000001"))
  703.  {    
  704.    top.frames[0].document.all["btnRenameCT"].src = "renct_d.gif";
  705.    top.frames[0].document.all["btnDelCT"].src = "delct_d.gif";
  706.    top.frames[0].document.all["btnRenameCT"].runtimeStyle.cursor = "default";
  707.    top.frames[0].document.all["btnDelCT"].runtimeStyle.cursor = "default";
  708.    top.frames[0].document.all["btnDelCT"].UpdateButton(1, 0);
  709.    top.frames[0].document.all["btnRenameCT"].UpdateButton(1, 0);
  710.  }
  711.  else
  712.  {
  713.    top.frames[0].document.all["btnRenameCT"].src = "renct_g.gif";
  714.    top.frames[0].document.all["btnDelCT"].src = "delct_g.gif";
  715.    top.frames[0].document.all["btnRenameCT"].runtimeStyle.cursor = "hand";
  716.    top.frames[0].document.all["btnDelCT"].runtimeStyle.cursor = "hand";
  717.    top.frames[0].document.all["btnDelCT"].UpdateButton(0, 0);
  718.    top.frames[0].document.all["btnRenameCT"].UpdateButton(0, 0);
  719.  
  720.  }
  721.  
  722.  // replace current category to the top of the list
  723.  bb = ReplaceCTToTop (CIN); 
  724.  // sort/save
  725.  Sort (1);   
  726.  // fill category list anew
  727.  if (bb)
  728.   FillCTList ();
  729.  top.focus();  
  730. } 
  731.  
  732.  
  733. function AddCTToList (sz_Name, CID, CurrentCID)
  734. {  
  735.   var objOption= top.frames[0].document.createElement ("OPTION");
  736.   objOption.text =  sz_Name;
  737.   objOption.value = CID;
  738.   top.frames[0].document.all["CT_LIST"].options.add (objOption);    
  739.   if (CID == CurrentCID)
  740.     objOption.selected=true; 
  741.   else
  742.     objOption.selected=false;   
  743. }
  744.  
  745. function FillCTList ()
  746. {
  747.  var    CTList = Source.getElementsByTagName("root/CTLIST/CATEGORY");
  748.  var    CurrentCT = Source.selectSingleNode("root\/CTLIST\/@CurrentCategory");
  749.  var    Sel = top.frames[0].document.all.CT_LIST;  
  750.    
  751.  while (Sel.options[1])   
  752.   Sel.options.remove(1);  
  753.   
  754.  
  755.  if (CTList == null)
  756.   return;
  757.   
  758.  for (i=0; i<CTList.length; i++)
  759.  {
  760.   var    Category = CTList[i];  
  761.   AddCTToList (Category.attributes[1].value, Category.attributes[0].value, CurrentCT == null ? null : CurrentCT.nodeValue);
  762.  }
  763.  
  764.  if ((CurrentCT.nodeValue == "0000000000000000") || (CurrentCT.nodeValue == "0000000000000001"))
  765.  {                              
  766.    top.frames[0].document.all["btnDelCT"].src = "delct_d.gif";
  767.    top.frames[0].document.all["btnRenameCT"].src = "renct_d.gif";
  768.    top.frames[0].document.all["btnRenameCT"].runtimeStyle.cursor = "default";
  769.    top.frames[0].document.all["btnDelCT"].runtimeStyle.cursor = "default";
  770.    top.frames[0].document.all["btnDelCT"].UpdateButton(1, 0);
  771.    top.frames[0].document.all["btnRenameCT"].UpdateButton(1, 0);
  772.  }
  773. }
  774.  
  775.  
  776.  
  777. function LoadPictures()
  778. { 
  779.  var Height = 0;
  780.  var Image;
  781.  
  782.  if (idTimeout)
  783.   idTimeout = 0;
  784.  
  785.  
  786.  DIVs = top.frames[1].document.all.tags("DIV");
  787.  topMargin = top.frames[1].document.body.scrollTop;
  788.  bottomMargin = topMargin + top.frames[1].document.body.clientHeight;   
  789.  if (topMargin == bottomMargin)
  790.   return 0;  
  791.  
  792.  for (i=1; i < DIVs.length;i++)
  793.  { 
  794.    Image = DIVs[i].all.tags("IMG")[0];    
  795.    if ((Image) && (!Image.useMap))  
  796.    {
  797.     if ((Height+DIVs[i].scrollHeight >= topMargin) && (Height <= bottomMargin))
  798.     {
  799.      Image.src = Image.TEMPSRC;   
  800.     }
  801.     else
  802.     {
  803.      Image.src = ""; 
  804.     }
  805.    }     
  806.    Height += DIVs[i].scrollHeight;
  807.  } 
  808.  
  809.  return 1; 
  810. }
  811.  
  812.  
  813.  
  814.  
  815. function DisplayDocument(bFirst)
  816. {    
  817.  
  818.     if ((Source.readyState == 4) && (Style.readyState == 4) && (StyleFirst.readyState == 4))    
  819.     {    
  820.     
  821.         
  822.         var str;                
  823.  
  824.  
  825.    
  826.         if (bFirst) 
  827.         {
  828.          top.frames[1].document.all.item("XSLResult").style.display="none";
  829.  
  830.          sz_HTML = Source.transformNode(StyleFirst);                        
  831.          top.frames[1].document.all.XSLResult.innerHTML = sz_HTML;                
  832.         }
  833.         else
  834.         {
  835.          sz_HTML = Source.transformNode(Style);                        
  836.          top.frames[1].document.all.XSLResult.insertAdjacentHTML("beforeEnd", sz_HTML);
  837.         }
  838.         
  839.         var szText = "";           
  840.         
  841.         var MapsToEscape = top.frames[1].document.all.tags("MAP");
  842.         if (MapsToEscape != null)    
  843.         {
  844.             for (var Index = MapsToEscape.length - 1; Index >= 0; Index--)    
  845.             {
  846.                 MapsToEscape[Index].innerHTML = unescape(MapsToEscape[Index].innerHTML);                        
  847.             }
  848.         }                
  849.  
  850.         var MapsToChange = top.frames[1].document.all.tags("MAPTOCHANGE");
  851.         if (MapsToChange != null)    
  852.         {
  853.             for (var MapIndex = 0; MapIndex < MapsToChange.length; MapIndex++)    
  854.             {
  855.                 var AreasToChange = MapsToChange[MapIndex].parentElement.all.tags("AREA");
  856.                 if (AreasToChange != null)    
  857.                 {
  858.                     for (var AreaIndex = 0; AreaIndex < AreasToChange.length; AreaIndex++)    
  859.                     {
  860.                         AreasToChange[AreaIndex].target = "_blank";                        
  861.                     }
  862.                 }
  863.                 MapsToChange[MapIndex].parentElement.outerHTML = MapsToChange[MapIndex].nextSibling.outerHTML;                                        
  864.                 MapIndex--; // becouse there is decrement collection length                
  865.             }
  866.             
  867.         }                 
  868.  
  869.  
  870.         if (bFirst) 
  871.          top.frames[1].document.all.XSLResult.style.display="block";        
  872.           
  873.                   
  874.         if (bFirst  &&  (top.frames[1].document.all.tags("DIV").length == 31))                
  875.         {         
  876.          setTimeout("DisplayDocument(0)", 300);          
  877.         }
  878.  
  879.         
  880.         if (bFirst) 
  881.          setTimeout(LoadPictures, 50);         
  882.  
  883.     }
  884. }
  885.  
  886.  
  887. function ChangeXSL(sz_FileName)
  888. {    
  889.     var    b_Ok = Style.load(sz_FileName);
  890.  
  891.     StyleFirst.load("first.xsl");
  892.  
  893.     if (!b_Ok)
  894.         alert ("Error loading Image Co-Tracker StyleSheet (" + sz_FileName + ")");
  895.  
  896.     
  897.  
  898.     return    b_Ok;
  899. }
  900.  
  901. function SetNewBase (NewSourceXML, bMode)
  902. {    
  903.         ElXML = NewSourceXML.createProcessingInstruction('xml', ' version="1.0" encoding="utf-8" ');                
  904.         NewSourceXML.insertBefore(ElXML, null);                
  905.  
  906.         //  insert root element 
  907.         var Root = NewSourceXML.createElement("root");
  908.         Root.setAttribute("dbversion","1.0");
  909.         Root.text = "\n\t";
  910.         NewSourceXML.appendChild(Root);        
  911.                 
  912.         var CtList = NewSourceXML.createElement("CTLIST");
  913.         CtList.setAttribute("CurrentCategory", "0000000000000000");
  914.                 
  915.         var CtCommon = NewSourceXML.createElement("CATEGORY");
  916.         CtCommon.setAttribute("CID", "0000000000000001");                
  917.         CtCommon.setAttribute("Name", "Common");                
  918.         CtCommon.text = "\n";
  919.                 
  920.         Root.appendChild(CtList);
  921.         CtList.appendChild(CtCommon);
  922.  
  923.         var BannerBase = NewSourceXML.createElement("BANNERBASE");
  924.  
  925.         BannerBase.setAttribute("OpenMode", "_blank");
  926.         BannerBase.setAttribute("SortOrder", "-@CreationDate");
  927.         if (Engine.Options == -1)
  928.         {
  929.          BannerBase.setAttribute("ShowSlots", "191");
  930.          BannerBase.setAttribute("ConfirmDelete", "0");
  931.          BannerBase.setAttribute("SmallPictures", "0");
  932.          Engine.Options = 191;
  933.         }
  934.         else
  935.         {         
  936.          BannerBase.setAttribute("ShowSlots", Engine.Options & 255);
  937.  
  938.          if (Engine.Options & 1024)
  939.           BannerBase.setAttribute("ConfirmDelete", "1");
  940.          else
  941.           BannerBase.setAttribute("ConfirmDelete", "0");
  942.  
  943.          if (Engine.Options & 2048)
  944.           BannerBase.setAttribute("SmallPictures", "1");
  945.          else
  946.           BannerBase.setAttribute("SmallPictures", "0");
  947.         }
  948.  
  949.         BannerBase.text = "\n\t\t";
  950.  
  951.         Root.appendChild(BannerBase);
  952.         
  953.         if (bMode)
  954.         {
  955.             var str = Engine.GetXMLPath();
  956.             if (str)
  957.             {
  958.                 var szSrcPath = szProductPath + "\\1.png";
  959.                 Engine.CopyImageFile(szSrcPath, str);
  960.             }
  961.  
  962.             // insert banner with link to program's tutorial
  963.             var Banner = NewSourceXML.createElement("BANNER");
  964.         
  965.             Banner.setAttribute("UIN", "0000000000000001");
  966.             Banner.setAttribute("Name", "INTRODUCTION: HOW TO USE IMAGE CO-TRACKER");
  967.             Banner.setAttribute("Image", str + "1.png");
  968.             Banner.setAttribute("Width", "738");
  969.             Banner.setAttribute("Height", "359");
  970.             Banner.setAttribute("Url", "http://cogitum.com/co-tracker/howtouse.html");
  971.             Banner.setAttribute("Map", "");
  972.             Banner.setAttribute("IsMap", "false");        
  973.             Banner.setAttribute("Comment", "Launch Microsoft Internet Explorer 5.0 or higher. Click the right " + 
  974.             "mouse button on any Internet image, and select the Grab Image option from the pop-up menu. " + 
  975.             "Write in comments and select a category if you want, then click OK. To begin work with catalog of " + 
  976.             "'grabbed' images, click the Start button and select Image Co-Tracker from the Programs menu. " +
  977.             "For more information, click on the '?' icon on the toolbar.");
  978.             Banner.setAttribute("SourceUrl", "http://cogitum.com/co-tracker/howtouse.html");
  979.             Banner.setAttribute("LastAccess", "0000971160889000");
  980.             Banner.setAttribute("CreationDate", "0000971160889000");
  981.             Banner.setAttribute("IMGNode", "<IMG alt=Cogitum height=52 src="img/h_lhead.gif" width=284>");
  982.             Banner.setAttribute("ID_CATEGORY", "0000000000000001");
  983.             
  984.             BannerBase.appendChild(Banner);
  985.         }
  986.  
  987. }
  988.  
  989.  
  990. function ChangeXML()
  991. {    
  992.     var strCaption;    
  993.  
  994.     strCaption = Engine.OpenXMLBase (Source, 1, 0);     
  995.     if (!strCaption)
  996.     {    
  997.         SetNewBase (Source, true);
  998.         strCaption = SaveSource();
  999.         DisplayDocument(1);
  1000.     }
  1001.     else
  1002.      CheckOptions();
  1003.  
  1004.  
  1005.     var SortOrders = Source.getElementsByTagName("root/BANNERBASE/@SortOrder");
  1006.     if (SortOrders.length > 0)    
  1007.     {
  1008.         var SortOrder = top.frames[0].document.all.item("SortOrder");
  1009.         if (SortOrder != null)    
  1010.         {
  1011.             for (Index = 0; Index < SortOrder.options.length; Index++)    
  1012.             {
  1013.                 if (SortOrder.options(Index).value == SortOrders[0].nodeValue)
  1014.                     SortOrder.options(Index).selected = true;
  1015.             }
  1016.         }
  1017.     }
  1018.     else
  1019.      top.frames[0].document.all.item("SortOrder").value = "-@CreationDate"; 
  1020.  
  1021.     SetCaptionBar (strCaption);
  1022.     return    strCaption;
  1023. }
  1024.  
  1025. function AboutDlg ()
  1026. {
  1027.   showModalDialog ("about.htm", Engine, "dialogWidth=500px;dialogHeight=340px;center=yes;border=thin;status=no;scroll=no; help:no;");
  1028. }
  1029.  
  1030. function UsePrgDlg ()
  1031. {  
  1032.   showHelp ('ctrack.chm');
  1033. }
  1034.  
  1035. function ChooseCtListDlg ()
  1036. {
  1037.   bSave = showModalDialog ("choose.htm", Source, "dialogWidth=530px;dialogHeight=420px;center=yes;border=thin;status=no;scroll=no; help:no;");  
  1038.   if (bSave)  
  1039.   {
  1040.    SaveSource(); 
  1041.    FillCTList ();  
  1042.   }
  1043. }
  1044.  
  1045.  
  1046. function ShowOptions()
  1047. { 
  1048.  
  1049.   var BBase = Source.selectSingleNode("root\/BANNERBASE");
  1050.   var ShowSlots = Source.selectSingleNode("root\/BANNERBASE\/@ShowSlots");    
  1051.   // for previous XML format compatible
  1052.   if (ShowSlots == null)    
  1053.   {                
  1054.    BBase.setAttribute("ShowSlots", 191);
  1055.    ShowSlots = Source.selectSingleNode("root\/BANNERBASE\/@ShowSlots");   
  1056.   }
  1057.   ShowSlotsVal = ShowSlots.nodeValue;
  1058.   var ConfirmDelete = Source.selectSingleNode("root\/BANNERBASE\/@ConfirmDelete");  
  1059.   if (ConfirmDelete == null)    
  1060.   {
  1061.    BBase.setAttribute("ConfirmDelete", 0);
  1062.    ConfirmDelete = Source.selectSingleNode("root\/BANNERBASE\/@ConfirmDelete");     
  1063.   }
  1064.   ConfirmDeleteVal = ConfirmDelete.nodeValue;
  1065.   var SmallPictures = Source.selectSingleNode("root\/BANNERBASE\/@SmallPictures");  
  1066.   if (SmallPictures == null)    
  1067.   {
  1068.    BBase.setAttribute("SmallPictures", "0");
  1069.    SmallPictures = Source.selectSingleNode("root\/BANNERBASE\/@SmallPictures");     
  1070.   }
  1071.   SmallPicturesVal = SmallPictures.nodeValue;
  1072.   
  1073.   if (isNaN(ShowSlotsVal))
  1074.     ShowSlotsVal = parseInt(ShowSlotsVal, 10);  
  1075.    
  1076.   var RowBitsOld = ShowSlotsVal;
  1077.   if (parseInt(ConfirmDeleteVal))
  1078.    RowBitsOld=RowBitsOld | 1024;
  1079.   if (parseInt(SmallPicturesVal))
  1080.    RowBitsOld=RowBitsOld | 2048;
  1081.    
  1082.   
  1083.    RowBits = showModalDialog ("options.htm", RowBitsOld, "dialogWidth:230px; dialogHeight:100px; dialogTop:150px; center:yes; border:thin; status:no; scroll:no; help:no;");
  1084.    if (RowBits != RowBitsOld)
  1085.    {
  1086.     Engine.Options = RowBits;
  1087.  
  1088.     if (top.frames[1].document.selection) 
  1089.      top.frames[1].document.selection.empty();
  1090.  
  1091.     if (RowBits & 1024)    
  1092.      BBase.setAttribute("ConfirmDelete", 1);     
  1093.     else
  1094.      BBase.setAttribute("ConfirmDelete", 0);     
  1095.      
  1096.      
  1097.      if  (RowBits & 2048)         
  1098.       BBase.setAttribute("SmallPictures", 1);     
  1099.      else 
  1100.       BBase.setAttribute("SmallPictures", 0);          
  1101.      BBase.setAttribute("ShowSlots", RowBits & 255);
  1102.      Sort(1);     
  1103.    }  
  1104.  
  1105. }
  1106.  
  1107.  
  1108.  
  1109. function ChangeXML_XSL(sz_XSLFileName)
  1110. {    
  1111.     if (ChangeXML())
  1112.         if (ChangeXSL(sz_XSLFileName))    
  1113.         {
  1114.             Sort(0);            
  1115.             return    true;
  1116.         }
  1117.  
  1118.     return    false;
  1119. }
  1120.  
  1121.  
  1122. function SetCaptionBar (str)
  1123. {
  1124.     if (str != null)
  1125.     {
  1126.      // set new captionbar
  1127.      str = "Image Co-Tracker - " + str;
  1128.      top.document.title = str;
  1129.     }      
  1130. }
  1131.  
  1132.  
  1133. function Init()
  1134. {   
  1135.      var str;
  1136.  
  1137.     IEVersion = window.navigator.appVersion.substring(22, 25);
  1138.     //if (IEVersion.charAt(0) != '5')   
  1139.     //{
  1140.     //alert ("This program runs under Microsoft Internet Explorer 5.0 or higher only.");   
  1141.     //top.close();
  1142.     //return;
  1143.     //}
  1144.  
  1145.        var userAgent = navigator.userAgent;
  1146.     var MSIEIndex = userAgent.indexOf("MSIE");
  1147.     if ((userAgent.indexOf("Win") == -1 )
  1148.      || (userAgent.indexOf("MSIE") == -1)
  1149.      || userAgent.substring((MSIEIndex + 5),(MSIEIndex + 6)) < 5)
  1150.     {
  1151.         alert ("This program runs under Microsoft Internet Explorer 5.0 or higher only.");   
  1152.         top.close();
  1153.         return;
  1154.     }
  1155.  
  1156.     if (top.frames[0].document.body.clientHeight == 0)
  1157.     return;    
  1158.   
  1159.     Engine.HdWnd = 1;            
  1160.     
  1161.     //fs = new ActiveXObject("Scripting.FilesystemObject");      
  1162.     //WshShell = new ActiveXObject("WScript.Shell");
  1163.     
  1164.     Source = new ActiveXObject("Microsoft.XMLDOM");
  1165.     Source.async = false;            
  1166.  
  1167.     Style = new ActiveXObject("Microsoft.XMLDOM");
  1168.     Style.async = false;                    
  1169.  
  1170.     StyleFirst = new ActiveXObject("Microsoft.XMLDOM");
  1171.     StyleFirst.async = false;                    
  1172.     
  1173.     ChangeXML_XSL(sz_XSLPath);            
  1174.  
  1175.  
  1176.     FillCTList ();                        
  1177.  
  1178.     FnHead2ScreenSize();
  1179. } 
  1180.  
  1181. //===================================================================================================================================================
  1182. //========================================== Find functions =========================================================================================
  1183.  
  1184. function TFind ()
  1185. {
  1186.   top.frames[1].focus();
  1187.   Engine.CallIECommand (0);
  1188. }
  1189.  
  1190. function OnFind ()
  1191. {
  1192.   top.frames[1].focus();
  1193.   setTimeout  (TFind, 500); 
  1194. }
  1195.  
  1196. //====================================================================================================================================================
  1197. //========================================== Print functions =========================================================================================
  1198.  
  1199. function TPrint ()
  1200. {  
  1201.   LoadAllPics();   
  1202.   if (gnImageNum > 0)
  1203.    idImgTimer = top.frames[1].setInterval (TWaitLoadImages, 20);  
  1204.   else
  1205.    fnPrint();
  1206. }
  1207.  
  1208. function OnPrint ()
  1209. { 
  1210.   if (ConfirmPrint ()) 
  1211.   {
  1212.    top.frames[1].focus();
  1213.    top.frames[1].setTimeout (TPrint, 50);     
  1214.   }
  1215. }
  1216.  
  1217. function TWaitLoadImages ()
  1218. {
  1219.   if (CheckLoadingPics ())
  1220.    fnPrint();  
  1221. }
  1222.  
  1223.  
  1224. function fnPrint ()
  1225. {
  1226.   if (idImgTimer)
  1227.   {
  1228.    top.frames[1].clearInterval(idImgTimer);
  1229.    idImgTimer = 0;
  1230.   }
  1231.   top.frames[1].focus();
  1232.   Engine.CallIECommand (1);   
  1233. }
  1234.  
  1235. function ConfirmPrint ()
  1236. {
  1237.  var DIVs = top.frames[1].document.all.tags("DIV");   
  1238.   
  1239.  if ((DIVs.length > 150) && (!confirm ("You want to print more than 150 images. It may cause some troubles. Do you want to continue?")))
  1240.   return 0;
  1241.  else
  1242.   return 1;
  1243. }
  1244.  
  1245.  
  1246. function CheckLoadingPics ()
  1247. {
  1248.  var DIVs = top.frames[1].document.all.tags("DIV");  
  1249.  
  1250.  for (i=1; i < DIVs.length;i++)
  1251.  { 
  1252.    CurImage = DIVs[i].all.tags("IMG")[0];
  1253.    if (CurImage && (!CurImage.useMap) && (CurImage.fileSize) && (CurImage.readyState != "complete"))   
  1254.    {     
  1255.      return 0;
  1256.    }        
  1257.  } 
  1258.  return 1; 
  1259. }
  1260.  
  1261.  
  1262. function LoadAllPics ()
  1263. { 
  1264.  var CurImage;
  1265.  var DIVs = top.frames[1].document.all.tags("DIV");  
  1266.  var NumImg;  
  1267.    
  1268.  NumImg = 0;
  1269.  for (i=1; i < DIVs.length;i++)
  1270.  { 
  1271.    CurImage = DIVs[i].all.tags("IMG")[0];
  1272.    if (CurImage && (!CurImage.useMap) && (CurImage.fileSize == -1))   
  1273.    {     
  1274.      NumImg++;
  1275.      CurImage.src = CurImage.TEMPSRC;   
  1276.    }        
  1277.  }   
  1278.  gnImageNum = NumImg;
  1279. }
  1280.  
  1281. function fnBeforePrint ()
  1282. {
  1283.  var Button;
  1284.  var DIVs = top.frames[1].document.all.tags("DIV");    
  1285.  
  1286.  for (i=1; i < DIVs.length;i++)
  1287.  { 
  1288.     Button = DIVs[i].all.tags("INPUT")[0];  
  1289.     if (Button)
  1290.      Button.style.display = "none";
  1291.  }   
  1292. }
  1293.  
  1294.  
  1295.  
  1296.  
  1297. function fnAfterPrint ()
  1298. { 
  1299.  var Button;
  1300.  var DIVs = top.frames[1].document.all.tags("DIV");
  1301.  
  1302.  for (i=1; i < DIVs.length;i++)
  1303.  { 
  1304.     Button = DIVs[i].all.tags("INPUT")[0];
  1305.     if (Button)
  1306.      Button.style.display = "";
  1307.  }  
  1308. }
  1309.  
  1310. //============================================Head resize functions======================================================================================
  1311. function FnHead2ScreenSize ()
  1312. {    
  1313.   if (top.frames[0].document.body) 
  1314.    top.document.all.tags('FRAMESET')[0].rows = top.frames[0].document.body.scrollHeight + "px, *";
  1315. }
  1316.  
  1317.  
  1318. function FnHeadResize (HeadFrame)
  1319. { 
  1320.   if (top.frames[0].document.body)   
  1321.    top.document.all.tags('FRAMESET')[0].rows = top.frames[0].document.body.scrollHeight + "px, *";  
  1322. }
  1323.  
  1324.  
  1325. //=======================================================================================================================================================
  1326.  
  1327. function SetButtonImage(oImg, bGray)
  1328. {
  1329.    var    CurrentCT;
  1330.  
  1331.    if (Source == null)
  1332.     return;
  1333.    
  1334.    CurrentCT = Source.selectSingleNode("root\/CTLIST\/@CurrentCategory");  
  1335.    if (((CurrentCT.nodeValue == "0000000000000000") || (CurrentCT.nodeValue == "0000000000000001")) && ((oImg.id == "btnDelCT") || (oImg.id == "btnRenameCT"))) 
  1336.     return;
  1337.  
  1338.  
  1339.  
  1340.  
  1341.   if (bGray == 1)
  1342.    oImg.src = oImg.graysrc;
  1343.   else
  1344.    oImg.src = oImg.colorsrc;
  1345. }
  1346.  
  1347. function File2Tracker (nCommand)
  1348. {
  1349.  var strCaption;
  1350.  
  1351.  switch (nCommand)
  1352.  {
  1353.    case @NEW_XMLDB:
  1354.     SourceNew = new ActiveXObject("Microsoft.XMLDOM");
  1355.     SourceNew.async = false;            
  1356.     SetNewBase (SourceNew);
  1357.     strCaption = Engine.NewXMLBase (SourceNew);
  1358.     if (strCaption)    
  1359.     {
  1360.      Source = SourceNew;         
  1361.      Engine.UpdateData(null);     
  1362.     }
  1363.     break;       
  1364.  
  1365.    case @OPEN_XMLDB:
  1366.     SourceNew = new ActiveXObject("Microsoft.XMLDOM");
  1367.     SourceNew.async = false;
  1368.     strCaption = Engine.OpenXMLBase (SourceNew, 0, 0);     
  1369.     if (strCaption)
  1370.     {
  1371.      Source = SourceNew;    
  1372.      Engine.UpdateData(null);     
  1373.     }
  1374.     break;       
  1375.  
  1376.    case @SAVE_XMLDB:    
  1377.     strCaption = Engine.SaveAsXMLBase (Source);     
  1378.     if (strCaption)    
  1379.       SetCaptionBar(strCaption);    
  1380.     break;        
  1381.  }
  1382.  
  1383. }
  1384.  
  1385.  
  1386. function CheckOptions ()
  1387. {
  1388.   var BBase = Source.selectSingleNode("root\/BANNERBASE");
  1389.   var ShowSlots = Source.selectSingleNode("root\/BANNERBASE\/@ShowSlots");    
  1390.   var ConfirmDelete = Source.selectSingleNode("root\/BANNERBASE\/@ConfirmDelete");    
  1391.   var SmallPictures = Source.selectSingleNode("root\/BANNERBASE\/@SmallPictures");  
  1392.   var CtOptions = Engine.Options;
  1393.   var Val;
  1394.   var bNoChange = true;
  1395.  
  1396.   //debugger;
  1397.  
  1398.   
  1399.   if (CtOptions == -1)    
  1400.   {
  1401.    Val = ShowSlots.nodeValue & 255;
  1402.    if ((ConfirmDelete) &&  (ConfirmDelete.nodeValue == 1)) 
  1403.     Val = Val | 1024;
  1404.    if ((SmallPictures) &&  (SmallPictures.nodeValue == 1)) 
  1405.     Val = Val | 2048;
  1406.    
  1407.    Engine.Options = Val;                   
  1408.   } 
  1409.   else
  1410.   {
  1411.    if ((!ShowSlots) ||  (ShowSlots.nodeValue != (CtOptions & 255)))
  1412.    {
  1413.     Val = CtOptions & 255;
  1414.     BBase.setAttribute("ShowSlots", Val);
  1415.     bNoChange = false;
  1416.    }
  1417.  
  1418.    if ((!ConfirmDelete) ||  (ConfirmDelete.nodeValue != (CtOptions & 1024)))
  1419.    {
  1420.     if ( CtOptions & 1024 )
  1421.      BBase.setAttribute("ConfirmDelete", 1);
  1422.     else    
  1423.      BBase.setAttribute("ConfirmDelete", 0);
  1424.     bNoChange = false;
  1425.    }
  1426.  
  1427.  
  1428.    if ((!SmallPictures) ||  (SmallPictures.nodeValue != (CtOptions & 2048)))
  1429.    {
  1430.     if ( CtOptions & 2048 )
  1431.      BBase.setAttribute("SmallPictures", 1);     
  1432.     else
  1433.      BBase.setAttribute("SmallPictures", 0);         
  1434.     bNoChange = false;
  1435.    }  
  1436.  
  1437.    if (bNoChange == false)
  1438.     SaveSource();
  1439.   }
  1440. }
  1441.  
  1442.  
  1443. function ExportF ()
  1444. {
  1445.   Engine.Export (null);
  1446. }
  1447.  
  1448. function ImportF ()
  1449. {
  1450.   Engine.Import (null);
  1451. }
  1452.  
  1453. function PublishHTML ()
  1454. {
  1455.  var HTMLText;
  1456.  var strDirName;
  1457.  
  1458.  str = Engine.GetHTMLName ();  
  1459.  
  1460.  if (str != null)
  1461.  {
  1462.      strTmp = str;
  1463.      strDir = "";
  1464.      do
  1465.      {
  1466.       nPos = strTmp.search (/\\/i);
  1467.       if (nPos != -1)      
  1468.       {
  1469.        strTmp = strTmp.substring (nPos+1, strTmp.length);
  1470.        strDir = str.substring (0, nPos+strDir.length+1);         
  1471.       }
  1472.      } while (nPos != -1); 
  1473.  
  1474.      nPos = strTmp.search (/\./);
  1475.      if (nPos != -1)
  1476.       strTmp = strTmp.substring (0, nPos);
  1477.      strDir = strDir + strTmp + "_images\\";
  1478.      strDirName = strTmp + "_images\\"; // name subdirectory with images
  1479.  
  1480.  
  1481.    var PSlotsOld = Source.selectSingleNode("root\/BANNERBASE\/@PubSlots");    
  1482.    var BBase = Source.selectSingleNode("root\/BANNERBASE");
  1483.  
  1484.    if (PSlotsOld == null)   
  1485.    {
  1486.     PSlotsOld = Source.selectSingleNode("root\/BANNERBASE\/@ShowSlots");    
  1487.     if (PSlotsOld)
  1488.      BBase.setAttribute("PubSlots", PSlotsOld.nodeValue);
  1489.     else
  1490.     {
  1491.      BBase.setAttribute("PubSlots", "191"); 
  1492.      PSlotsOld = Source.selectSingleNode("root\/BANNERBASE\/@PubSlots");    
  1493.     }
  1494.     SaveSource();
  1495.    }
  1496.  
  1497.    var PNamesOld = Source.selectSingleNode("root\/BANNERBASE\/@FieldNames");    
  1498.    if (PNamesOld == null)   
  1499.    {
  1500.     BBase.setAttribute("FieldNames", "1"); 
  1501.     PNamesOld = Source.selectSingleNode("root\/BANNERBASE\/@FieldNames");    
  1502.     SaveSource();
  1503.    }
  1504.  
  1505.    if (PNamesOld.nodeValue == 1)
  1506.     nSlots = PSlotsOld.nodeValue | 1024;
  1507.    else
  1508.     nSlots = PSlotsOld.nodeValue;
  1509.  
  1510.    var nSlots = showModalDialog ("pub_opts.htm", nSlots, "dialogWidth:230px; dialogHeight:100px; dialogTop:150px; center:yes; border:thin; status:no; scroll:no; help:no;");
  1511.    if (!nSlots)
  1512.     return;
  1513.  
  1514.    if ((nSlots & 191)  != PSlotsOld.nodeValue)
  1515.    {
  1516.     BBase.setAttribute("PubSlots", (nSlots & 191));
  1517.     SaveSource();
  1518.    }
  1519.  
  1520.    if ((nSlots & 1024) != PNamesOld.nodeValue)
  1521.    {
  1522.     if (nSlots & 1024)
  1523.      BBase.setAttribute("FieldNames", "1"); 
  1524.     else
  1525.      BBase.setAttribute("FieldNames", "0"); 
  1526.    }
  1527.  
  1528.  
  1529.    XSL4HTML = new ActiveXObject("Microsoft.XMLDOM");
  1530.    XSL4HTML.load("htm.xsl");
  1531.    HTMLText = Source.transformNode(XSL4HTML);
  1532.    top.frames[2].document.all.XSLResult.innerHTML = HTMLText;
  1533.  
  1534.    var MapsToEscape = top.frames[2].document.all.tags("MAP");
  1535.    if (MapsToEscape != null)    
  1536.     {
  1537.        for (var Index = MapsToEscape.length - 1; Index >= 0; Index--)                
  1538.          MapsToEscape[Index].innerHTML = unescape(MapsToEscape[Index].innerHTML);                                    
  1539.     }                
  1540.  
  1541.     var MapsToChange = top.frames[2].document.all.tags("MAPTOCHANGE");
  1542.     if (MapsToChange != null)    
  1543.     {
  1544.             for (var MapIndex = 0; MapIndex < MapsToChange.length; MapIndex++)    
  1545.             {
  1546.                 var AreasToChange = MapsToChange[MapIndex].parentElement.all.tags("AREA");
  1547.                 if (AreasToChange != null)    
  1548.                 {
  1549.                     for (var AreaIndex = 0; AreaIndex < AreasToChange.length; AreaIndex++)    
  1550.                      AreasToChange[AreaIndex].target = "_blank";                                            
  1551.                 }
  1552.                 MapsToChange[MapIndex].parentElement.outerHTML = MapsToChange[MapIndex].nextSibling.outerHTML;                                        
  1553.                 MapIndex--; // becouse there is decrement collection length                
  1554.             }
  1555.             
  1556.     }                 
  1557.  
  1558.    var Imgs = top.frames[2].document.all.tags("IMG");
  1559.    for (i=0; i<Imgs.length; i++)
  1560.    {
  1561.     StrSrc =  unescape (Imgs[i].src);    
  1562.     Engine.CopyImageFile (Imgs[i].src, strDir);    
  1563.     do
  1564.     {
  1565.       nPos = StrSrc.search ('/');
  1566.       if (nPos != -1)      
  1567.        StrSrc = StrSrc.substring (nPos+1, StrSrc.length);         
  1568.      } while (nPos != -1);
  1569.  
  1570.      StrSrc = strDirName + StrSrc;          
  1571.      Imgs[i].src = StrSrc;
  1572.    }
  1573.  
  1574.    HTMLText = top.frames[2].document.all.XSLResult.innerHTML;
  1575.    HTMLText = "<HTML><BODY STYLE='background-color:white'>" + HTMLText + "</BODY></HTML>"
  1576.    top.frames[2].document.all.XSLResult.innerHTML = "";
  1577.  
  1578.    var fso = new ActiveXObject("Scripting.FilesystemObject");
  1579.    var fstream = fso.CreateTextFile (str, true, true);
  1580.    fstream.Write (HTMLText);   
  1581.    fstream.Close ();
  1582.  
  1583.  }
  1584.    
  1585. }    
  1586.  
  1587.  
  1588. function fnContextMenuBubble ()
  1589. {
  1590.  if (event) 
  1591.  {
  1592.   event.cancelBubble = true;
  1593.   event.returnValue = false;
  1594.  }
  1595.  else
  1596.  {
  1597.   top.frames[0].event.cancelBubble = true;
  1598.   top.frames[0].event.returnValue = false;
  1599.  }
  1600.  
  1601.  return false;
  1602. }
  1603.  
  1604.  
  1605. function fnContextMenuCheck ()
  1606. {
  1607.  if ((top.frames[1].event.srcElement.tagName != "IMG") && (top.frames[1].event.srcElement.tagName != "INPUT"))
  1608.  {  
  1609.   top.frames[1].event.cancelBubble = true;
  1610.   top.frames[1].event.returnValue = false;
  1611.   return false;
  1612.  }
  1613. }
  1614.  
  1615.  
  1616. function Attach2Email (bPopup)
  1617. {
  1618.   //top.frames[0].document.all["btnMail"].UpdateButton(0, 1);
  1619.   if (top.frames[0].event)
  1620.   {
  1621.    x = top.frames[0].event.x;
  1622.    y = top.frames[0].event.y;
  1623.   }
  1624.   else
  1625.   {
  1626.    x=0;
  1627.    y=50; 
  1628.   }
  1629.  
  1630.   if (bPopup)
  1631.    Engine.MailClientsPopupMenu  (1, x, y);
  1632.   else
  1633.    Engine.MailClientsPopupMenu  (0, x, y);
  1634.  
  1635.   //top.frames[0].document.all["btnMail"].UpdateButton(0, 0);
  1636.   top.window.focus();
  1637. }
  1638.  
  1639. </SCRIPT>
  1640. </HEAD>
  1641. <FRAMESET BORDER=0 ROWS="40px, *, 0px" ID=Main onload="Init()" oncontextmenu="fnContextMenuBubble()">
  1642. <FRAME FRAMEBORDER=1 SCROLLING=NO SRC=hd.htm APPLICATION="yes" onresize="FnHeadResize (this)" NORESIZE> 
  1643. <FRAME FRAMEBORDER=0 SCROLLING=AUTO SRC=data.htm  APPLICATION="yes" onresize="LoadPictures()" NORESIZE>
  1644. <FRAME SRC=data.htm style="display:none" APPLICATION="yes" NORESIZE>
  1645. <NOFRAMES> There is no frame support!  </NOFRAMES>
  1646. </FRAMESET>
  1647. </HTML>
  1648.