在没有ID和NAME 请问如何赋值 自己测试了很多次遍历 但是还是赋值不了, 最好有源码 谢谢了 网页登录源码如下:
<div class="login-default">
<div class="from-input-block" style="z-index:8">
<div class="input-text user">
<input class="text" type="text" value="請輸入手機號/用戶名">
<input data-input="user-id" class="box" type="text" maxlength="20" value="">
</div>
<div class="input-tips">
<div class="tips-block">
<i class="tips-tri"></i>
<i class="tips-warn"></i>
<span class="tips-text">帳號或密碼錯誤,請重新輸入</span>
</div>
</div>
</div>
<div class="from-input-block" style="z-index:7">
<div class="input-text password">
<input class="text" type="text" value="請輸入密碼">
<input data-input="user-pwd" class="box" type="password" maxlength="20" value="">
</div>
没有ID和NAME那只能遍历了找出下标再赋值了
var
i: Integer;
ole: oleVariant;
begin
ole := wb1.OleObject.document.all;
for i := 0 to ole.length - 1 do
begin
if ole.item(i).tagName = 'INPUT' then // INPUT一定要大写
begin
ole.item(i).value := IntToStr(i);
end;
end;
end;
一个问题要注意,input在div里面的时候,需要递归遍历一下div。否则找不到div里面的input。
你这种设计感觉有问题,为什么小蜜蜂论坛发帖机不加上ID或name标签?
网页内容多的情况下vbscript脚本会占cpu的。