Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13500 / 76732 ←次へ　｜　前へ→
【68735】解決できましたので、報告いたします。
回答  NS  - 11/4/13(水) 9:28 -
引用なし
パスワード
   解決できましたので、報告いたします。

なぜか分からないのですが、次のようにしたら、解決しました。

con.Mode = adModeRead Or adModeShareDenyNone
を
con.Mode = 1
にして、

　　Set con = New ADODB.Connection
　　con.Mode = 1
　　con.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
　　　　"Data Source=""" & C_ExcelFile & """;" & _
　　　　"Extended Properties=""Excel 8.0;HDR=Yes;"";"

これで、複数端末からの利用が出来るようになりました。

定数を設定していたらダメで、数値を設定したらＯＫ。？

また、con.Mode = 17 （adModeShareDenyNoneを付けると）では、
ダメでした。

一応解決したので、開発を進めようと思います。

ありがとうございました。
1 hits
▼ 【68681】ADODB.ConnectionでExcel複数接続 NS 11/4/6(水) 14:34 質問
【68735】解決できましたので、報告いたします。 NS 11/4/13(水) 9:28 回答≪
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13500 / 76732 ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free