コンソールアプリでのoo4o等の使用

コンソールアプリで(要はバッチ的に)Oracleを操作したい時がある。
プロジェクト作成時に「コンソールアプリ」を選択して、「VCLを使用」にチェックを入れておくのだけど、それだけではなくて起動後に「CoInitialize?」しておかないと使えない。
こんな感じです。

#include <utilcls.h>
     :
     :
Variant ses, db, rs; 
AnsiString strTMP;
     : 
     :
::CoInitialize(NULL);
     :
     :
ses = CreateOleObject("OracleInProcServer.XOraSession");
db = ses.Exec(PropertyGet("OpenDatabase") << "Database" << "user/pass" << 0);
rs = db.Exec(PropertyGet("CreateDynaset") << "SELECT * FROM hogera" << 0);

strTMP = rs.Exec(PropertyGet("Fields") << strFIELD).Exec(PropertyGet("Value"));
     :
     :
::CoUninitialize();
     :
     :

トップ   編集 凍結解除 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2012-12-09 (日) 22:30:49 (3004d)