- 中国开源CMS第一品牌 [原创]实现风讯批量添加txt文件到投稿数据表

长白山人 - 2006-8-23 15:38:00

思路：
1.用扫描仪和ocr软件把书籍和杂志转换成txt文本文件。文本文件名就是标题，文本目录就是上传的栏目号。
2.建一个js文件，代码如下。上传到网站数据库目录。
3.把扫描好的文本文件目录上传到数据库目录，执行js文件。数据就自动批量添加到数据库投稿表FS_Contribution 。
4.我把FS_Contribution 字段AddTime改成默认值Date() 字段Author也增加了默认值。
5.增加数据表Clss ,增加cateID cateName两个字段。
6.现我用风讯3.1已经实现批量添加，存在的问题FS_Contribution数据表ClassID不能按照txt文本目录添加。ContID字段也是不能按照投稿方式添加。
7.希望喜欢风讯的高人大家一起把这个功能完善。

/// www.jlcbm.info

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=D:\\Downloads\\FooSun_Data.mdb;Persist Security Info=False"; // 数据库链接位置

Init();
Main();

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 Clss where 1 = 0", conn, 1, 3);
    rs2.Open("select Title, SubTitle, ContID, Content, KeyWords, ClassID from FS_Contribution 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 cateName = parseInt(rs("cateName"));

        var files = GetFiles(cateFolders.item(), "[.]*[.]txt");
        COut("该目录下共有 " + files.length + " 个文件。开始保存", true);

        for (var i = 0; i < files.length; i++) {
            var f = fso.GetFile(files);
            var title = f.Name.replace(/([.]txt)/i, '');
            var content = ReadFile(f);

            rs2.AddNew();
            rs2("Title") = title;
            rs2("SubTitle") = title;
            rs2("KeyWords") = title;
            rs2("Content") = content;
            rs2("ClassID") = cateName;
            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;
}

[此贴子已经被作者于2006-8-23 21:03:33编辑过]

风讯官方论坛