js

                           

                           

                           

<!--

var rptfile,txtfile;

function getFile()

{

    rptfile = document.getElementById("picpath").value;

    if(/^[\s\t\n\r]*$/.test(rptfile)) return true;

    rptfile = rptfile.replace("\\","\\\\");

    txtfile = rptfile.replace(".htm",".txt");

}

function getLink()

{

    if(getFile()){alert("Please select a report file!"); return;};

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

    if(!fso.FileExists(rptfile)) alert("File not Exists!");

    var rfile = fso.OpenTextFile(rptfile,1);

    var TxtContent = rfile.ReadAll()//.split("\r\n");

    rfile.close();

    var link = new Array();

    while(true)

    {

        var m=TxtContent.indexOf("

        var n=TxtContent.indexOf("/a>");

        if(m==-1 || n==-1){break;}

        link.push(TxtContent.substring(m,n+3));

        TxtContent=TxtContent.substring(n+2,TxtContent.length);

    }

    var wfile = fso.CreateTextFile(txtfile,1);

    for(var i=0; i

    {

        wfile.WriteLine(i+"."+link[i]);

    }

    wfile.close();

    rfile = fso.OpentextFile(txtfile,1);

    TxtContent = rfile.ReadAll().split("\n\t");

    rfile.close();

    document.rptcnt.txtbox.value = TxtContent;

    alert("Report Count Finished!");

    txtpath.innerHTML = "Report Count Finished!";

}

function Process()

{

    var link = new Array();

    var name = new Array();

    txtfile = txtfile.replace("\\\\","\\");

document.rptcnt.txtbox.value = txtfile;

    var rfile = fso.OpentextFile(txtfile,1);

    var TxtContent = rfile.ReadAll();

    rfile.close();

//    var m = TxtContent.indexOf("href");

//    //if(m==-1) break;

//    TxtContent = TxtContent.substring(m,TxtContent.length);

//    var n = TxtContent.indexOf(" ");

//    var p = TxtContent.indexOf(">");

//    if(p

//    link.push(m,n);

    document.rptcnt.txtbox.value = TxtContent;

}

function view()

{

    var wsh = new ActiveXObject("WScript.Shell");

    wsh.Run("Notepad "+txtfile);

    var txtpath = txtfile.replace("\\\\","\\");

    txtpath.innerHTML = txtpath;

}

//--&gt

来自 “ ITPUB博客 ” ，链接：http://blog.itpub.net/24955184/viewspace-769142/，如需转载，请注明出处，否则将追究法律责任。

0

0

分享到：

上一篇： 驾考知识点

下一篇： link

请登录后发表评论 登录

全部评论

<%=items[i].createtime%>

<%=items[i].content%>

<%if(items[i].items.items.length) { %>

<%for(var j=0;j

<%=items[i].items.items[j].createtime%> 回复

<%=items[i].items.items[j].username%>   回复   <%=items[i].items.items[j].tousername%>： <%=items[i].items.items[j].content%>

<%}%> <%if(items[i].items.total > 5) { %>

还有<%=items[i].items.total-5%>条评论 ) data-count=1 data-flag=true>点击查看

<%}%>

<%}%>

<%}%>

mrhutoo

注册时间：2010-11-20

• 博文量
  27
• 访问量
  67072

最新文章

• Informix 4gl function
• Debug(r.d/fgldb) 时不能设置断点的问题
• Informix Procedure exmaple
• CRM客户关系管理
• 海尔集团CEO／张瑞敏 演讲语录
• 成为不可取代员工的6项策略
• 几个名词解释 TBB VPP KKK
• 有关BI商业智能
• 富兰克林培养好习惯的12项方法
• TIPTOP脚本的一些环境变量

转载于:http://blog.itpub.net/24955184/viewspace-769142/