您现在的位置是:网站首页> 编程资料编程资料

hta实现的笨狼XSLT练习器_hta_

2023-05-25 279人已围观

简介 hta实现的笨狼XSLT练习器_hta_




笨狼XSLT练习器 _




 XML 
 XSL  
开始转换
预览结果



 
window.resizeTo(window.screen.availWidth,window.screen.availHeight);
window.moveTo(0,0); 
blockXML.style.width = parseInt(window.screen.availWidth * 0.46);
blockXSL.style.width = blockXML.style.width ;

blockXSL.style.left =    parseInt(window.screen.availWidth * 0.46) + 30;

showMe.style.width = parseInt(window.screen.availWidth * 0.92)+ 10;

   var fso 
   fso = new ActiveXObject("Scripting.FileSystemObject");



var xmldoc, xsldoc;
xmldoc = new ActiveXObject("MSXML2.DOMDocument");
xsldoc = new ActiveXObject("MSXML2.DOMDocument");
xmldoc.async = false;
xsldoc.async = false;

 function browse()
 {
    var win=window.open();
    win.document.write(showMe.value); 
 }

function showXML()
{//在文本框内加载XML
    if(Validator(fileXML.value,"XML"))
    {        
        if(fso.FileExists(fileXML.value))
        {
            var f = fso.GetFile(fileXML.value);
            var ts = f.OpenAsTextStream(1, -2);
            var s="";
            if(!ts.AtEndOfStream)
            {
                s = ts.ReadAll();
            }
            ts.Close();            
            blockXML.value = s;
            fileXML.value ="";            
        }
    }
    else
    {
        alert("XML格式错误!");
    }
}

function showXSL()
{//在文本框内加载XSL
    if(Validator(fileXSL.value,"XSL") || Validator(fileXSL.value,"XSLT"))
    {
        if(fso.FileExists(fileXSL.value))
        {
            var f = fso.GetFile(fileXSL.value);
            var ts = f.OpenAsTextStream(1, -2);
            var s="";
            if(!ts.AtEndOfStream)
            {
                s = ts.ReadAll();
            }
            ts.Close();
            blockXSL.value = s;    
            fileXSL.value ="";
        }
    }
        else
    {
        alert("XSL/XSLT格式错误!");
    }
}

function Validator(inStr,outStr)
{//检查文件格式
    var last=inStr.match(/^(.*)(\.)(.{1,8})$/)[3];           
    last=last.toUpperCase();
    if(last==outStr)
    {    
        return true;
    }
    else
    {        
        return false;
        }

}    



function parseXML()
{//解析
    if(!blockXML.value ||!blockXSL.value)
    {
    return
    }    

        if(!xmldoc.loadXML(blockXML.value))
        {
            alert("XML未加载成功!")
        }

        if(!xsldoc.loadXML(blockXSL.value))
        {
            alert("XSL未加载成功!")
        }

    var s = xmldoc.transformNode(xsldoc);
    showMe.value = s;

}






笨狼XSLT练习器.hta

-六神源码网