質問編集履歴
3
ソースコードの追加記入
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~2019/09/16
|
146
|
+
|
147
|
+
|
148
|
+
|
149
|
+
</font></td>
|
150
|
+
|
151
|
+
|
152
|
+
|
95
153
|
```
|
96
154
|
|
97
155
|
```vba
|
2
「コードの挿入」で記入
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
「コードの挿入」で記入
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
|
-
|
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
|
-
|
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
|
|