5ちゃんねる ★スマホ版★ ■掲示板に戻る■ 全部 1- 最新50  

■ このスレッドは過去ログ倉庫に格納されています

★★★ActiveXDLLについて!教えて下さい。

1 :☆雪:01/09/24 22:44
[OSのVer]2000
[VBのVer]5.0
以下に示すのは0040でのDB接続コードですが。
これをActiveXDLL化する場合、べたに書いて、DLLWIZARDを使用し
コンパイルするだけで接続できるのでしょうかでしょうか?
また、足りない部分があったらご指摘お願いします。
(サービス名、ユーザー名なども、記入済として。)
よろしくお願いします。

***********************
OraSession : Variant; // Oracle Session
OraDatabase : Variant; // Oracle Database

procedure TMaiForm.ConnectBtnClick(Sender: TObject);
var
StrSrv : String;
UserPass : String;
begin

StrSrv := 'hogehoge'; // Net8 サービス名
UserPass := 'hogeUser/hogePass'; // ユーザー名/パスワード

try
// OLE オートメーションオブジェクトのインスタンスを作成
OraSession := CreateOleObject('OracleInProcServer.XOraSession');
// oo4oインプロセス接続
OraDatabase := OraSession.DBOpenDatabase[StrSrv, UserPass, 0];
except
on E:EOleError do begin
ShowMessage('データベースの接続に失敗しました。');
end;
end;

end;

2 :デフォルトの名無しさん:01/09/25 07:40
VBスレできいたら教える

VB初心者質問スレPart3
http://piza2.2ch.net/test/read.cgi?bbs=tech&key=1000523122

***********終了**********

2 KB
■ このスレッドは過去ログ倉庫に格納されています

★スマホ版★ 掲示板に戻る 全部 前100 次100 最新50

read.cgi ver 05.04.00 2017/10/04 Walang Kapalit ★
FOX ★ DSO(Dynamic Shared Object)