質問編集履歴

3

ソースコードの追加記入

2019/09/17 01:21

投稿

masakado
masakado

スコア6

test CHANGED
File without changes
test CHANGED
@@ -92,6 +92,64 @@
92
92
 
93
93
 
94
94
 
95
+ <!-------------------------△ この用に変化する為!! △--------------------------->
96
+
97
+
98
+
99
+ </tr>
100
+
101
+
102
+
103
+ <form id="command" action="/×××/mall/csvdl/CD03_02_001" method="post">
104
+
105
+ <td bgcolor="#FFFFFF">
106
+
107
+ <input type="submit" value="ダウンロード"> 
108
+
109
+ <input type="hidden" name="_csrf" value="c4125cb21c34e1af5b20c67b2e240b69">
110
+
111
+ <input type="hidden" name="logId" value="28047783">
112
+
113
+ </td>
114
+
115
+ </form>
116
+
117
+
118
+
119
+
120
+
121
+
122
+
123
+ </tr>
124
+
125
+
126
+
127
+ <tr align="center">
128
+
129
+ <td bgcolor="#FFFFFF"><font size="-1">通常購入</font></td>
130
+
131
+ <td bgcolor="#FFFFFF"><font size="-1">28047783</font></td>
132
+
133
+ <td bgcolor="#FFFFFF"><font size="-1">2019-09-16 18:47:09</font></td>
134
+
135
+ <td bgcolor="#FFFFFF"><font size="-1">発送待ち</font></td>
136
+
137
+ <td bgcolor="#FFFFFF"><font size="-1">発送完了報告用</font></td>
138
+
139
+ <td bgcolor="#FFFFFF" align="right"><font size="-1">34件</font></td>
140
+
141
+ <td bgcolor="#FFFFFF"><font size="-1">
142
+
143
+
144
+
145
+ 2019/09/10&#65374;2019/09/16
146
+
147
+
148
+
149
+ </font></td>
150
+
151
+
152
+
95
153
  ```
96
154
 
97
155
  ```vba

2

「コードの挿入」で記入

2019/09/17 01:21

投稿

masakado
masakado

スコア6

test CHANGED
File without changes
test CHANGED
@@ -144,6 +144,38 @@
144
144
 
145
145
  Next
146
146
 
147
+ ------------------------------------------------------------------------------
148
+
149
+
150
+
151
+  ここに新しいコードを追加したいが、HTMLタグtd"処理中"の取得がよく分からない為、
152
+
153
+  現在は↑でSleep 10000 '10秒間とめる処理をしていますが、
154
+
155
+  HTMLが変化するスピードは、データ量とサーバー状態によって変わる
156
+
157
+
158
+
159
+ ------------------------------------------------------------------------------
160
+
161
+
162
+
163
+
164
+
165
+ 'IEのページ読み込みが完了することを待つ処理
166
+
167
+ Do While ie.Busy = True Or ie.readyState < READYSTATE_COMPLETE
168
+
169
+ DoEvents
170
+
171
+ Loop
172
+
173
+ '------------------------------------------------------------------------------
174
+
175
+ ie.document.forms(2).submit
176
+
177
+
178
+
147
179
 
148
180
 
149
181
  ```
@@ -152,35 +184,7 @@
152
184
 
153
185
 
154
186
 
155
- ------------------------------------------------------------------------------
187
+
156
-
157
-
158
-
159
-  ここに新しいコードを追加したいが、HTMLタグtd"処理中"の取得がよく分からない為、
160
-
161
-  現在は↑でSleep 10000 '10秒間とめる処理をしていますが、
162
-
163
-  HTMLが変化するスピードは、データ量とサーバー状態によって変わる
164
-
165
-
166
-
167
- ------------------------------------------------------------------------------
168
-
169
-
170
-
171
-
172
-
173
- 'IEのページ読み込みが完了することを待つ処理
174
-
175
- Do While ie.Busy = True Or ie.readyState < READYSTATE_COMPLETE
176
-
177
- DoEvents
178
-
179
- Loop
180
-
181
- '------------------------------------------------------------------------------
182
-
183
- ie.document.forms(2).submit
184
188
 
185
189
 
186
190
 

1

「コードの挿入」で記入

2019/09/17 01:13

投稿

masakado
masakado

スコア6

test CHANGED
File without changes
test CHANGED
@@ -8,19 +8,11 @@
8
8
 
9
9
 
10
10
 
11
-
12
-
13
-
14
-
15
-
16
-
17
11
  ### 該当のソースコード
18
12
 
19
13
 
20
14
 
21
- ---------------------------↓HTML↓--------------------------
15
+ ```HTML
22
-
23
-
24
16
 
25
17
  <tr align="center">
26
18
 
@@ -48,7 +40,7 @@
48
40
 
49
41
 
50
42
 
51
- <td bgcolor="#FFFFFF"><font size="-1">処理中</font></td> ←ここが↓数秒後
43
+ <td bgcolor="#FFFFFF"><font size="-1">処理中</font></td><!-- ←ここが↓数秒後 -->
52
44
 
53
45
 
54
46
 
@@ -82,7 +74,7 @@
82
74
 
83
75
 
84
76
 
85
- -------------------------- この用に変化する為!! ---------------------------
77
+ <!-------------------------- この用に変化する為!! --------------------------->
86
78
 
87
79
  <form id="command" action="/×××/mall/csvdl/CD03_02_001" method="post">
88
80
 
@@ -100,15 +92,9 @@
100
92
 
101
93
 
102
94
 
103
-
95
+ ```
104
-
105
-
106
-
96
+
107
- ---------------------------↓VBA↓--------------------------
97
+ ```vba
108
-
109
-
110
-
111
-
112
98
 
113
99
  Dim cboObj3 As HTMLSelectElement
114
100
 
@@ -160,6 +146,12 @@
160
146
 
161
147
 
162
148
 
149
+ ```
150
+
151
+
152
+
153
+
154
+
163
155
  ------------------------------------------------------------------------------
164
156
 
165
157