// JScript File

    function GetTagValue(result,tagname) {
        var retval=result;
        starttag="<" + tagname.toUpperCase() + ">";
        endtag="</" + tagname.toUpperCase() + ">";
        var pos=retval.lastIndexOf(starttag);
        if (pos<0) {
            alert("Cannot find start tag " + starttag + " in " + retval);
            return "Cannot find start tag " + starttag + " in " + retval;
        }
        
        retval=retval.slice(pos+starttag.length,result.length);
        
        pos=retval.lastIndexOf(endtag);               
        if (pos<0) {
            return "Cannot find end tag " + endtag + " in " + retval;
        }
        retval=retval.slice(0,pos);
        return retval;
    }
    
    function ContainsTag(result,tagname) {
        var retval=result;
        starttag="<" + tagname.toUpperCase() + ">";
        endtag="</" + tagname.toUpperCase() + ">";
        var pos=retval.lastIndexOf(starttag);        
        
        if (pos<0) {
            return false;
        }
        
        retval=retval.slice(pos+starttag.length,result.length);
        
        pos=retval.lastIndexOf(endtag);               
        if (pos<0) {
            return false;
        }
        retval=retval.slice(0,pos);
        return true;
    }
    
    function BuildTag(tagname,avalue) {
        return "<"+tagname+">"+avalue+"</"+tagname+">";
    }