#include <IE.au3> 小弟不才,无法提交表单
本帖最后由 dgmax 于 2009-5-6 17:00 编辑以下网页源代码
---------------------------
</script>
<script language='javascript'>
function subm()
{
if (document.getElementById("logU").value=="")
{
alert("用户名不能为空……")
document.getElementById("logU").focus();
return false;
}
else if(document.getElementById("pasW").value=="")
{
alert("密码不能为空……")
document.getElementById("pasW").focus();
return false;
}
else
{
name=document.getElementById("logU").value;
pasw=document.getElementById("pasW").value;
re1=/\d+/g;
re2=/|/g;
re3=/\W+/g;
num1=pasw.toString().search(re1);
num2=pasw.toString().search(re2);
num3=pasw.toString().search(re3);
num4=pasw.toString().length;
if (num1==-1 || num2==-1 || num3==-1 ||num4<6)
{
alert("你的密码中不符合集中登录系统的密码规则,建议遵循密码规则尽快修改你的\n\n密码,欲了解密码规则,请登录后查看弹出窗口。");
return true;
}
else
{
return true;
}
//window.location="http://10.16.132.119/jzdl/default.asp?name="+name+"&pasw="+pasw;
}
}
----------------------------------------
$oForm = _IEFormGetObjByName($oIE, "subm")
$oQuery =_IEFormElementGetObjByName ($oForm, "logU")
_IEFormElementSetValue ($oQuery, "张三")
$oQuery =_IEFormElementGetObjByName ($oForm, "pasW")
_IEFormElementSetValue ($oQuery, "Zz123456~")
$oQuery =_IEFormImageClick ($oForm,"提交")
_IEAction($oQuery,"click") 多谢JHWL同志 的检测表单工具
页:
[1]