原创_靈活處理excel文件_使用经验
学习.交流
专业源于专注
www. onlyit. cn   
学习交流 文件下载 手册资料 交流QQ群

    

 1  1/1   1  
作者
内容
daibiaoge  [个人空间]


注册  2020-04-30
发贴数  446
精华贴  2
原创贴  1
来自  
状态  正常

级别  会员
#1»发布于2020-11-15 08:52

int test() 

  return 1; 
}; 
 
int main() 

  string myfile; 
  myfile = select_file_to_open("Excel文件", "xlsx|*.xlsx"); 
  if (myfile == "") 
  {break;} 
  if (xls_open_book(myfile) == "0") 
  { 
    msg("open again"); 
  } 
  xls_select_sheet_by_id(1); 
  xls_sheet_to_dbio_abs(); 
  xls_close_book(); 
  { 
    int row, col, trow, tcol; 
 
    db_go_head(); 
    trow = db_row_count(); 
    tcol = db_field_count(); 
    dbg_clear(); 
    //清理不想要的空行 
    for (row = 0; row < trow; row++) 
    { 
      if (db_res(0) == "" && db_res(4) == "") 
      { 
        db_del_row(row); 
        row--; 
        trow--; 
      } 
    } 
    //清理不想的空列 
    for (col = 6; col <= tcol; col++) 
    { 
      dbg(db_cell(col, 1)); 
      if (db_cell(col, 1) == "") 
      {db_drop_field(db_field_name(col));} 
    } 
 
    db_go_head(); 
    for (row = 0; row < trow; row++) 
    { 
      for (col = 0; col < tcol; col++) 
      { 
        string xx; 
        dbg("Row:" + row + ";Col:" + col + "Val:" + db_cell(col, row)); 
      } 
      db_next(); 
    } 
 
    db_show(); 
 
  } 
 
  return 1; 
};


        



 1  1/1   1  

登录后方可发贴


[ 电话: 0571-85462761 王先生 QQ: 124520435 加入软件QQ群 - 杭州 - 浙ICP备19051128号-1 网安 33010402003225 ]