// -----------------------------------------------------------------------------
// File:     email.js
// Version:  1.1
// Author:   David Houck, www.ImpelSolutions.com
// Written:  01/20/2002
// Changed:  02/09/2002
// Copyright (C) 2002 Impel Solutions Corporation. All Rights Reserved.
// -----------------------------------------------------------------------------

// Declare variables

  var strDomain = "edgetechusa.com";

// -----------------------------------------------------------------------------
// Purpose: Writes the specified e-mail address
// Input:   Link Text (String)
//          Address (String)
//          CC (String)
//          BCC (String)
//          Subject (String)
//          Body (String)
// Output:  None
// Author:  David Houck
// Written: 01/20/2002
// Changed: 02/09/2002
// -----------------------------------------------------------------------------
function EmailWrite(strLinkText, strTO, strCC, strBCC, strSubject, strBody)
{
  var strEmail = "mailto:" + strTO + "&#64;" + strDomain;
  var strTitle = strTO + "&#64;" + strDomain;
  if (strCC != "")
  {
    strEmail += "?cc=" + strCC;
  }
  if (strBCC != "")
  {
    strEmail += "?bcc=" + strBCC;
  }
  if (strSubject != "")
  {
    strEmail += "?subject=" + escape(strSubject);
  }
  if (strBody != "")
  {
    strEmail += "?body=" + escape(strBody);
  }
  if (strLinkText == "")
  {
    strLink = "Link Text";
  }
  else
  {
    strLink = strLinkText + "&#64;" + strDomain;
  }
  var strURL =
    "<A CLASS='NavText' HREF=" + strEmail + " TITLE=" + strTitle + ">" + strLink + "</A>";
  document.write(strURL);
}
