var isie          = document.all; 
var isfirefox     = document.getElementById && !document.all;
var hidemenudelay = 250;              //time to wait before hidding menu on mouseouts
var hidesubdelay  = 100;              //time to wait before hidding submenu on mouseouts 
var killmenudelay = hidemenudelay * 5 //time to wait to kill the main menu on mouseouts.
var onsubmenu     = false;            //true when cursor is over submenu.   
var menuwidth     = 200;              //width of menus. 
var delaykillmenu = null;             //Holds reference to function to kill the main menu.
//
// A few "global" functions.
//
function iecompattest()
{
   return (document.compatMode && document.compatMode!="BackCompat")? document.documentElement : document.body
}

function contains_firefox(a, b) 
{
  while (b.parentNode)
    if ((b = b.parentNode) == a)
      return true;
  return false;
}

function showhide(theobj, e)
{
  if (isie || isfirefox)
    theobj.style.left = theobj.style.top = "-500px"
    
  if (e.type == "click" && theobj.style.visibility == hidden || e.type == "mouseover")
    theobj.style.visibility = "visible"
  else if (e.type == "click")
    theobj.style.visibility = "hidden"
}

function clearbrowseredge(theobj, whichedge)
  {
    var edgeoffset = 0
  
    if (whichedge == "rightedge")
    {
      var windowedge = isie && !window.opera ? iecompattest().scrollLeft + iecompattest().clientWidth - 15 : window.pageXOffset + window.innerWidth - 15
      theobj.contentmeasure = theobj.offsetWidth
    
      if (windowedge - theobj.x < theobj.contentmeasure)  //move menu to the left?
        edgeoffset = theobj.contentmeasure - theobj.offsetWidth
    }
    else
    {
      var topedge    = isie && !window.opera ? iecompattest().scrollTop : window.pageYOffset
      var windowedge = isie && !window.opera ? iecompattest().scrollTop + iecompattest().clientHeight - 15 : window.pageYOffset + window.innerHeight - 18
  
      theobj.contentmeasure = theobj.offsetHeight
    
      if (windowedge - theobj.y < theobj.contentmeasure)
      { //move up?
        edgeoffset = theobj.contentmeasure + theobj.offsetHeight
  
        if ((theobj.y - topedge) < theobj.contentmeasure) //up no good either?
          edgeoffset = theobj.y + theobj.offsetHeight - topedge
      }
    }
    return edgeoffset
  }

//
// Used to hide the main menu. This is a kludge at best. I couldn't figure
// out how to hide the main menu on sub-menu mouseouts without having the
// main menu close at the wrong time. So, this is used to schedule it to
// hide then the schedule is cleared if we don't want it to be hidden. 
// Seems to work fairly well but it is a bad workaround. If the dely
// interval is off, all bets are off.
//
function killmainmenu() 
{
  if (mainmenu.mainmenuobj != null)
    delaykillmenu = setTimeout("mainmenu.mainmenuobj.style.visibility = 'hidden'; if (submenu.submenuobj != null) {submenu.submenuobj.style.visibility = 'hidden'}", killmenudelay)    
}

//
// Main menu object.
//
var mainmenu =
{
  mainmenuobj: null,  

  getposOffset:function(what, offsettype)
  {
    var totaloffset = (offsettype == "left") ? what.offsetLeft : what.offsetTop;
    var parentEl    = what.offsetParent;

    while (parentEl != null)
    {
      totaloffset = (offsettype == "left") ? totaloffset + parentEl.offsetLeft : totaloffset + parentEl.offsetTop;
      parentEl    = parentEl.offsetParent;
    }
    return totaloffset;
  },

  dropit:function(obj, e, dropmenuID)
  {  
    onsubmenu = false     
    
    // Hide the previous main menu.
    if (this.mainmenuobj != null) 
      this.mainmenuobj.style.visibility = "hidden"
    
    // Hide the previous sub menu.
    if (submenu.submenuobj != null) 
      submenu.submenuobj.style.visibility = "hidden"
     
    // If this menu was scheduled to be hidden, clear the schedule.
    this.clearhidemenu()

    if (isie || isfirefox)
    {        
      obj.onmouseout               = function(){mainmenu.delayhidemenu()}
      this.mainmenuobj             = document.getElementById(dropmenuID)
      this.mainmenuobj.onmouseover = function(){mainmenu.clearhidemenu()}
      this.mainmenuobj.onmouseout  = function(){mainmenu.dynamichide(e)}
      this.mainmenuobj.onclick     = function(){mainmenu.delayhidemenu()}
                 
      showhide(this.mainmenuobj, e)

      this.mainmenuobj.x          = this.getposOffset(obj, "left")
      this.mainmenuobj.y          = this.getposOffset(obj, "top")     
      this.mainmenuobj.style.left = this.mainmenuobj.x - clearbrowseredge(this.mainmenuobj, "rightedge") + "px"
      this.mainmenuobj.style.top  = this.mainmenuobj.y - clearbrowseredge(this.mainmenuobj, "bottomedge") + obj.offsetHeight + 1 + "px"
    }
  },

  dynamichide:function(e)
  {
    var evtobj = window.Event ? window.event : e

    // Kludge to hide the main menu.
    killmainmenu()

    if (isie && !this.mainmenuobj.contains(evtobj.toElement))
      if (onsubmenu == false)    
        this.delayhidemenu()
    else if (isfirefox && e.currentTarget != evtobj.relatedTarget && !contains_firefox(evtobj.currentTarget, evtobj.relatedTarget))
      if (onsubmenu == false)    
        this.delayhidemenu()
  },

    delayhidemenu:function()
  {
    this.delayhide = setTimeout("mainmenu.mainmenuobj.style.visibility = 'hidden'; if (submenu.submenuobj != null) {submenu.submenuobj.style.visibility = 'hidden'}", hidemenudelay)
  },

  clearhidemenu:function()
  {
    clearTimeout(delaykillmenu)      
  
    if (this.delayhide != "undefined")
      clearTimeout(this.delayhide)      
  }
}


//
// Sub menu object.
//
var submenu =
{
  submenuobj:  null,

  getposOffset:function(what, offsettype)
  {
    var totaloffset = (offsettype == "left") ? what.offsetLeft : what.offsetTop;
    var parentEl    = what.offsetParent;

    while (parentEl != null)
    {
      totaloffset = (offsettype == "left") ? totaloffset + parentEl.offsetLeft : totaloffset + parentEl.offsetTop;
      parentEl    = parentEl.offsetParent;
    }
    return totaloffset;
  },

  dropit:function(obj, e, dropsubID)
  {
    onsubmenu = false
   
    if (this.submenuobj != null) 
      this.submenuobj.style.visibility = "hidden"
        
    this.clearhidemenu()

    if (isie || isfirefox)
    {      
      onsubmenu = true
      
      obj.onmouseout              = function(){submenu.delayhidemenu()}
      this.submenuobj             = document.getElementById(dropsubID)
      this.submenuobj.onmouseover = function(){submenu.clearhidemenu();}
      this.submenuobj.onmouseout  = function(){submenu.dynamichide(e)}    
      this.submenuobj.onclick     = function(){submenu.delayhidemenu()}
            
      showhide(this.submenuobj, e)

      this.submenuobj.x          = this.getposOffset(obj, "left") + menuwidth
      this.submenuobj.y          = this.getposOffset(obj, "top")  - 25 //not perfect w/ small windows.      
      this.submenuobj.style.left = this.submenuobj.x - clearbrowseredge(this.submenuobj, "rightedge") + "px"
      this.submenuobj.style.top  = this.submenuobj.y - clearbrowseredge(this.submenuobj, "bottomedge") + obj.offsetHeight + 1 + "px"
    }
  },

  dynamichide:function(e)
  {
    var evtobj = window.Event ? window.event : e
    
    onsubmenu = false
    killmainmenu()
    
    if (isie && !this.submenuobj.contains(evtobj.toElement))
      this.delayhidemenu()
    else if (isfirefox && e.currentTarget != evtobj.relatedTarget && !contains_firefox(evtobj.currentTarget, evtobj.relatedTarget))
      this.delayhidemenu()
  }, 
  
  delayhidemenu:function()
  {
    this.delayhide = setTimeout("onsubmenu=false; submenu.submenuobj.style.visibility = 'hidden'", hidesubdelay)
  },

  clearhidemenu:function()
  {
    clearTimeout(delaykillmenu)   
    
    if (this.delayhide != "undefined")
      clearTimeout(this.delayhide)      
  }
}

function PreventSubmit(form) 
{
var val = form.q.value.replace(/^\s+|\s+$/g,"");
if (val.length == 0) 
{
  return false;
  }
else 
  return true;
}

function WriteTopMenu()
{
  var url = location.href.toUpperCase(); 
  var Title = ""

  if (url.indexOf("DOTNET") > 0)
    Title = " VB.NET and C# Code Library";
  else if (url.indexOf("VBASIC") > 0)
    Title = " Classic VB 6.0 / Win32 API Library";
  else if (url.indexOf("XML") > 0)
    Title = " XML, AJAX, &amp; FxCop Tutorials";
  else
    Title = " ";

  var sLine = '';
  sLine  = '<table width="780" border="0" cellpadding="0" cellspacing="0" align="center"><tr><td>';
  sLine += '<div class="thescarmsdiv"><span class="thescarmsheader">TheScarms.com</span>';
  sLine += '&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;  &nbsp; &nbsp; &nbsp; ';
  sLine += '<span class="thescarmstext">' + Title + '</span></div></td></tr><tr><td bgcolor="Blue">';
  sLine += '<div id="themenu">';
  sLine += '<ul>';
  sLine += '<li><a href="../default.htm" onMouseover="mainmenu.dropit(this,event,\'mainmenu0\')">Home</a></li>';
  sLine += '<li><a href="../dotNet/default.aspx" onMouseover="mainmenu.dropit(this,event,\'mainmenu1\')">VB.NET / C#</a></li>';
  sLine += '<li><a href="../VBasic/default.aspx" onMouseover="mainmenu.dropit(this,event,\'mainmenu2\')">Classic VB 6.0</a></li>';
  sLine += '<li><a href="../xml/default.aspx" onMouseover="mainmenu.dropit(this,event,\'mainmenu3\')">Tutorials</a></li>';
  sLine += '<li><a href="#" onMouseover="mainmenu.dropit(this,event,\'mainmenu4\')">RSS Feeds</a></li>';
  sLine += '<li><a href="../AppSentinel/default.aspx" onMouseover="mainmenu.dropit(this,event,\'mainmenu5\')">AppSentinel</a></li>';
  sLine += '<li><a href="../common/contact.aspx?1=0">Contact</a></li>';
  sLine += '</ul>';
  sLine += '</div>';
  sLine += '<div id="mainmenu0" class="dropmenudiv">';
  sLine += '<a href="../default.htm">TheScarms.com Home</a>';
  sLine += '<a href="../dotNet/default.aspx">VB.Net &amp; C# Home</a>';
  sLine += '<a href="../VBasic/default.aspx">Classic VB 6.0 Home</a>';
  sLine += '<a href="../HotStuff/default.htm">Habanero Hot Sauces</a>';
  sLine += '<a href="../AppSentinel/default.aspx">AppSentinel</a>';
  sLine += '</div>';
  sLine += '<div id="mainmenu1" class="dropmenudiv">';
  sLine += '<a href="../dotnet/dotnetenv.aspx">Environmental</a>';
  sLine += '<a href="../dotnet/dotnetgen.aspx">General Programming</a>';
  sLine += '<a href="../dotnet/dotnetdebug.aspx">Debugging &amp; Error Handling</a>';
  sLine += '<a href="../dotnet/dotnetsecurity.aspx">Security</a>';
  sLine += '<a href="../dotnet/dotnetwinform.aspx">WinForms &amp; Controls</a>';
  sLine += '<a href="../dotnet/dotnetio.aspx">File Operations &amp; I/O</a>';
  sLine += '<a href="../dotnet/dotnetstring.aspx">String / Regular Expression</a>';
  sLine += '<a href="../dotnet/dotnetmsobj.aspx">Excel</a>';
  sLine += '<a href="../dotnet/dotnetemail.aspx">E-Mail Related</a>';
  sLine += '<a href="../dotnet/dotnetasp.aspx">ASP.NET</a>';
  sLine += '<a href="../dotnet/dotnetado.aspx">ADO.NET</a>';
  sLine += '<a href="../dotnet/dotnetgrid.aspx">DataGrid</a>';
  sLine += '<a href="../dotnet/dotnetcrystal.aspx">Crystal Reports</a>';
  sLine += '</div>';
  sLine += '<div id="mainmenu2" class="dropmenudiv">';
  sLine += '<a href="../vbasic/vbMSobjects.aspx">Excel and Word Objects</a>';
  sLine += '<a href="../vbasic/VbFileOps.aspx">File System, I/O &amp; Registry</a>';
  sLine += '<a href="../vbasic/VbFormsAndControls.aspx">Forms &amp; Controls</a>';
  sLine += '<a href="../vbasic/vbmultimedia.aspx">Multi-Media Samples</a>';
  sLine += '<a href="../vbasic/VbProcessRelated.aspx">Process/Thread Related</a>';
  sLine += '<a href="../vbasic/VbSubClassing.aspx">Sub-Classing</a>';
  sLine += '<a href="../vbasic/VbSystemRelated.aspx">System Information Related</a>';
  sLine += '<a href="../vbasic/VbWindowFunctions.aspx">Window Related Samples</a>';
  sLine += '<a href="../vbasic/vbmisc.aspx">Miscellaneous</a>';
  sLine += '<a href="../vbasic/vbarticles.aspx">VB 6.0/XML Articles</a>';
  sLine += '<a href="#" onMouseover="submenu.dropit(this,event,\'submenu21\')">Windows &amp; VB 6.0 Tips &nbsp;&gt;&gt;</a>';
  sLine += '</div>';
  sLine += '<div id="mainmenu3" class="dropmenudiv">';
  sLine += '<a href="../xml/XMLTutorial.aspx">XML Tutorial</a>';
  sLine += '<a href="../xml/DTDTutorial.aspx">DTD Tutorial</a>';
  sLine += '<a href="../xml/SchemaTutorial.aspx">Schema Tutorial</a>';
  sLine += '<a href="../xml/XSLTutorial.aspx">XSL Tutorial</a>';
  sLine += '<a href="../xml/DOMTutorial.aspx">DOM Tutorial</a>';
  sLine += '<a href="../xml/XHTMLTutorial.aspx">XHTML Tutorial</a>';
  sLine += '<a href="../xml/AJAXTutorial1.aspx">AJAX Tutorial</a>';
  sLine += '<a href="../dotnet/FxCop1.aspx">Custom FxCop Rules</a>';
  sLine += '</div>';
  sLine += '<div id="mainmenu4" class="dropmenudiv">';
  sLine += '<a href="../common/rsslist.aspx">VB.NET &amp; C#</a>';
  sLine += '<a href="../common/rsslist.aspx">Classic VB 6.0</a>';
  sLine += '<a href="../common/rsslist.aspx">XML &amp; AJAX Articles</a>';
  sLine += '<a href="../common/rsslist.aspx">FxCop Custom Rules</a>';
  sLine += '</div>';
  sLine += '<div id="mainmenu5" class="dropmenudiv">';
  sLine += '<a href="../AppSentinel/default.aspx">Home</a>';
  sLine += '<a href="../AppSentinel/features.aspx">Learn More</a>';
  sLine += '<a href="../AppSentinel/components.aspx">Components</a>';
  sLine += '<a href="../AppSentinel/modes.aspx">How it Works</a>';
  sLine += '<a href="../AppSentinel/faq.aspx">Frequently Asked Questions</a>';
  sLine += '<a href="../AppSentinel/trial.aspx">Free Trial</a>';
  sLine += '<a href="../AppSentinel/purchase.aspx">Purchase</a>';
  sLine += '</div>';
  sLine += '<div id="submenu21" class="dropmenudiv">';
  sLine += '<a href="../vbasic/tipsxp.aspx">Windows XP Related</a>';
  sLine += '<a href="../vbasic/tipsfile.aspx">File System</a>';
  sLine += '<a href="../vbasic/tipssys.aspx">OS and System Tips</a>';
  sLine += '<a href="../vbasic/tipsMouse.aspx">Mouse and Keyboard</a>';
  sLine += '<a href="../vbasic/tipsmenu.aspx">Windows Menu Related</a>';
  sLine += '<a href="../vbasic/tipsIE.aspx">Internet Explorer</a>';
  sLine += '<a href="../vbasic/tipsexplorer.aspx">Windows Explorer</a>';
  sLine += '<a href="../vbasic/tips.aspx">Classic VB 6.0</a>';
  sLine += '</div></td></tr>';
  sLine += '<tr><td valign="top" align="center" width="100%">';
  sLine += '<table width="100%"><tr><td>';
  //sLine += '<form action="http://localhost/thescarmscopy/common/searchresults.aspx" id="FormSearch" target="_blank" onsubmit="return PreventSubmit(this);">';
  sLine += '<form action="http://www.thescarms.com/common/searchresults.aspx" id="FormSearch" target="_blank" onsubmit="return PreventSubmit(this);">';
  //sLine += '<img src="../images/poweredbygoogle.gif" border="0" alt="Google" width="90" height="33" />';
  sLine += '<input type="radio" name="cx" value="008001709253376605915:fxhvmq2jpcm" checked="checked"></input><span class="OptionsSearch">TheScarms</span>&nbsp;';
  sLine += '<input type="radio" name="cx" value="008001709253376605915:ztxie7uwjp4"></input><span class="OptionsSearch">The Web</span>&nbsp;';
  sLine += '<input type="radio" name="cx" value="008001709253376605915:a45twjr3bb0"></input><span class="OptionsSearch">MSDN</span>&nbsp;';
  sLine += '<input type="text" name="q" size="20" title="Enter key words" />&nbsp;';
  sLine += '<input type="submit" name="btnSubmit" value="Search" class="SearchButton" title="Click to search"></input>';
  sLine += '<input type="hidden" name="cof" value="FORID:10" />' ;
  sLine += '<input type="hidden" name="ie" value="UTF-8" />';
  sLine += '</form>';
  sLine += '<script type="text/javascript" src="http://www.google.com/cse/brand?form=cse-search-box&lang=en"></script>';
  sLine += '</td><td>';
  sLine += '<form action="https://www.paypal.com/cgi-bin/webscr" target="_blank" method="post">';
  sLine += '<span title="Please donation to TheScarms">';
  sLine += '<input type="image" src="../images/donate.gif" name="submit" alt="Please make a donation" border="0" width="110" height="23"/>';
  sLine += '</span>';
  sLine += '<input type="hidden" name="encrypted" value="-----BEGIN PKCS7-----&#13;&#10;MIIHXwYJKoZIhvcNAQcEoIIHUDCCB0wCAQExggEwMIIBLAIBADCBlDCBjjELMAkG&#13;&#10;A1UEBhMCVVMxCzAJBgNVBAgTAkNBMRYwFAYDVQQHEw1Nb3VudGFpbiBWaWV3MRQw&#13;&#10;EgYDVQQKEwtQYXlQYWwgSW5jLjETMBEGA1UECxQKbGl2ZV9jZXJ0czERMA8GA1UE&#13;&#10;AxQIbGl2ZV9hcGkxHDAaBgkqhkiG9w0BCQEWDXJlQHBheXBhbC5jb20CAQAwDQYJ&#13;&#10;KoZIhvcNAQEBBQAEgYAyNe7ZqKDHkXk6O9uuNWWieB2y3r7uNP6/weY4nzD7rtR7&#13;&#10;kWQu2MjEw7+wRUXOdG0GrltC24l9lMRHBXrOTu9GU9w6/nMlkxDvxJGMTZFX8pVj&#13;&#10;uN5LXjL3RSug3c/axa5QvOii4rJamX13vxZbogKhL+QUj5B/5H0epNXUyyRpKzEL&#13;&#10;MAkGBSsOAwIaBQAwgdwGCSqGSIb3DQEHATAUBggqhkiG9w0DBwQILTwGZa7TyEmA&#13;&#10;gbjfyo9sFQHGJhClka7umxksDU8Mx5giwv0gmJm5vcr5V7Zt18m2/B3vl+f7xY5V&#13;&#10;vPxoEe9hOLNkD4VjUP5Z7GJFMYRpHn8nSl4Yu0MZEc2m2Ji48PXMRYM+H+btlkvb&#13;&#10;xXBDtogzSAMFz02Gbc0dmu1w/CXkfzletCW54HKxhjy6lUcqGEO4cRFDS3uxSNQ2&#13;&#10;C9elzUTdZwxd9fJBOxeHB7wfd5OL51vjgTy19NUjPfTBPU4Dj0SB7gBloIIDhzCC&#13;&#10;A4MwggLsoAMCAQICAQAwDQYJKoZIhvcNAQEFBQAwgY4xCzAJBgNVBAYTAlVTMQsw&#13;&#10;CQYDVQQIEwJDQTEWMBQGA1UEBxMNTW91bnRhaW4gVmlldzEUMBIGA1UEChMLUGF5&#13;&#10;UGFsIEluYy4xEzARBgNVBAsUCmxpdmVfY2VydHMxETAPBgNVBAMUCGxpdmVfYXBp&#13;&#10;MRwwGgYJKoZIhvcNAQkBFg1yZUBwYXlwYWwuY29tMB4XDTA0MDIxMzEwMTMxNVoX&#13;&#10;DTM1MDIxMzEwMTMxNVowgY4xCzAJBgNVBAYTAlVTMQswCQYDVQQIEwJDQTEWMBQG&#13;&#10;A1UEBxMNTW91bnRhaW4gVmlldzEUMBIGA1UEChMLUGF5UGFsIEluYy4xEzARBgNV&#13;&#10;BAsUCmxpdmVfY2VydHMxETAPBgNVBAMUCGxpdmVfYXBpMRwwGgYJKoZIhvcNAQkB&#13;&#10;Fg1yZUBwYXlwYWwuY29tMIGfMA0GCSqGSIb3DQEBAQUAA4GNADCBiQKBgQDBR07d&#13;&#10;/ETMS1ycjtkpkvjXZe9k+6CieLuLsPumsJ7QC1odNz3sJiCbs2wC0nLE0uLGaEtX&#13;&#10;ynIgRqIddYCHx88pb5HTXv4SZeuv0Rqq4+axW9PLAAATU8w04qqjaSXgbGLP3Nmo&#13;&#10;hqM6bV9kZZwZLR/klDaQGo1u9uDb9lr4Yn+rBQIDAQABo4HuMIHrMB0GA1UdDgQW&#13;&#10;BBSWn3y7xm8XvVk/UtcKG+wQ1mSUazCBuwYDVR0jBIGzMIGwgBSWn3y7xm8XvVk/&#13;&#10;UtcKG+wQ1mSUa6GBlKSBkTCBjjELMAkGA1UEBhMCVVMxCzAJBgNVBAgTAkNBMRYw&#13;&#10;FAYDVQQHEw1Nb3VudGFpbiBWaWV3MRQwEgYDVQQKEwtQYXlQYWwgSW5jLjETMBEG&#13;&#10;A1UECxQKbGl2ZV9jZXJ0czERMA8GA1UEAxQIbGl2ZV9hcGkxHDAaBgkqhkiG9w0B&#13;&#10;CQEWDXJlQHBheXBhbC5jb22CAQAwDAYDVR0TBAUwAwEB/zANBgkqhkiG9w0BAQUF&#13;&#10;AAOBgQCBXzpWmoBa5e9fo6ujionW1hUhPkOBakTr3YCDjbYfvJEiv/2P+IobhOGJ&#13;&#10;r85+XHhN0v4gUkEDI8r2/rNk1m0GA8HKddvTjyGw/XqXa+LSTlDYkqI8OwR8GEYj&#13;&#10;4efEtcRpRYBxV8KxAW93YDWzFGvruKnnLbDAF6VR5w/cCMn5hzGCAZowggGWAgEB&#13;&#10;MIGUMIGOMQswCQYDVQQGEwJVUzELMAkGA1UECBMCQ0ExFjAUBgNVBAcTDU1vdW50&#13;&#10;YWluIFZpZXcxFDASBgNVBAoTC1BheVBhbCBJbmMuMRMwEQYDVQQLFApsaXZlX2Nl&#13;&#10;cnRzMREwDwYDVQQDFAhsaXZlX2FwaTEcMBoGCSqGSIb3DQEJARYNcmVAcGF5cGFs&#13;&#10;LmNvbQIBADAJBgUrDgMCGgUAoF0wGAYJKoZIhvcNAQkDMQsGCSqGSIb3DQEHATAc&#13;&#10;BgkqhkiG9w0BCQUxDxcNMDQwMjIyMTc0ODMxWjAjBgkqhkiG9w0BCQQxFgQUExK4&#13;&#10;Gb9p5/1XpEAcq/hBYlGfXnMwDQYJKoZIhvcNAQEBBQAEgYBnTS7EAiFh/sXRCyXb&#13;&#10;u/4HcURSIA1axvZ79erIy5WFIkPqxV4jY1waDGo7KNbcA2RZiEf8xu12f5GBA27I&#13;&#10;IIe4SzcGs6wej+MxqjkITfUbfzF6/vtEYSHc0yYc7dEWq8RD+1PphfUaPXGpq1Kg&#13;&#10;c5OYkTeowPsB0lQYK+vnqsCBaQ==&#13;&#10;-----END PKCS7-----&#13;&#10;"/>';
  sLine += '<input type="hidden" name="cmd" value="_s-xclick"/>';
  sLine += '</form></td></tr></table>';
  sLine += '</td></tr></table>';
  document.write(sLine);
}

function WriteGoogleTopAd() 
{
  var sLine = '';
  sLine  = '<script type="text/javascript">';
  sLine += '/* .Net Wide 2 - 728x90 */';
  sLine += 'google_ad_client = "pub-7550912394621664";';
  sLine += 'google_ad_slot = "7336787344";';
  sLine += 'google_ad_height = "90";';
  sLine += 'google_ad_width = "728";';
  sLine += '</script>';
  sLine += '<script type="text/javascript" src="http://pagead2.googlesyndication.com/pagead/show_ads.js"></script>';
  document.write(sLine);
}

function WriteFBDiggDelicousShare() 
{
  var sLine = '';
  var url = location.href.toLowerCase();
  sLine += '<a title="Share on Facebook" name="fb_share" type="button" share_url="' + url + '" href="http://www.facebook.com/sharer.php">Share</a>';
  sLine += '<script src="http://static.ak.fbcdn.net/connect.php/js/FB.Share" type="text/javascript"></script>';
  sLine += '<script type="text/javascript">digg_url = "' + url + '";'
  sLine += 'digg_skin = "compact";';
  sLine += 'digg_window = "new";';
  sLine += '</script>';
  sLine += '<script src="http://digg.com/tools/diggthis.js" type="text/javascript"></script><br/><br/>';
  sLine += '<span title="Bookmark on Delicious"><img src="../images/delicious.small.gif" height="10" width="10" alt="Bookmark on Delicious"/></span>&nbsp;';
  sLine += '<a href="http://delicious.com/save" style="text-decoration: none;" onclick="window.open(\'http://delicious.com/save?v=5&noui&jump=close&url="+encodeURIComponent(location.href)+"&title="+encodeURIComponent(document.title), "delicious","toolbar=no,width=550,height=550"); return false;"><font size="1">Bookmark on Delicious</font></a><br/><br/>';

  document.write(sLine);
}