// コネクションプール関連の ConnectionString 属性を使用してコネクションを開く
conn->>ConnectionString = L"User Id=****;Password=****;Data Source=orcl;" +
L"Min Pool Size=10;Connection Lifetime=120;Connection Timeout=60;" +
L"Incr Pool Size=5; Decr Pool Size=2";
conn->>Open();
MessageBox::Show(L"コネクション プールが作成されました。");
conn->>Close();
MessageBox::Show(L"コネクションをプールに戻しました");
// SYSTEM/**** as SYSDBA で接続
conn->>ConnectionString = L"User Id=system;Password=****;" +
L"DBA Privilege=SYSDBA;Data Source=orcl;";
conn->>Open(); MessageBox::Show(L"Oracle へ接続" + conn->>ServerVersion);
conn->>Close();
MessageBox::Show(L"切断されました。");