iさん、こんにちは。

＞こんにちは、iです。
＞今回は、ＤＢの接続について教えてください。
＞
＞内容は、
＞Connect関数を使ってＤＢに接続するだけのグローバル関数を
＞作ったのですが、
＞
＞  SQLCA. ・・・・・ ;
＞  Connect Using SQLCA ;
＞  If( SQLCA.SQLCODE = 0 ) Then
＞    Return( 0 ) ;   // 成功
＞  Else
＞    Return( -1 ) ;  // 失敗
＞  End If
＞
＞この関数を呼ばれるときに、すでに接続中ならConnectしない処理を
＞埋め込みたいのですがどうすればいいのでしょうか？
＞
＞どうか、よろしくお願いします。

遅レスですが、次の方法でどうでしょうか。

IF SQLCA.Database <> \"\" THEN
   // 既に接続してますよ。
ELSE
   // 接続処理
END IF

トランザクションオブジェクトに SQLCA 以外を使用することを想定する場合は、この IF 文の
直前に IsValid 関数でトランザクションオブジェクトが有効か否かを確認した方が良いと思い
ます。