回答編集履歴
1
書式の改善
test
CHANGED
|
@@ -1,9 +1,13 @@
|
|
|
1
1
|
[Join](https://www.google.com/search?sxsrf=ACYBGNQjVt9UVzOo17XTUsvcI30IuPig-w%3A1579418357956&ei=9QIkXsLhObmIr7wPx8-lyAs&q=vbs+join&oq=vbs+join&gs_l=psy-ab.12...0.0..20686...0.0..0.0.0.......0......gws-wiz.706KeS2je4M&ved=0ahUKEwiCsLXxj4_nAhU5xIsBHcdnCbkQ4dUDCAs)を使うのもいいかもです。
|
|
2
2
|
|
|
3
3
|
|
|
4
|
+
|
|
5
|
+
```vbs
|
|
4
6
|
|
|
5
7
|
ary = Array("XXX", "XXX", "XXX", "XXX", "XXX")
|
|
6
8
|
|
|
7
9
|
str = "'" & Join(ary, "','") & "'"
|
|
8
10
|
|
|
9
11
|
Set rs = OracleConnect.Execute("SELECT * FROM TBL001 WHERE COLUMN IN (" & str & ");")
|
|
12
|
+
|
|
13
|
+
```
|