_worksheet m_oworksheet; // 工作表
_workbook m_oworkbook; // 工作簿
workbooks m_oworkbooks; // 工作簿集合
worksheets m_oworksheets; // 工作表集合
range m_ocurrrange; // 使用區域
//設定為顯示
lpdispatch lpdisp = null;
colevariant covtrue((short)true);
colevariant covfalse((short)false);
colevariant covoptional((long)disp_e_paramnotfound, vt_error);
range ocurcell;
// 開啟檔案
lpdisp = m_oworkbooks.open( _t("e:\\language_kron"),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing),
_variant_t(vtmissing) );
// 獲得活動的workbook( 工作簿 )
m_oworkbook.attachdispatch( lpdisp, true );
// 獲得活動的worksheet( 工作表 )
m_oworksheet.attachdispatch( m_oworkbook.getactivesheet(), true );
// 獲得使用的區域range( 區域 )
m_ocurrrange.attachdispatch( m_oworksheet.getusedrange(), true );
// 獲得使用的行數
long lgusedrownum = 0;
m_ocurrrange.attachdispatch( m_ocurrrange.getrows(), true );
lgusedrownum = m_ocurrrange.getcount();
// 獲得使用的列數
long lgusedcolumnnum = 0;
m_ocurrrange.attachdispatch( m_ocurrrange.getcolumns(), true );
lgusedcolumnnum = m_ocurrrange.getcount();
// 讀取sheet的名稱
cstring strsheetname = m_oworksheet.getname();
//得到全部cells,此時,currrange是cells的集合
m_ocurrrange.attachdispatch( m_oworksheet.getcells(), true );
cstring
// 遍歷整個excel**
//cstringarray* arraystr;
cstring origtxt,transtxt,szhash;
origtxt=_t("");
transtxt=_t("");
int nitem=0;//for select string1 or string2
//arraystr = new cstringarray[lgusedrownum];
for ( int i = 1; i < lgusedrownum; i++ )
if(j==2)
j++;
}}
VB6通過外網連線遠端SQLSERVER2014
本文的目的是 通過外網,訪問架設在本地區域網內的sql server2014伺服器 其他版本未證實,但想來大同小異 在撰寫本文之前,我花了大量的時間在網路上查詢關於vb遠端連線sqlserver伺服器的資料。通過各種艱難摸索,終於找到了行之有效的成功連線的經驗。不敢獨享,拿來與大家共同交流。1 遠端...
es6通過Mixin模擬多繼承
這週在專案中為了實現乙個樹形圖,所以寫了乙個類,隨著功能的增加,這個類越來越多,量也就越來越多,易讀性很低,所以打算按功能將 抽離到新的檔案,就想到了類的繼承,但是一般的類都是單繼承,那麼怎麼實現多繼承呢?引入乙個概念混合模式,在修飾器的基礎上,可以實現mixin模式。所謂mixin模式,就是物件繼...
VB6通過ASP網頁實現C S模式
c s模式一般都是用winsock來相互通訊,實現雙方互動。用asp網頁來連線 不能稱之為通訊 只能c對s傳送資訊或請求一些資訊,s是不能主動來連線c,發資訊給c。一 c端 既然是要訪問asp頁,這裡有二種方式。1 api寫的訪問模組 option explicit 把以上 放到乙個模組中即可。呼叫...