zoukankan      html  css  js  c++  java
  • 导出csv文件

    static void NJ_MF_CheckProShape(Args _args)
    {
        NJ_Search_Inventory                 NJ_Search_Inventory;
        #AviFiles
        str                                 s,tempStr;
        int                                 i,RecCount;
        container                           c,conFilter = ["Excel Files(*.csv)", "*.csv"];
        SysOperationProgress                simpleProgress;
        TextBuffer                          textBuffer  = new TextBuffer();
        FileIoPermission                    perm;
        counter                             Lines;

        ;

        s = Winapi::getSaveFileName(0, conFilter, "","Save File", "", "");
        if (s)
        {
            select count(RecId) from NJ_Search_Inventory  where NJ_Search_Inventory.ACT_ProdShapeID == "";
            RecCount = NJ_Search_Inventory.RecId;
            simpleProgress = SysOperationProgress::newGeneral(#aviUpdate, 'Exporting...', RecCount);
            simpleProgress.setCaption("Data Export");
            simpleProgress.setAnimation(#AviFormLetter);
            startlengthyoperation();

            try
            {
                perm = new FileIoPermission(s, "w");
                perm.assert();
                textBuffer.appendText("tagBl,");
                textBuffer.appendText("BatchId,");
                textBuffer.appendText("ItemId,");
                textBuffer.appendText("Category,");
                textBuffer.appendText("ProductShape,");
                textBuffer.appendText("\n");

                while select NJ_Search_Inventory order by TagBl where NJ_Search_Inventory.ACT_ProdShapeID == ""
                {
                    //if (StrLen())

                    textBuffer.appendText(strReplace(strfmt("%1,",NJ_Search_Inventory.tagBL),"\n"," "));
                    textBuffer.appendText(strfmt("%1,",NJ_Search_Inventory.InventBatchId));
                    textBuffer.appendText(strfmt("%1,",NJ_Search_Inventory.ItemId));
                    textBuffer.appendText(strfmt("%1,",NJ_Search_Inventory.ACT_ItemCategoryId));
                    textBuffer.appendText(strfmt("%1,",NJ_Search_Inventory.ACT_ProdShapeID));
                    textBuffer.appendText("\n");

                    simpleProgress.incCount();
                    simpleprogress.setText(strfmt("Task: %1/%2", i,RecCount));
                    i++;
                }

                Lines = textBuffer.numLines();
                try
                {
                    if (textBuffer.toFile(s))
                        info(strfmt("记录导出到文件 %1.共导出了 %2 行记录.",s,Lines-1));
                }
                catch ( Exception::Error )
                {
                    error ("Generated file error.");
                }
                CodeAccessPermission::revertAssert();
                }

            catch (Exception::Deadlock)
            {
                retry;
            }
        }
    }

  • 相关阅读:
    ng2-bootstrap的modal嵌套时无法滚动的情况
    oracle自动补0
    webservice 从客户端中检测到有潜在危险的 Request.Form 值
    树莓派花生壳
    ubuntu E: Could not get lock /var/lib/dpkg/lock
    树莓派配置静态ip
    解决PL/SQL查询结果乱码的问题
    批处理脚本命令行方式关闭Windows服务
    最简单的分享到微博代码
    Select的onchange事件
  • 原文地址:https://www.cnblogs.com/perock/p/2297217.html
Copyright © 2011-2022 走看看