function wsa_include_js() {
    var js = document.createElement('script');
    js.setAttribute('language', 'javascript');
    js.setAttribute('type', 'text/javascript');
    js.setAttribute('src', 'http://www.websitealive6.com/4322/Visitor/vTracker_v2.asp?websiteid=421&groupid=4322');
    document.getElementsByTagName('head').item(0).appendChild(js);
}
window.onload = wsa_include_js;

function Trim(cadena) {
    for (i = 0; i < cadena.length; ) {
        if (cadena.charAt(i) == " ")
            cadena = cadena.substring(i + 1, cadena.length);
        else
            break;
    }
    for (i = cadena.length - 1; i >= 0; i = cadena.length - 1) {
        if (cadena.charAt(i) == " ")
            cadena = cadena.substring(0, i);
        else
            break;
    }
    return cadena;
}
function ValidaEmail(cadena) {
    if (cadena.length < 5 || cadena.indexOf("@", 0) < 2 || cadena.indexOf("@", 0) == cadena.length - 1)
        return true;
    else
        return false;
}
function ValidateForm() {
    document.forms[0].txtFullName.value = Trim(document.forms[0].txtFullName.value)
    document.forms[0].txtEmail.value = Trim(document.forms[0].txtEmail.value)
    if (document.forms[0].txtFullName.value == "") {
        document.forms[0].txtFullName.focus();
        alert('Please enter your name');
        return false;
    }
    if (ValidaEmail(document.forms[0].txtEmail.value)) {
        document.forms[0].txtEmail.focus();
        alert('Please enter a valid email address');
        return false;
    }
    return true;
}
function OpenChat() {
    window.open('http://www.websitealive6.com/4322/rRouter.asp?groupid=4322&websiteid=421&departmentid=0&dl=' + escape(document.location.href), '', 'width=450,height=400'); 
}