| |
りすりすさん 又は どなたか教えてください。
【21578】- 05/1/24(月) 15:48 -
Re:IEへのアクセスについて
kawataさんのりすりすさん宛の質問
>mouseover
>click
>mouseout
のところを詳しく教えてください。お願いします。定年後株をやっていますが、注文と返済をボタンを押すと自動でできるようにしたいと思っています。次のHTMLに対し、次のVBAを書きました。テーブルのセルには入るのですが、注文確認ボタンを押すと消えてしまい、数量がありませんとエラーになります。これはたぶん>mouseover >click >mouseoutの設定がないためですね。どのように書けばいいか全くわかりません。教えていただけないでしょうか。よろしくお願いします。ishizo
' 一日信用返済注文入力画面で返済注文確認画面に行く
Set objFRAME = objIE.document.frames
Set objDOC = objFRAME("CT").document
Dim objTD As Object
Set objTD = objDOC.all.tags("TD")
Dim n As Integer
For n = 0 To objTD.Length - 1 。
If objTD(n).innerText = "返済数" Then Exit For
Next
'注文数量を入れる
For i = n + 6 To objTD.Length - 1 Step 5
If Left(objTD(i).innerText, 1) <> "株" Then Exit For
objTD(i).innerText = objTD(i - 4).innerText
Next
<TR align="center" bgcolor="#EBF1E4">
<TD nowrap width="10%">建区分<BR>（種類）</TD>
<TD nowrap width="10%">建株数<BR>[株]</TD>
<TD nowrap width="15%">建単価<BR>[円]</TD>
<TD nowrap width="15%">建日<BR>期日</TD>
<TD nowrap width="17%">評価損益<BR>[円]</TD>
<TD nowrap width="33%">返済数</TD>
</TR>
<TR align="right" bgcolor="#FFFFFF">
<TD nowrap align="center" bgcolor="#FFFFFF" rowspan="1">売建<BR>（一日）</TD>
<TD nowrap align="right">100</TD>
<TD nowrap>160.7</TD>
<TD nowrap align="center" bgcolor= "#FFFFFF">16/04/18<BR>16/04/18</TD>
<TD nowrap>10</TD>
<TD>
<INPUT type="text" name="nominal_18411020160418172160.7" maxlength="9"
size="12" value="" style="ime-mode:disabled">株
<SPAN name="btn_up" style="{border:1px gray solid;background-color:
#ffffff;position:relative;top:3px;text-align:center;padding-bottom:
1px;padding-top:1px;height:18px;width:18px;cursor:pointer;-moz-border-radius:
3px;}" onClick="javascript:orderNominalCalculate('form' ,
'nominal_18411020160418172160.7', 'orderNominalData0', 1);
" onMouseover="javascript:inEffect(this);" onMouseout="javascript:
outEffect(this);"><img src="/static/image/bt_up.gif" width="12"
height="12" border="0"></SPAN>
<SPAN name="btn_down" style="{border:1px gray solid;background-color:
#ffffff;position:relative;top:3px;text-align:center;padding-bottom:
1px;padding-top:1px;height:18px;width:18px;cursor:pointer;
-moz-border-radius:3px;}" onClick="javascript:orderNominalCalculate
('form' , 'nominal_18411020160418172160.7', 'orderNominalData0', 2);
" onMouseover="javascript:inEffect(this);" onMouseout="javascript:
outEffect(this);"><img src="/static/image/bt_down.gif" width="12"
height="12" border="0"></SPAN>
<DIV id='orderNominalData0' style="display:none;">[{key:"INITDATA",
value:"100"},{key:"UNITDATA",value:"100"},{key:"MINDATA",value:"100"},
{key:"MAXDATA",value:"100"}]</DIV><BR>
</TD>
</TR>
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
- 16/4/19(火) 9:08 -
