• ベストアンサー

DBの接続について

はじめまして　VB初心者です DBに接続されているのかを判断したいのですが 何かいい方法がありませんか？ 開発言語はVB6.0　DBはオラクル９iです よろしくお願いします。

  • bell9
  • お礼率31% (14/44)

質問者が選んだベストアンサー

  • ベストアンサー
  • Azzuri
  • ベストアンサー率68% (34/50)
回答No.3

コネクションオブジェクトのStateプロパティが adStateClosedなら閉じていることになります。 例） Cn:コネクションオブジェクト If Cn.State = adStateClosed Then 　Cn.Open End If

bell9
質問者

お礼

ありがとうございます おかげさまでうまくいきそうです 本当にありがとうございました

その他の回答 (2)

  • Azzuri
  • ベストアンサー率68% (34/50)
回答No.2

接続はoo4oですか、それともADOでしょうか。 ステータスを確認するプロパティを使用すれば 良いと思います。

bell9
質問者

補足

ADOです。 ステータスを確認するプロパティの使い方を よろしければ少し具体的に教えて もらえないでしょうか？ 自分でもHELP等でしらべてはみますが・・・

  • picoz
  • ベストアンサー率25% (12/48)
回答No.1

こんな感じでいけませんか？ 以下のソースを参考にしてみてください。 ProviderなどはOracleのものを設定すればいけるんじゃないかなぁと思います。 Dim conDB As ADODB.Connection ' DBオブジェクト生成 Set conDB = New ADODB.Connection ' Provider Dim strProvider As String ' DB名 Dim strDBName As String ' ユーザー Dim strUserName As String ' パスワード Dim strPassword As String '' DB接続情報設定 ' クライアントカーソルに設定 conDB.CursorLocation = adUseClient conDB.ConnectionString = "Provider=" & strProvider & ";" _ & "DSN=" & strDBName & ";" _ & "User Id=" & strUID & "; " _ & "Password=" & strPass '' DB接続 conDB.Open

bell9
質問者

補足

返事ありがとうございます ただ、DB接続部は変更はしたくはないのです。 プログラムの途中でIf文等で 接続チェックをしたいのです 例）If DBに接続していない　then DB再接続 　　End if みたいな感じでやりたいのですが

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • DBの接続について

    昨日も同じ質問したのですが また、助けてください DBの接続状態がしりたいのですが DBの接続状態を認識させるために If OraDatabase.State = adStateClosed Then DB_Connect End If ってコーディングいたしました が、一行目でエラー発生でその後の処理が 通りません DB接続部はこんな感じです。 Private Sub DB_Connect() On Error GoTo ERR Set OraSession = CreateObject("OracleInProcServer.XOraSession") Set OraDatabase = OraSession.OpenDatabase("ALARM", "ALARM/SHINKO", 0&) End Sub どうか助けてください お願いします 開発環境VB6.0　DBはオラクル９iです

  • CSVデータの取り込み

    開発環境 言語　VB6.0 DB　　ACCESS 一つ目は、CSVデータをACCESSに保存したいのですがどうしたらいいですか？ 開発環境 言語　VB6.0 DB　　ORACLE9i 二つ目は、CSVデータをORACLE9iに保存したいのですがどうしたいいですか？ どうかよろしくお願いします。

  • dbへの接続について

    dbへの接続について Visual Basic2008でVBを勉強中の者です。初心者です。 SQL serverと接続するやりかたを参考書を頼りにコーディングして接続などは問題ないのですが、 プロシージャごとに毎回DBへの接続文字列を指定して接続して、、とやっているのですが何か 無駄なことしている気がしてきました。(同じコードが各フォームの各プロシージャにあるので) DBサーバの情報が変わったときなどもコードを修正するのが大変だと思いました。 こういう場合、何かいい方法はありませんでしょうか？

  • Oracleが突然接続不可に！

    環境：Oracle9i 9.2.0.1.0 言語：VB6 ネットワーク：VPN DBサーバは本社に１つしかなくクライアントは全国数社から動作している受注システムですが突然DBサーバが接続できなくなってしまいました。 そのとき行ったイベントとしては１つの支社にVPNを接続しようとしていたらしくルータの変更等をしていた模様です。限りなくネットワークの設定で障害が発生したんじゃないかと思われるのですが障害中のとき、社内でDBサーバのIPは接続できており、クライアントからSQLPLUSで接続しようとしても接続できない状態でした。ということでORACLEの問題じゃないのかと疑われています。 しかし、そのときORACLEでは何もしていないため、誤解を説明したいのですがORACLEではないと証明するためにはどうすればよいでしょうか？ SQLNET等の設定を変更していないからORACLEの問題ではないと言えばいいのかどう説明したら理解してもらえるか悩んでいます。 情報不足で申し訳ありませんがアドバイスお願い致します。

  • .NETのOracle接続

    Oracleへの接続で、「oo4o」と「ADO.NET」などがあると思いますが、 Webで調べてみたら、「ADO.NET」が推奨されていますが、何故なのでしょうか？ 開発環境は以下のとおりです。 言語：VB2005 Oracle:10g 両者の違いがよく分かりません。。 基本的な事かも知れませんが、ご教授いただければ幸いです。

  • ASPからDB2への接続方法

    タイトルのとおりですが、ASP（VBスクリプト）からDB2に接続する方法について色々と教えて下さい。 現在は以下のようなソースで”一応”接続できています。 Set objConn = CreateObject("ADODB.Connection") strConn = "DSN=testdb;UID=user;PWD=pass" objConn.Open strConn しかし動作があまりにもっさりしているので他の方法を検討したいのです。 ちなみに上記はADO接続？ODBC接続？なんでしょうか？ Oracleのoo4oを使用した接続「CreateObject("OracleInProcServer.XOraSession")」 みたいな方法ってDB2にはないのでしょうか？ またそれ以外でも使える方法、あるいはサンプルソースが載っているＨＰ等ありましたら教えて下さい。 「？」ばかりで申し訳ありませんが宜しくお願いします。 尚、環境がまだはっきりしないのですが 　ＷＥＢサーバ　：Win2K 　　　　　　　　　IIS5.0 　ＤＢ　　　　　：DB2 Ver7～8（UNIX版） てな感じになるかと思います。 しかしながら上記のソースはDB2 Ver8 PE（Win版）で使ったテスト用なのです・・・。 宜しくお願いします。

  • Visual Basic6.0でOracle9iに接続する方法

    Visual Basic6.0でOracle9iに接続する方法を教えてください。 状況としてはVB6.0をインストールしました。 Oracle9iをインストールしました。 ある業務の開発ソースはもらっています。 その他iniファイルももらっています。 なので必要な情報はあるはずです。 しかし、そもそもVBとOracleの接続方法がわかりません。 どなたか知っている方お願いします。 また、ヒントが得られるサイトがありましたら教えてください。

  • VB6でＤＢ接続中は他のプログラムが実行できないようにしたい。

    初心者です。 ＶＢ６＋ＭＳＤＥで開発しております。 ある程度完成しかけているところに、何人かにテストしてもらっているところに１つ問題が・・・。 　ＤＢにアクセスしているプログラム中で他のボタンを押すと固まるということが発生しました。何かよい方法はないでしょうか。 今考えられるのは、ボタンを触れないようにするくらいなのですが・・・。何かないでしょうか・・・。 　ご教示、宜しくお願いいたします。

  • DB接続を動的に切り替えたい

    VS2005を使用してウェブアプリを作成しています。 アプリ内でDBに接続しているのですがローカル環境で開発しているときとウェブサーバで検証する時とで都度接続文字列を変えてWebServiceをアップロードしているのですが動的に判断して適切な接続文字を選択するようにすることは出来ないものでしょうか 開発環境：WINXP　VS2005　.NET 2.0 処理の概要は以下です dim conn as string = DB接続文字列　・・・この部分を動的に変えたい dim cmd as string = SQL文字列 dim adapter as new OleDbDataAdapter(cmd,conn) ・ ・ といった感じです。 良いアイディアがありましたら教えてください

  • oracle,sql-server,DB2,フリーDB

    oracle 10g sql-server 2005 DB2 フリーDB(mysqlなど) はどれがいいでしょうか？ 一応３年ぐらい前までは開発現場にいたので一通り知っています。 すべて経験ありますが管理はしたことはありません。 価格ならフリーが一番でしょう。信頼性で言うとoracle でもコストが高い。 MSとくっつくならsql-serverだと思うのですが。 まだ社内でどの程度の規模になるかも把握し切れていませんが、 やはり無難にoraが一番でしょうか？？ 後々に業務システムの開発をします。 javaにするかVB,delphiなどにするかも決まってません。 DB2なら一応資格も持っているんですけどね。 管理、構築の容易さなどそれぞれの特徴も教えてください。

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する