前几天偶然去 CSDN 逛了一下,发现有人整理了 CSDN 论坛问题的 FAQ 提供下载 (
http://community.csdn.net/Expert/topic/4191/4191119.xml?temp=.86224),于是下载了一份。但是发现其中是按照分类目录保存的文本文件形式。问了方便使用,我用 js 写了一个简单的脚本将这些内容分类别存入了 Access 数据库。以下代码保存为 AddFAQ.js :
放在分类的目录下,双击即可执行,或者在命令行下面执行 cscript ADDFAQ.js, 在命令行下的好处是可以把输出看的清楚一点。
这个代码中使用的一些函数是从前几天学习的一个去除 .net 项目 vss 信息的脚本中的,来自 CodeProject,因此本人版权的没有。可见脚本写的好了也可以达到很高的代码复用性
命令行下输出信息如下:
用了好几分钟才执行完毕。最终产生的 Access 数据库有 77MB 大。感觉速度有点慢,不过用脚本做一些像这种自己使用的日常功能还是很方便的。
//
/ Global ----------------------------------------------------
var consoleOnly = true ;
var defaultTimeout = 1 ;
var WSShell;
var fso;
var currentFolder;
var ForReading = 1 , ForWriting = 2 , ForAppending = 8 ;
var CharSetDefault = - 2 , CharSetUnicode = - 1 , CharSetAscii = 0 ;
var AttrNormal = 0 , AttrReadOnly = 1 , AttrHidden = 2 , AttrSystem = 4 ,
AttrVolume = 8 , AttrDirectory = 16 , AttrArchive = 32 , AttrAlias = 1024 ,
AttrCompressed = 2048 ;
var strConn = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E://CSDN_FAQ.mdb;Persist Security Info=False " ;
Init();
Main();
function Init() {
// detect command line
try {
WScript.StdOut.WriteLine( " " );
} catch (e) {
consoleOnly = false ;
}
// initialize
WSShell = new ActiveXObject( " WScript.Shell " );
fso = new ActiveXObject( " Scripting.FileSystemObject " );
currentFolder = GetCurrentFolder();
}
function Main() {
var text;
// say hello
text = " 开始保存信息. " ;
Out(text, true );
COut( " 当前工作目录: /r/n " + currentFolder);
var conn = new ActiveXObject( " ADODB.Connection " );
conn.Open(strConn);
var rs = new ActiveXObject( " ADODB.RecordSet " );
var rs2 = new ActiveXObject( " ADODB.RecordSet " );
rs.Open( " select cateID, cateName from Category where 1 = 0 " , conn, 1 , 3 );
rs2.Open( " select faqTitle, faqContent, cateID from FAQ where 1 = 0 " , conn, 1 , 3 );
var cateFolders = new Enumerator(currentFolder.SubFolders);
var treatedFiles = 0 ;
for (; ! cateFolders.atEnd(); cateFolders.moveNext()) {
COut( " 分类目录名: " + cateFolders.item().Name);
rs.AddNew();
rs( " cateName " ) = cateFolders.item().Name;
rs.Update();
var cateID = parseInt(rs( " cateId " ));
var files = GetFiles(cateFolders.item(), " [.]*[.]txt " );
COut( " 该目录下共有 " + files.length + " 个文件。开始保存 " , true );
for ( var i = 0 ; i < files.length; i ++ ) {
var f = fso.GetFile(files[i]);
var title = f.Name.replace( / ([.]txt) / i, '');
var content = ReadFile(f);
rs2.AddNew();
rs2( " faqTitle " ) = title;
rs2( " faqContent " ) = content;
rs2( " cateID " ) = cateID;
rs2.Update();
treatedFiles ++ ;
}
COut( " 保存完毕。 " , true );
}
rs.Close();
rs2.Close();
conn.Close();
// say goodbye
text = " 已成功插入数据。/r/n/r/n "
+ " 处理的文件数目:/t " + treatedFiles + " /r/n "
Out(text, false );
}
// / Files ------------------------------------------------------
// getcurrent folder
function GetCurrentFolder() {
return fso.GetFolder(fso.GetFile(WScript.ScriptFullName).ParentFolder);
}
// / Output ------------------------------------------------------
// output
function Out(text, useTimeout) {
if (useTimeout) {
useTimeout = defaultTimeout;
} else {
useTimeout = - 1 ;
}
if (consoleOnly) {
WScript.StdOut.WriteLine(text);
} else {
WSShell.Popup(text, useTimeout, " 添加信息到 Access 数据库 " );
}
}
// output
function COut(text, useTimeout) {
if (useTimeout) {
useTimeout = defaultTimeout;
} else {
useTimeout = - 1 ;
}
if (consoleOnly) {
WScript.StdOut.WriteLine(text);
}
}
function ReadFile(file) {
var stream = file.OpenAsTextStream(ForReading, CharSetDefault);
text = stream.ReadAll();
stream.Close();
return text;
}
function WriteFile(file, text) {
var ro = ((file.Attributes & AttrReadOnly) != 0 );
if (ro) file.Attributes -= AttrReadOnly;
var stream = file.OpenAsTextStream(ForWriting, CharSetDefault);
stream.Write(text);
stream.Close();
if (ro) file.Attributes += AttrReadOnly;
}
// determine, if filename matches given mask
function MatchesMask(file, mask) {
return new RegExp(mask).test(file);
}
// find files
function FindFiles(mask) {
return GetFiles(currentFolder, mask);
}
// get files in current folder & subfolders
function GetFiles(folder, mask) {
var result = new Array();
// do files in current folder
var files = new Enumerator(folder.Files);
for (; ! files.atEnd(); files.moveNext()) {
if (MatchesMask(files.item(), mask)) {
result.push( "" + files.item());
}
}
// do subfolders in current folder
var folders = new Enumerator(folder.SubFolders);
for (; ! folders.atEnd(); folders.moveNext()) {
result = result.concat(GetFiles(folders.item(), mask));
}
return result;
}
var consoleOnly = true ;
var defaultTimeout = 1 ;
var WSShell;
var fso;
var currentFolder;
var ForReading = 1 , ForWriting = 2 , ForAppending = 8 ;
var CharSetDefault = - 2 , CharSetUnicode = - 1 , CharSetAscii = 0 ;
var AttrNormal = 0 , AttrReadOnly = 1 , AttrHidden = 2 , AttrSystem = 4 ,
AttrVolume = 8 , AttrDirectory = 16 , AttrArchive = 32 , AttrAlias = 1024 ,
AttrCompressed = 2048 ;
var strConn = " Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E://CSDN_FAQ.mdb;Persist Security Info=False " ;
Init();
Main();
function Init() {
// detect command line
try {
WScript.StdOut.WriteLine( " " );
} catch (e) {
consoleOnly = false ;
}
// initialize
WSShell = new ActiveXObject( " WScript.Shell " );
fso = new ActiveXObject( " Scripting.FileSystemObject " );
currentFolder = GetCurrentFolder();
}
function Main() {
var text;
// say hello
text = " 开始保存信息. " ;
Out(text, true );
COut( " 当前工作目录: /r/n " + currentFolder);
var conn = new ActiveXObject( " ADODB.Connection " );
conn.Open(strConn);
var rs = new ActiveXObject( " ADODB.RecordSet " );
var rs2 = new ActiveXObject( " ADODB.RecordSet " );
rs.Open( " select cateID, cateName from Category where 1 = 0 " , conn, 1 , 3 );
rs2.Open( " select faqTitle, faqContent, cateID from FAQ where 1 = 0 " , conn, 1 , 3 );
var cateFolders = new Enumerator(currentFolder.SubFolders);
var treatedFiles = 0 ;
for (; ! cateFolders.atEnd(); cateFolders.moveNext()) {
COut( " 分类目录名: " + cateFolders.item().Name);
rs.AddNew();
rs( " cateName " ) = cateFolders.item().Name;
rs.Update();
var cateID = parseInt(rs( " cateId " ));
var files = GetFiles(cateFolders.item(), " [.]*[.]txt " );
COut( " 该目录下共有 " + files.length + " 个文件。开始保存 " , true );
for ( var i = 0 ; i < files.length; i ++ ) {
var f = fso.GetFile(files[i]);
var title = f.Name.replace( / ([.]txt) / i, '');
var content = ReadFile(f);
rs2.AddNew();
rs2( " faqTitle " ) = title;
rs2( " faqContent " ) = content;
rs2( " cateID " ) = cateID;
rs2.Update();
treatedFiles ++ ;
}
COut( " 保存完毕。 " , true );
}
rs.Close();
rs2.Close();
conn.Close();
// say goodbye
text = " 已成功插入数据。/r/n/r/n "
+ " 处理的文件数目:/t " + treatedFiles + " /r/n "
Out(text, false );
}
// / Files ------------------------------------------------------
// getcurrent folder
function GetCurrentFolder() {
return fso.GetFolder(fso.GetFile(WScript.ScriptFullName).ParentFolder);
}
// / Output ------------------------------------------------------
// output
function Out(text, useTimeout) {
if (useTimeout) {
useTimeout = defaultTimeout;
} else {
useTimeout = - 1 ;
}
if (consoleOnly) {
WScript.StdOut.WriteLine(text);
} else {
WSShell.Popup(text, useTimeout, " 添加信息到 Access 数据库 " );
}
}
// output
function COut(text, useTimeout) {
if (useTimeout) {
useTimeout = defaultTimeout;
} else {
useTimeout = - 1 ;
}
if (consoleOnly) {
WScript.StdOut.WriteLine(text);
}
}
function ReadFile(file) {
var stream = file.OpenAsTextStream(ForReading, CharSetDefault);
text = stream.ReadAll();
stream.Close();
return text;
}
function WriteFile(file, text) {
var ro = ((file.Attributes & AttrReadOnly) != 0 );
if (ro) file.Attributes -= AttrReadOnly;
var stream = file.OpenAsTextStream(ForWriting, CharSetDefault);
stream.Write(text);
stream.Close();
if (ro) file.Attributes += AttrReadOnly;
}
// determine, if filename matches given mask
function MatchesMask(file, mask) {
return new RegExp(mask).test(file);
}
// find files
function FindFiles(mask) {
return GetFiles(currentFolder, mask);
}
// get files in current folder & subfolders
function GetFiles(folder, mask) {
var result = new Array();
// do files in current folder
var files = new Enumerator(folder.Files);
for (; ! files.atEnd(); files.moveNext()) {
if (MatchesMask(files.item(), mask)) {
result.push( "" + files.item());
}
}
// do subfolders in current folder
var folders = new Enumerator(folder.SubFolders);
for (; ! folders.atEnd(); folders.moveNext()) {
result = result.concat(GetFiles(folders.item(), mask));
}
return result;
}
放在分类的目录下,双击即可执行,或者在命令行下面执行 cscript ADDFAQ.js, 在命令行下的好处是可以把输出看的清楚一点。
这个代码中使用的一些函数是从前几天学习的一个去除 .net 项目 vss 信息的脚本中的,来自 CodeProject,因此本人版权的没有。可见脚本写的好了也可以达到很高的代码复用性
命令行下输出信息如下:
D:/Downloads/CSDN_FAQ
>
cscript addfaq.js
Microsoft (R) Windows Script Host Version 5.6
版权所有(C) Microsoft Corporation 1996 - 2001 。保留所有权利。
开始保存信息.
当前工作目录:
D:/Downloads/CSDN_FAQ
分类目录名:delphi
该目录下共有 1484 个文件。开始保存
保存完毕。
分类目录名:dotnet
该目录下共有 795 个文件。开始保存
保存完毕。
分类目录名:java
该目录下共有 1851 个文件。开始保存
保存完毕。
分类目录名:sqlserver
该目录下共有 2191 个文件。开始保存
保存完毕。
分类目录名:vb
该目录下共有 764 个文件。开始保存
保存完毕。
分类目录名:vcmfc
该目录下共有 1564 个文件。开始保存
保存完毕。
分类目录名:web
该目录下共有 2930 个文件。开始保存
保存完毕。
分类目录名:windows专区
该目录下共有 1635 个文件。开始保存
保存完毕。
分类目录名:硬件使用
该目录下共有 139 个文件。开始保存
保存完毕。
分类目录名:软件工程
该目录下共有 239 个文件。开始保存
保存完毕。
已成功插入数据。
处理的文件数目: 13592
Microsoft (R) Windows Script Host Version 5.6
版权所有(C) Microsoft Corporation 1996 - 2001 。保留所有权利。
开始保存信息.
当前工作目录:
D:/Downloads/CSDN_FAQ
分类目录名:delphi
该目录下共有 1484 个文件。开始保存
保存完毕。
分类目录名:dotnet
该目录下共有 795 个文件。开始保存
保存完毕。
分类目录名:java
该目录下共有 1851 个文件。开始保存
保存完毕。
分类目录名:sqlserver
该目录下共有 2191 个文件。开始保存
保存完毕。
分类目录名:vb
该目录下共有 764 个文件。开始保存
保存完毕。
分类目录名:vcmfc
该目录下共有 1564 个文件。开始保存
保存完毕。
分类目录名:web
该目录下共有 2930 个文件。开始保存
保存完毕。
分类目录名:windows专区
该目录下共有 1635 个文件。开始保存
保存完毕。
分类目录名:硬件使用
该目录下共有 139 个文件。开始保存
保存完毕。
分类目录名:软件工程
该目录下共有 239 个文件。开始保存
保存完毕。
已成功插入数据。
处理的文件数目: 13592
用了好几分钟才执行完毕。最终产生的 Access 数据库有 77MB 大。感觉速度有点慢,不过用脚本做一些像这种自己使用的日常功能还是很方便的。