質問編集履歴

1

詳細の明記

2021/09/09 06:27

投稿

Kirick
Kirick

スコア0

test CHANGED
File without changes
test CHANGED
@@ -3,6 +3,10 @@
3
3
 
4
4
 
5
5
  ACCESS2016でADODB.ConnectionでUPDATEなど更新がしたい。
6
+
7
+ DBが他のPCにあるDBでMySQLになります。
8
+
9
+ 接続はODBCで行っています。
6
10
 
7
11
 
8
12
 
@@ -26,11 +30,11 @@
26
30
 
27
31
  ```ACCESS/MySQL
28
32
 
29
- Set cn = CreateObject(ADDDB.Connection")
33
+ Set cn = CreateObject("ADODB.Connection")
30
34
 
31
- cn.ConnectionString="設定等"
35
+ cn.ConnectionString = "Driver={MySQL ODBC 5.1 Driver];Server=xxx.xxx.xx.xxx;Port=xxxx;Database=xxxxx;user=xxx;Password=xxxx"
32
36
 
33
- cn.CursorLocation=adOpenStatic
37
+ cn.CursorLocation = adOpenStatic
34
38
 
35
39
  cn.Mode = adModeReadWrite
36
40