回答編集履歴
1
書式の改善
answer
CHANGED
@@ -1,5 +1,7 @@
|
|
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
|
+
```vbs
|
3
4
|
ary = Array("XXX", "XXX", "XXX", "XXX", "XXX")
|
4
5
|
str = "'" & Join(ary, "','") & "'"
|
5
|
-
Set rs = OracleConnect.Execute("SELECT * FROM TBL001 WHERE COLUMN IN (" & str & ");")
|
6
|
+
Set rs = OracleConnect.Execute("SELECT * FROM TBL001 WHERE COLUMN IN (" & str & ");")
|
7
|
+
```
|