<!--

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;

}

//-->

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

上一篇：驾考知识点

下一篇： link

请登录后发表评论登录

全部评论

ITPub博客

js

最新文章