JS版文本分割器

broly

1. /*
   
2. *        JS版文本分割器 @BY Broly
   
3. *        Broly's Blog:www.dreamlikes.net
   
4. *        From bbs.bathome.net
   
5. *
   
6. *        简要说明：
   
7. *                我已经将分割文本的函数做了封装，
   
8. *                只要简单初始化就可以进行分割。
   
9. *
   
10. *        已知缺点：
    
11. *                1.只支持GBK,Unicode,UFT8三种编码，
    
12. *                        其他编码处理后可能出现乱码。
    
13. *                        因为其他编码格式不常用，我就
    
14. *                        没有进行处理了。
    
15. *                2.虽然说可以按照处理后的数量或者
    
16. *                        大小分割，实际只能够精确处理
    
17. *                        Unicode编码的文本。这个是不得
    
18. *                        已的做法，因为以我的能力，只
    
19. *                        有这样才不会出现乱码。
    
20. *
    
21. *        封装的对象：Spliter(filepath,savepath)
    
22. *                filepath: 要分割的目标文本
    
23. *                savepath: 存储文件的目录
    
24. *        属性：       
    
25. *                filepath: 要分割的目标文本
    
26. *                savepath: 存储文件的目录
    
27. *       
    
28. *        方法：
    
29. *                checkEncoding(filepath): 检测文本编码
    
30. *                          filepath: 要分割的目标文本
    
31. *                splitOnSize(size): 按大小进行分割
    
32. *                         size：分割的大小，单位KB
    
33. *                splitOnCount(): 按照数量分割
    
34. *                         count：分割的份数,正整数
    
35. *
    
36. */
    
37. 
    
38. 
    
39. /*##############分####隔####线###################*/
    
40. function Spliter(_filepath,_savepath)
    
41. {               
    
42.         //内部函数：出错提示
    
43.         function msgError(msg)
    
44.         {
    
45.                 WScript.Echo(msg);
    
46.                 WScript.Quit();
    
47.         }
    
48. 
    
49.         //定义判断文件编码的方法
    
50.         function _checkEncoding(filepath)
    
51.         {
    
52.                 //定义变量以存储文件BOM
    
53.                 var bom,encoding;
    
54.                 //初始化Adodb.Stream对象
    
55.                 var objStream = new ActiveXObject("Adodb.Stream");
    
56.                 with(objStream)
    
57.                 {
    
58.                         type = 2;
    
59.                         mode = 3;
    
60.                         charset = "437";
    
61.                         open();
    
62.                         loadFromFile(filepath);
    
63.                         bom = readtext(2);
    
64.                         close();
    
65.                 }
    
66.                 //用escape()函数返回字符十六进制
    
67.                 switch(escape(bom))
    
68.                 {
    
69.                         // FF FE
    
70.                         case '%A0%u25A0':
    
71.                                 encoding = 'Unicode';
    
72.                                 break;
    
73.                        
    
74.                         // EF BB
    
75.                         case '%u2229%u2557':
    
76.                                 encoding = 'UTF-8';
    
77.                                 break;
    
78.                        
    
79.                         //默认是GBK，如果都不是这三种编码处理后有可能出现乱码
    
80.                         default:
    
81.                                 encoding = 'GBK';
    
82.                                 break;
    
83.                 }
    
84.                 //释放内存
    
85.                 objStream = null;
    
86.                
    
87.                 //返回编码类型
    
88.                 return encoding;
    
89.         }
    
90.        
    
91.         //获取文件信息函数，在内部使用
    
92.         function getFileSize(filepath,savepath)
    
93.         {
    
94.                 var fso = new ActiveXObject("Scripting.FileSystemObject");
    
95.                
    
96.                 try
    
97.                 {
    
98.                         if(!fso.FileExists(filepath))
    
99.                         {
    
100.                                 throw "源文件不存在";
     
101.                         }
     
102.                        
     
103.                         var filesize = fso.GetFile(filepath).Size;
     
104.                
     
105.                         if(filesize == 0)
     
106.                         {
     
107.                                 throw "文件为空或者不存在";
     
108.                         }
     
109.                        
     
110.                         if(!fso.FolderExists(savepath))
     
111.                         {
     
112.                                 throw "存储目录不存在";
     
113.                         }
     
114.                
     
115.                 }
     
116.                 catch(ex)
     
117.                 {
     
118.                         msgError(ex);
     
119.                 }
     
120.                
     
121.                 //释放内存
     
122.                 fso = null;
     
123.                
     
124.                 return filesize;
     
125.         }
     
126.        
     
127.        
     
128.         //内部使用，分割文件
     
129.         function splitFile(filepath,savepath,singlesize,srCharset)
     
130.         {
     
131.                 var objStream = new ActiveXObject("Adodb.Stream");
     
132.                 var arr = new Array();
     
133.                 objStream.Mode = 3;
     
134.                 var i = 0;
     
135.                           
     
136.                 with(objStream)
     
137.             {
     
138.                     if(srCharset!='Unicode')
     
139.                     {
     
140.                                 type = 2;
     
141.                         charset = srCharset;
     
142.                         open();
     
143.                         loadFromFile(filepath);
     
144.                         strText = readtext();
     
145.                         close();
     
146.                         charset = 'Unicode';
     
147.                         open();
     
148.                         writetext(strText);
     
149.                         position = 0;
     
150.                         type = 1;
     
151.                 } else {
     
152.                         type = 1;
     
153.                         open();
     
154.                         loadFromFile(filepath);
     
155.                 }
     
156.                 
     
157.                 arr[0] = read(2);
     
158.                 while(!EOS){arr[++i] = read(singlesize);}
     
159.                      close();
     
160.                      type = 2;
     
161.                           charset = srCharset;
     
162.              }
     
163.              
     
164.              for(i = 1 ; i<arr.length ; i++)
     
165.              {
     
166.                        with(objStream)
     
167.                           {
     
168.                              open();
     
169.                               writetext(arr[i]);
     
170.                                saveToFile(savepath + '\\book' + i + '.txt',2);
     
171.                              close();
     
172.                        }
     
173.              }
     
174.             
     
175.             //释放内存
     
176.             delete arr;
     
177.             objStream = null;
     
178.         }
     
179.        
     
180.         //定义按照大小分割的方法,单位KB
     
181.         function _splitOnSize(size)
     
182.         {
     
183.                 getFileSize(this.filepath,this.savepath);
     
184.                 //获取比较大的单文件字节
     
185.                 var size1 = size*1024;
     
186.                 var size2 = Math.round(size1);
     
187.                 var singlesize = size2>=size1 ? size2 : size2+1;
     
188.                 if(singlesize%2 !=0 ) {singlesize+=1;}
     
189.                 splitFile(this.filepath,
     
190.                                   this.savepath,
     
191.                                   singlesize,
     
192.                                   _checkEncoding(this.filepath)
     
193.                                   );
     
194.         }
     
195.        
     
196.         //定义按照数量分割的方法
     
197.         function _splitOnCount(count)
     
198.         {
     
199.                 var filesize = getFileSize(this.filepath,this.savepath);
     
200.                 //获取比较大的单文件字节
     
201.                 var size1 = filesize/count;
     
202.                 var size2 = Math.round(size1);
     
203.                 var singlesize = size2>=size1 ? size2 : size2+1;
     
204.                 if(singlesize%2 !=0 ) {singlesize+=1;}
     
205.                 splitFile(this.filepath,
     
206.                                   this.savepath,
     
207.                                   singlesize,
     
208.                                   _checkEncoding(this.filepath)
     
209.                                   );
     
210.         }
     
211.        
     
212.         //定义属性
     
213.         this.filepath = _filepath;
     
214.         this.savepath = _savepath;
     
215.        
     
216.         //定义方法
     
217.         this.checkEncoding = _checkEncoding;
     
218.         this.splitOnSize = _splitOnSize;
     
219.         this.splitOnCount = _splitOnCount;
     
220.        
     
221. }
     
222. 
     
223. /*##############分####隔####线###################*/
     
224. 
     
225. //例子：
     
226. var objSpliter = new Spliter('d:\\诛仙.txt','d:\\诛仙');
     
227. 
     
228. objSpliter.splitOnCount(3);
     
229. objSpliter = null;
     
230. 
     
231. WScript.Echo('Succeed.');
     

复制代码

pinke8

看功能貌似比较简单，但代码有些复杂，看看探先