㈠ 编写一段小程序,可以读入一个英文的文本文件,显示这个文件,并统计这个文件有多少个字符,多少个单词,
在D盘建立一个delVB.txt的文本
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<meta name="robots" content="all" />
<meta name="author" content="" />
<meta name="Copyright" content="" />
<meta name="keywords" content="" />
<meta name="description" content="JS限制textarea输入框输入字数" />
<title>JS限制textarea输入框输入字数</title>
<SCRIPT language="javascript">
function ReadNote(){
var fso=new ActiveXObject("Scripting.FileSystemObject");
var filepath="d:/delVB.txt";
var file = fso.GetFile(filepath);
var ts = file.OpenAsTextStream(1,-2);
//var mynote = ts.ReadLine(); 读取一行
var mynote=ts.ReadAll(); //读取全部
ts.Close();
txtNumber(mynote);
}
function txtNumber(str){
var totalCount = 0;
for (var i=0; i<str.length; i++) {
var c = str.charCodeAt(i);
if ((c >= 0x0001 && c <= 0x007e) || (0xff60<=c && c<=0xff9f)) {
totalCount++; //数字或英文+1
}else {
totalCount+=2; //汉字+2
}
}
alert(totalCount/2);
return false;
}
</script>
<input type="button" onclick="ReadNote()" value="test">
</body>
</html>