ACCESS批量插入记录终极方法

一、使用TADOCommand，比直接使用TADOQuery执行insert语句快1倍，1k条记录插入大约只需用1s

    auto_ptr<TADOCommand> cmd(new TADOCommand(NULL));
    cmd->Connection = adoQry->Connection;

    cmd->Connection->BeginTrans();//cmd->Prepared配合使用，速度才能提高

    cmd->CommandText = "insert into BAS_Runview(TrainNo,"
        "station,sno,[day],ArrivalTime,StartTime,RunTime,RunDist,p1,p2,p3,p4)"
        " values(:no,:station,:sno,:day,:arrival,:start,:time,:dist,:p1,:p2,:p3,:p4)";
    cmd->Prepared = true;//很重要

    for(int j=0; j<recvRets.size(); ++j)
    {
        QueryBTrainViewResult& runViewRet = *recvRets[j];
        int size = runViewRet.items_size();
        for(int i=0; i<size; ++i)
        {
            const BTrainView& runView = runViewRet.items(i);

            Variant vDay;
            if(runView.has_day())
            {
                vDay = runView.day();
            }
            else
            {
                vDay = Null();
            }
            Variant vArrival;
            if(runView.has_timearrive())
            {
                vArrival = TimeZero2BJ(runView.timearrive());
            }
            else
            {
                vArrival = Null();
            }
            Variant vStart;
            if(runView.has_timestart())
            {
                vStart = TimeZero2BJ( runView.timestart() );
            }
            else
            {
                vStart = Null();
            }
            Variant vTime;
            if(runView.has_runperiod())
            {
                vTime = runView.runperiod().c_str();
            }
            else
            {
                vTime = Null();
            }
            Variant vDist;
            if(runView.has_rundist())
            {
                vDist = runView.rundist();
            }
            else
            {
                vDist = Null();
            }
            Variant vP1;
            if(runView.has_p1())
            {
                vP1 = runView.p1().c_str();
            }
            else
            {
                vP1 = Null();
            }
            Variant vP2;
            if(runView.has_p2())
            {
                vP2 = runView.p2().c_str();
            }
            else
            {
                vP2 = Null();
            }
            Variant vP3;
            if(runView.has_p3())
            {
                vP3 = runView.p3().c_str();
            }
            else
            {
                vP3 = Null();
            }
            Variant vP4;
            if(runView.has_p4())
            {
                vP4 = runView.p4().c_str();
            }
            else
            {
                vP4 = Null();
            }
            cmd->Parameters->ParamValues["no"]=runView.trainnum().c_str();
            cmd->Parameters->ParamValues["station"]=runView.station().c_str();
            cmd->Parameters->ParamValues["sno"]=runView.sno();
            cmd->Parameters->ParamValues["day"] = vDay;
            cmd->Parameters->ParamValues["arrival"] = vArrival;
            cmd->Parameters->ParamValues["start"] = vStart;
            cmd->Parameters->ParamValues["time"] = vTime;
            cmd->Parameters->ParamValues["dist"] = vDist;
            cmd->Parameters->ParamValues["p1"] = vP1;
            cmd->Parameters->ParamValues["p2"] = vP2;
            cmd->Parameters->ParamValues["p3"] = vP3;
            cmd->Parameters->ParamValues["p4"] = vP4;
            cmd->Execute();
        }
    }

    cmd->Connection->CommitTrans();

二、使用文本文件导入，此方法适用于几十甚至上百万条记录（70W条记录，大约10S完成）

    auto_ptr<TMemoryStream> ms(new TMemoryStream());

    //第一行表示字段名称，用逗号隔开

    AnsiString header = "TrainNo,station,sno,day,ArrivalTime,StartTime,RunTime,RunDist,p1,p2,p3,p4\r\n";
    ms->WriteBuffer(header.c_str(),header.Length());
    for(int j=0; j<recvRets.size(); ++j)
    {
        QueryBTrainViewResult& runViewRet = *recvRets[j];
        int size = runViewRet.items_size();
        for(int i=0; i<size; ++i)
        {
            const BTrainView& runView = runViewRet.items(i);
            AnsiString row = AnsiString(runView.trainnum().c_str()) + "," +
                AnsiString(runView.station().c_str()) + "," +
                IntToStr((int)runView.sno()) + ",";

            if(runView.has_day())
            {
                row += IntToStr((int)runView.day()) + ",";
            }
            else
            {
                row += "null,";
            }

            if(runView.has_timearrive())
            {
                row += TimeZero2BJ(runView.timearrive()).DateTimeString() + ",";
            }
            else
            {
                row += "null,";
            }

            if(runView.has_timestart())
            {
                row += TimeZero2BJ(runView.timestart()).DateTimeString() + ",";
            }
            else
            {
                row += "null,";
            }

            if(runView.has_runperiod())
            {
                row += runView.runperiod().c_str();
                row += ",";
            }
            else
            {
                row += "null,";
            }

            if(runView.has_rundist())
            {
                row += IntToStr((int)runView.rundist()) + ",";
            }
            else
            {
                row += "null,";
            }

            if(runView.has_p1())
            {
                row += runView.p1().c_str();
                row += ",";
            }
            else
            {
                row += "null,";
            }

            if(runView.has_p2())
            {
                row += runView.p2().c_str();
                row += ",";
            }
            else
            {
                row += "null,";
            }

            if(runView.has_p3())
            {
                row += runView.p3().c_str();
                row += ",";
            }
            else
            {
                row += ",";
            }

            if(runView.has_p4())
            {
                row += runView.p4().c_str();
            }
            row += "\r\n";
            ms->WriteBuffer(row.c_str(),row.Length());
        }
    }
    String appPath = ExtractFilePath(Application->ExeName);
    String txtFileName = "runview.txt";
    String txtFilePath = appPath + txtFileName;
    if(FileExists(txtFilePath))
    {
        DeleteFile(txtFilePath);
    }
    ms->SaveToFile(txtFilePath);//创建临时文本文件
    adoQry->ParamCheck = false;

    //如果插入到新表中(如果表已经存在需要先删除表)，使用如下sql语句：SELECT * INTO [BAS_Runview] FROM...

    adoQry->SQL->Text = "INSERT INTO [BAS_Runview] select * FROM "
        "[Text;FMT=Delimited;HDR=Yes;DATABASE=" + appPath + "].[" + txtFileName +"];";
    adoQry->ExecSQL();
    if(FileExists(txtFilePath))
    {
        DeleteFile(txtFilePath);
    }

参考：http://hi.baidu.com/zyjweb/item/c2db29d5b2adf852d63aae8f

http://msdn.microsoft.com/en-us/library/ms974559.aspx

https://support.office.com/en-us/article/Import-data-from-a-text-file-51965b9e-6fb9-41e7-bcb9-c5c098172582