VBからORACLEへ接続するプログラムを作っています。
VBのエディット画面から実行すると正常に動作するのですが、コンパイルを行いEXEから実行すると下記エラーが発生します。
「Fatal NI connect error 6413,」
以下のOpenDatabaseでエラーが発生しているところまでは突き止めたのですが
なぜエラーとなるか、まったく検討がつきません。
Set objOr = CreateObject("OracleInProcServer.XOraSession")
Set objDb = objOr.OpenDatabase(mstrSVN, mstrUID & "/" & mstrPWD, 0&)
どんなささいな情報でもお持ちの方、よろしくお願いします。
No.3ベストアンサー
- 回答日時:
すばらしい回答ありがとうございます。
自分のEXEを置いてるディレクトリはバージョン管理の関係上、半角括弧を使用していました。
試しにディレクトリ名の括弧をとってみると正常動作を確認できました。
くるくるORACLEは良く見ていたつもりでしたが、見落としていたようです。(反省)
No.2
- 回答日時:
私はこのように接続しています。
'** サービス、ユーザ設定
dbname = "FMW001"
cnuser = "fmwuser/fmwuser"
'// Oracle サービス名(別名)、ユーザ・パスワード指定
'** oo4o 接続
Set GoORASESSION = CreateObject("OracleInProcServer.XOraSession")
Set GoORADATABASE = GoORASESSION.OpenDatabase(dbname, cnuser, 0&)
おんなじですよね。。。
ちなみに
「OpenDatabase」を「DbOpenDatabase」と変えてみてはどうでしょうか
参考URL:http://homepage2.nifty.com/sak/w_sak3/doc/sysbrd …
回答ありがとうございます。
DbOpenDatabase()で試してみましたが、事象変わらずでした。
他に手はないでしょうか?
よろしくお願いします。
No.1
- 回答日時:
田吾作7@オラクルインストール中です。
。。EXEにしたらうまくいかない?
そういう状況を聞いた事がありませんが・・・
DB,UserID,PassをVBでテスト用にパラメータを直打ちで設定してませんか?
デバッグ用のプログラムが入ってませんか?
On Error Resume Next
Set objOr = CreateObject("OracleInProcServer.XOraSession")
If objOr Is Nothing Then
MsgBox "CreateObject失敗"
End If
MsgBox "DBオープンパラメータ [" & mstrSVN & "][" & mstrUID & "][" & mstrPWD & "]"
Set objDb = objOr.OpenDatabase(mstrSVN, mstrUID & "/" & mstrPWD, 0&)
If objDb Is Nothing Then
MsgBox "OpenDatabase失敗"
End If
On Error GoTo 0
Exit Sub
コンパイルしてデバッグしてみてください。
この回答への補足
回答ありがとうございます。
全く同じEXEを他のマシン(Win98)で動かしたところ正常に動作しましたのでパラメータミスやデバッグモードでの動作ではないことは確認がとれています。
他に手はないでしょうか?
参考(マシン環境)
OS : Windows2000 Profesional SP2適用
VB : VisualBasic6.0 SP5適用
DB : Oracle8.1(DB本体はLinuxで動作で、Net8経由で接続)
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) EXCELの外部データ取得ができない 1 2023/03/23 09:03
- FX・外国為替取引 MQL5にて謎のエラーが発生!だれか対処を教えてください! 1 2023/03/25 15:59
- Visual Basic(VBA) 【VBAエラー】Nextに対するForがありません 対策について 5 2022/11/21 21:26
- Visual Basic(VBA) IBM Notes9のメールをExcelVBAにて送信するコードについての質問です。 以下のコードを 3 2023/06/21 17:58
- PHP php テーブルが作成できない 1 2022/11/17 23:41
- Windows 10 数年前からWindows10 の Update ができないです。なぜですか? 7 2022/11/09 06:03
- Visual Basic(VBA) VBA★PDFをPDFアプリで印刷しようと思っていますが上手くゆきません 1 2022/06/06 22:04
- Visual Basic(VBA) 【VBA】ボタンに登録したマクロがエラーになる 4 2022/07/25 17:47
- Visual Basic(VBA) ACCESS DAO で不要なテーブルのフィールド(列)の削除 4 2022/06/23 12:13
- Excel(エクセル) 【マクロ】エラーが発生⇒実行時エラー58既に同名のファイルが存在 5 2022/08/31 10:03
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
python エラー
-
エクセルのエラーメッセージ「4...
-
fortranでプログラムを実行する...
-
適切な変換関数が存在しない???
-
バッチからsqlplusの接続エラー...
-
multiple definitionというエラー
-
sys/time.hのインクルードがで...
-
VBScriptのエラーの見つけ方及...
-
アプリケーションエラー
-
DLL関数を使ったプログラム
-
Excelのエラーで困ってます。
-
HANDLEの宣言でのエラー
-
0pen CV のh ighgui.hを使お...
-
global.asaについて
-
HEWを使用しているのですが、こ...
-
FORTRAN Legacy Extension
-
VC++ 2010 Expressのエラー
-
C言語でpgm形式の画像を読み込...
-
【R8C/Tinyマイコン】エラーに...
-
VC++でCatchできる例外について
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
python エラー
-
エクセルのエラーメッセージ「4...
-
適切な変換関数が存在しない???
-
fortranでプログラムを実行する...
-
バッチからsqlplusの接続エラー...
-
Excelのエラーで困ってます。
-
sys/time.hのインクルードがで...
-
コンパイルできません。
-
HEWを使用しているのですが、こ...
-
RightとLeft関数のライブ...
-
ビルド失敗 指定されたファイ...
-
VB2008で定数に色の設定をした...
-
visual C++ でビルドの中止がで...
-
デバッグ中のエラーのことで教...
-
multiple definitionというエラー
-
ビルドが失敗してしまいます
-
LPCWSTRとchar
-
Handlesについて
-
BC30002: 型 'ListItem' が定義...
-
左側がクラス、構造体、共用体...
おすすめ情報