hta实现的笨狼XSLT练习器

所属分类: 脚本专栏 / hta 阅读数: 1911
收藏 0 赞 0 分享

<HTML>
<HEAD>
<TITLE>笨狼XSLT练习器 _脚本之家</TITLE>
<style>
body 
{
    font-size:12;
    BACKGROUND: #DADADA;
    margin-left:20;
}

#blockXML
{

    font-family:Verdana;
    font-size:12px;    
    overflow:scroll;
    height:400;
    top:40;
    left:20;

}
input
{
    width:350;
}
#blockXSL
{
    POSITION: absolute;
    font-family:Verdana;
    font-size:12px;    
    overflow:scroll;
    height:400;
    top:40;    
}    
#showMe
{    
    font-family:Verdana;
    font-size:12px;    
    height:100;
    overflow:visible;
    top:300;
    left:20;
}    

</style>
</HEAD>

<BODY>
<INPUT type="file" id="fileXML" onchange = "showXML();"/>&nbsp;XML&nbsp;
<INPUT type="file" id="fileXSL" onchange = "showXSL();"/>&nbsp;XSL&nbsp;&nbsp;
<button  onclick = "parseXML();" >开始转换</button>
<button  onclick = "browse();" >预览结果</button>
<textArea id="blockXML"></textArea>
<textArea id="blockXSL"></textArea>
<textArea id="showMe" ></textArea>
<SCRIPT LANGUAGE="JavaScript"> 
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;

}



</SCRIPT>
</BODY>
</HTML>
笨狼XSLT练习器.hta
更多精彩内容其他人还在看

适用于hta的Sleep函数

找到一个适用于 hta 的 Sleep 函数
收藏 0 赞 0 分享

hta 定时关机重启实现代码

一个用于定时重启或关闭计算机的小工具,适用于Windows 2K/XP/2003
收藏 0 赞 0 分享

从 HTA 中启动应用程序

如何从 HTA 中启动应用程序
收藏 0 赞 0 分享

ASP 辅助工具(hta版)

当我们使用asp的一些字段获取功能的时候,这个功能就非常有用了。
收藏 0 赞 0 分享

hta编写的软件管理工具0.1(IE7.0测试通过)

程序初始化是建立与本文件同名后缀为mdb的数据库
收藏 0 赞 0 分享

exe转换16进制的html保存的hta实现代码

用下面这个hta文件来转exe变成16进制的html保存了。这样也会方便一点。
收藏 0 赞 0 分享

VBS脚本的GUI界面 HTA简明教程(网络搜集整理)

HTA是HTML Application的缩写(HTML应用程序),是软件开发的新概念,直接将HTML保存成HTA的格式,就是一个独立的应用软件,双击就能运行,与VB、C++等程序语言所设计的软件没什么差别。
收藏 0 赞 0 分享

winXP下用VBS写的代码编辑器

利用VBS脚本+DHTML,主要功能由正则表达式+wmic来完成,代码需保存为HTA类型的文件,当然也可以更改为纯粹的VBS脚本,不过那样效率低多了,而且代码更复杂。
收藏 0 赞 0 分享

扣代码工具 hta版

需要用到 InternetExplorer.Application 对象,所以做成了HTA文件。代码如下:(不能直接运行,请下载附件运行其中的 “捕获者.hta”,或者将下面代码复制后保存到本地并以 hta 为扩展名)
收藏 0 赞 0 分享

用hta实现的桌面漂浮flash

用hta实现的桌面漂浮flash,效果不错,其实主要是javascript代码,大家把代码拷到网页中也一样用,ie only.
收藏 0 赞 0 分享
查看更多