*-- To Tell The Truth --*
Cruz
MAIL
HOME
|
|
| 2002年02月06日(水) ■ |
|
| どこから見てもサンプル |
|
一目でサンプル
見るからにサンプル
そーいうデータ完成しました。
結局、Excelを駆使して4000件。
そして出来たデータをINSERT
深いことは考えずに、
CSVファイルを読み込み
INSERT文作成実行
するだけのものにしました。
====================
// COMの初期化処理
::CoInitialize(NULL);
try{
// ADOオブジェクトの生成
m_pConnect.CreateInstance(__uuidof(Connection));
// データベースへの接続
m_pConnect->Open(
_bstr_t(DB2_NAME),
_bstr_t(DB2_USERID),
_bstr_t(DB2_PASSWD),
adConnectUnspecified);
m_pConnect->BeginTrans();
// 更新データファイルオープン
if((fp = fopen(cpInsertFile, "r")) == NULL){
return FALSE;
}
while(fgets(cpReadStr, CHAR_MAX, fp) != NULL){
// INSERT文作成
SetInsert(cpReadStr);
_bstr_t bstrQuery(cpSQLStr);
_variant_t vRecsAffected(0L);
// INSERT実行
m_pConnect->Execute(bstrQuery,
&vRecsAffected,
adOptionUnspecified);
}
m_pConnect->CommitTrans();
}
catch (_com_error &e)
{
dump_com_error(e, hWnd);
return FALSE;
}
return TRUE;
====================
あっさりさっぱりってな感じに仕上がっています。（謎
|
|