function secemail(lclass,user,host,cuser,chost,sbj,mbody,tag){
    eml= "<A ";
    if (lclass!=="") eml=eml + "class=" + lclass + " ";
    eml = eml + "href=mailto:" + user +"@" + host;
    if ((cuser!=="")||(sbj!=="")) eml=eml + "?";
    if (cuser!=="") eml=eml + "CC=" + cuser + "@" + chost;
    if ((cuser!=="")&&(sbj!=="")) eml=eml + "&";
    if (sbj!=="") eml=eml + "Subject=" + sbj;
    if (mbody!=="") eml=eml + "&body=" + mbody;
    eml=eml + ">";
    (tag=="")? eml=eml + user +"@" + host: eml=eml + " " + tag;
    eml=eml + "</A>";
    document.write(eml);
}