看图。  自定义按钮导入外部文件写入单据方法

int main()  {  string fp,fn;    int pos, len,a;    fp=select_file_to_open('选择文件','Excel文档|*.xl*');    if(fp=='')    {break;}    fn = fp;    for(a=1;a<strlen(fn);a++)    {       pos = str_pos(fn, "\");       len = strlen(fn);       fn = str_get_sub(fn, pos + 1, len - pos - 1);     }      pos = str_pos(fn, ".");      len = strlen(fn);      fn = str_get_sub(fn, 0, len - pos + 1)        int trow, i, n;      string sql;      xls_open_book(fp);      xls_select_sheet_by_title(fn);      db_select_area(1);      xls_sheet_to_dbio();      i = db_row_count();      db_go_head();      for (n = 1; n <= i; n++)      {        vr_add_res_ext(db_res(0), db_res(1), 'batch_no:abc;tax_rate:11.2;vr_item_ext_1:ccde');        db_next()      }    }