colevariant covtrue((short)true), covfalse((short)false), covoptional((long)disp_e_paramnotfound, vt_error);
workbooks wbsmybooks;
_workbook wbmybook;
worksheets wssmysheets;
_worksheet wsmysheet;
range rgmyrge, rgmyrge1, rgmyrge2;
//建立excel 2000伺服器(啟動excel)
wbmybook.attachdispatch(wbsmybooks.add(covoptional));
//得到worksheets
wssmysheets.attachdispatch(wbmybook.getworksheets(),true);
//得到sheet1
wsmysheet.attachdispatch(wssmysheets.getitem(_variant_t("sheet1")),true);
//得到全部cells，此時,rgmyrge是cells的集合
rgmyrge.attachdispatch(wsmysheet.getcells(),true);
rgmyrge.setvalue(_variant_t(""));
cstring str;
str = "醫療機構許可證資訊查詢結果";
rgmyrge.setitem(_variant_t((long)1),_variant_t((long)2),_variant_t(str));
str = "許可證編號";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)1),_variant_t(str));
str = "機構名稱";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)2),_variant_t(str));
str = "經營性質";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)3),_variant_t(str));
str = "經濟性質";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)4),_variant_t(str));
str = "負責人";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)5),_variant_t(str));
str = "法人代表";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)6),_variant_t(str));
str = "診療科目";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)7),_variant_t(str));
str = "位址";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)8),_variant_t(str));
str = "**";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)8),_variant_t(str));
str = "發證日期";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)9),_variant_t(str));
str = "有效期截止";
rgmyrge.setitem(_variant_t((long)2),_variant_t((long)10),_variant_t(str));
/* lpdispatch lpdisp;
lpdisp = wsmysheet.getrange(_variant_t("a1"),_variant_t("a1"));
assert(lpdisp);
rgmyrge.attachdispatch(lpdisp);
lpdisp = rgmyrge.getentirerow();
rgmyrge.attachdispatch(lpdisp);
rgmyrge.insert(_variant_t((long)1));*/
rgmyrge.attachdispatch(wsmysheet.getcells());
rgmyrge1.attachdispatch(rgmyrge.getitem(colevariant(1l), colevariant(1l)).pdispval, true);
rgmyrge1.attachdispatch(rgmyrge1.getentirerow(), true);
rgmyrge2.attachdispatch(rgmyrge.getitem(colevariant(2l), colevariant(1l)).pdispval, true);
rgmyrge2.attachdispatch(rgmyrge2.getentirerow(), true);
rgmyrge2.copy(covoptional);
// rgmyrge1.insert(colevariant(1l));
for (int i = 0; i < 5; i++)
for (i = 0; i < 5; i++)
//釋放物件
rgmyrge.releasedispatch();
wsmysheet.releasedispatch();
wssmysheets.releasedispatch();
wbmybook.releasedispatch();
wbsmybooks.releasedispatch();
cdialog::onok();
VC操作Excel檔案
excel 簡單操作其實就是讀和寫,包括新增,刪除,修改 其實和對資料庫進行操作是一樣的,微軟提供了方法 1.首先獲得計算機內已經安裝的驅動名稱 sqlgetinstalleddrivers szbuf,cbbufmax,cbbufout 引數1 是字串,它將獲得所有驅動名稱,中間以null分隔,第...
VC 利用ADO操作Excel
把excel當做資料庫來操作，步驟如下 1 在stdafx.h中加入 import c program files common files system ado msado15.dll no namespace rename eof adoeof connectionptr pcon ex cst...
對excel行的操作
import pandas sheet1 pandas.read excel 成績.xlsx sheet name sheet1 sheet2 pandas.read excel 成績.xlsx sheet name sheet2 連線兩張表drop指是否刪除原index 在連線表的最後一行追加一行...