zoukankan      html  css  js  c++  java
  • 导入csv

    void importxls()

    {

        #AviFiles

        str                                 s,tempStr;

        int                                 i,cnt,fieldCount;

        container                           c,conFilter = ["Excel Files(*.csv)", "*.csv"];

        NJ_MF_RouteNumber                   routeNumber;

        SysOperationProgress                progress = new SysOperationProgress();

        TextBuffer                          textBuffer  = new TextBuffer();

        ;

        s = WinAPI::getOpenFileName(0, conFilter, "","Open File", "", "");

        if(s)

        {

            textBuffer.fromFile(s);

            cnt = textBuffer.numLines();

            c = str2con(textBuffer.nextToken(),",");

            progress.setCaption("Data Import");

            progress.setAnimation(#AviFormLetter);

            startLengthyOperation();

            for (i=0;i<cnt;i++)

            {

                progress.setText(strfmt("Reading records %1", i));

                c = str2con(textBuffer.nextToken(),',');

                ttsbegin;

                routeNumber.Field1 = conpeek(c,1);

                routeNumber.Field2 = conpeek(c,2);

                routeNumber.Field3 = conpeek(c,3);

                routeNumber.Field4 = conpeek(c,4);

                routeNumber.Field5 = conpeek(c,5);

                routeNumber.Field6 = conpeek(c,6);

                routeNumber.Field7 = conpeek(c,7);

                routeNumber.Field8 = conpeek(c,8);

                routeNumber.Field9 = conpeek(c,9);

                routeNumber.Field10 = conpeek(c,10);

                routeNumber.RouteNumber = conpeek(c,11);

                routeNumber.Route = conpeek(c,12);

                routeNumber.doInsert();

                endLengthyOperation();

                ttscommit;

            }

        NJ_MF_RouteNumber_Ds.research();

        box::info("µ¼Èë¼Ç¼ÌõÊý£º"+int2str(i));

        }

    }

  • 相关阅读:
    新建立了个集邮 Blog
    删除8848的mysearch
    VS2005的中国发布会
    免费的PDF生成工具
    FreeBASIC
    今天收到了WinZip发来的免费License
    简洁的 Bash 编程技巧
    benhuan039sblog.wordpress.20121111.xml_.txt
    新浪微博除掉推荐微博
    自制力也是一种力量
  • 原文地址:https://www.cnblogs.com/perock/p/2182266.html
Copyright © 2011-2022 走看看