teratail header banner
teratail header banner
質問するログイン新規登録

回答編集履歴

2

MS Oracle ODBC の使用方法を追加

2019/11/20 02:54

投稿

KOZ6.0
KOZ6.0

スコア2736

answer CHANGED
@@ -5,4 +5,26 @@
5
5
  con.ConnectionString = "Provider=OraOLEDB.Oracle;Data Source=(DataSource);User ID=(UID);Password=(PASS)"
6
6
  con.Open
7
7
  ```
8
- (DataSource) の部分は tnsname でも良いし、192.168.0.1:1521/ORCL のような形でもいいです。
8
+ (DataSource) の部分は tnsname でも良いし、192.168.0.1:1521/ORCL のような形でもいいです。
9
+
10
+ # 追記:Microsoft Oracle ODBC を使用した接続(お勧めしません)
11
+
12
+ DSN を使用する場合
13
+
14
+ ```VBA
15
+ Dim con As New ADODB.Connection
16
+ con.ConnectionString = "DSN=(DSN名);UID=(ユーザID);PWD=(パスワード)"
17
+ con.Open
18
+ ```
19
+
20
+ DSN の作成は 32bit 用の ODBC アドミニストレータを起動することに注意すれば、特に迷うことはないはずです。
21
+ [https://support.microsoft.com/ja-jp/help/942976/odbc-administrator-tool-displays-both-the-32-bit-and-the-64-bit-user-d](https://support.microsoft.com/ja-jp/help/942976/odbc-administrator-tool-displays-both-the-32-bit-and-the-64-bit-user-d)
22
+
23
+
24
+ DSN を使用しない場合
25
+
26
+ ```VBA
27
+ Dim con As New ADODB.Connection
28
+ con.ConnectionString = "DRIVER={Microsoft ODBC for Oracle};SERVER=(TNS名);UID=(ユーザID);PWD=(パスワード)"
29
+ con.Open
30
+ ```

1

まちがい

2019/11/20 02:54

投稿

KOZ6.0
KOZ6.0

スコア2736

answer CHANGED
@@ -5,4 +5,4 @@
5
5
  con.ConnectionString = "Provider=OraOLEDB.Oracle;Data Source=(DataSource);User ID=(UID);Password=(PASS)"
6
6
  con.Open
7
7
  ```
8
- (DataSource) の部分は tnsname でも良いし、192.168.0.1:1521:ORCL のような形でもいいです。
8
+ (DataSource) の部分は tnsname でも良いし、192.168.0.1:1521/ORCL のような形でもいいです。