找回密码
 加入
搜索
AUTOIT CN»论坛 › AU3交流 › 『 提问交流 』 › 帮忙实现 填写这个表单
返回列表 发新帖
查看: 8318|回复: 9

[IE类操作] 帮忙实现 填写这个表单

 火 [复制链接]
godsky
发表于 2014-6-12 11:11:18 | 显示全部楼层 |阅读模式
本帖最后由 godsky 于 2014-6-12 19:06 编辑

网页代码：
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0115)http://10.87.62.59:9080/ess/wpm/Plan.do -->
<!--
检索条件
AUTHOR：james.jiang 
DATE：2007-7-23
--><HTML><HEAD>
<META content="text/html; charset=gb2312" http-equiv=Content-Type><LINK 
rel=stylesheet type=text/css href="Plan_files/eoms.css">
<SCRIPT language=javascript type=text/javascript 
src="Plan_files/WdatePicker.js"></SCRIPT>

<FORM encType=multipart/form-data method=post name=form1 
action=/ess/wpm/Plan.do?op=saveMyLog><INPUT value=muti type=hidden 
name=editFlag><INPUT value=2014 type=hidden name=year><INPUT value=6 type=hidden 
name=month><INPUT value=11 type=hidden name=day><INPUT value=159032504 
type=hidden name=planid>
<META name=GENERATOR content="MSHTML 8.00.6001.23588"></HEAD>
<BODY><SPAN style="COLOR: #ff0000"></SPAN>
<TABLE class=table-table width="100%">
  <TBODY>
  <TR>
    <TD class=table-lable_title width=150>网络类型</TD>
    <TD width=200>电源 
    <TD class=table-lable_title width=150>网元类别</TD>
    <TD width=200>环境</TD></TR>
  <TR>
    <TD class=table-lable_title>主题名称</TD>
    <TD colSpan=3>核心作业计划 </TD></TR>
  <TR>
    <TD class=table-lable_title>计划名称</TD>
    <TD colSpan=3>2014年核心作业计划）</TD>
  <TR>
    <TD class=table-lable_title>执行部门</TD>
    <TD colSpan=3>电源班</TD>
  <TR>
    <TD class=table-lable_title>计划时间</TD>
    <TD colSpan=3>2014-06-11</TD></TR></TBODY></TABLE>
<TABLE class=table-table align=center>
  <TBODY></TBODY></TABLE><BR>
<TABLE class=table-table align=center>
  <TBODY>
  <TR>
    <TD class=table-list_title width="10%" align=middle>序号</TD>
    <TD class=table-list_title width="20%" align=middle>执行项名称</TD>
    <TD class=table-list_title width="10%" align=middle>周期</TD>
    <TD class=table-list_title width="12%" align=middle>执行人</TD>
    <TD class=table-list_title width="10%" align=middle>内容</TD>
    <TD class=table-list_title width="10%" align=middle>备注</TD>
    <TD class=table-list_title width="28%" colSpan=2 align=middle>附件</TD></TR>
  <TR>
    <TD>
      <DIV align=center>1</DIV>
    <TD>检查LSC-FSU传输网络工作状态 </TD>
    <TD>
      <DIV align=center>天 </DIV><INPUT value=199463877 type=hidden name=logid> 
    </TD>
    <TD>
      <DIV align=center>邓</DIV></TD>
    <TD><INPUT maxLength=100 size=10 name=content> </TD>
    <TD><INPUT maxLength=500 name=remark> </TD>
    <TD colSpan=2>
      <TABLE border=0 cellSpacing=0 cellPadding=0 width="100%">
        <TBODY>
        <TR>
          <TD width="6%"><INPUT id=attach disabled value=0 type=checkbox> 
          <TD width="40%"><INPUT 
            style="BORDER-BOTTOM: #6699cc 1px solid; BORDER-LEFT: #6699cc 1px solid; HEIGHT: 19px; FONT-SIZE: 12px; BORDER-TOP: #6699cc 1px solid; BORDER-RIGHT: #6699cc 1px solid" 
            id=file0 size=15 type=file name=file(0)> </TD>
          <TD width="50%"><INPUT type=hidden name=delfile> <INPUT id=oldfile 
            type=hidden name=oldfile> </TD></TR></TBODY></TABLE></TD></TR>
  <TR>
    <TD>
      <DIV align=center>2</DIV>
    <TD>检查数据库连接用户 </TD>
    <TD>
      <DIV align=center>天 </DIV><INPUT value=199463748 type=hidden name=logid> 
    </TD>
    <TD>
      <DIV align=center>邓</DIV></TD>
    <TD><INPUT  maxLength=100 size=10 name=content> </TD>
    <TD><INPUT maxLength=500 name=remark> </TD>
    <TD colSpan=2>
      <TABLE border=0 cellSpacing=0 cellPadding=0 width="100%">
        <TBODY>
        <TR>
          <TD width="6%"><INPUT id=attach disabled value=0 type=checkbox> 
          <TD width="40%"><INPUT 
            style="BORDER-BOTTOM: #6699cc 1px solid; BORDER-LEFT: #6699cc 1px solid; HEIGHT: 19px; FONT-SIZE: 12px; BORDER-TOP: #6699cc 1px solid; BORDER-RIGHT: #6699cc 1px solid" 
            id=file0 size=15 type=file name=file(1)> </TD>
          <TD width="50%"><INPUT type=hidden name=delfile> <INPUT id=oldfile 
            type=hidden name=oldfile> </TD></TR></TBODY></TABLE></TD></TR>
  <TR>
    <TD>
      <DIV align=center>3</DIV>
    <TD>业务台、打印机的工作状态 </TD>
    <TD>
      <DIV align=center>天 </DIV><INPUT value=199463639 type=hidden name=logid> 
    </TD>
    <TD>
      <DIV align=center>邓</DIV></TD>
    <TD><INPUT  maxLength=100 size=10 name=content> </TD>
    <TD><INPUT maxLength=500 name=remark> </TD>
    <TD colSpan=2>
      <TABLE border=0 cellSpacing=0 cellPadding=0 width="100%">
        <TBODY>
        <TR>
          <TD width="6%"><INPUT id=attach disabled value=0 type=checkbox> 
          <TD width="40%"><INPUT 
            style="BORDER-BOTTOM: #6699cc 1px solid; BORDER-LEFT: #6699cc 1px solid; HEIGHT: 19px; FONT-SIZE: 12px; BORDER-TOP: #6699cc 1px solid; BORDER-RIGHT: #6699cc 1px solid" 
            id=file0 size=15 type=file name=file(2)> </TD>
          <TD width="50%"><INPUT type=hidden name=delfile> <INPUT id=oldfile 
            type=hidden name=oldfile> </TD></TR></TBODY></TABLE></TD></TR>
  <TR>
    <TD>
      <DIV align=center>4</DIV>
    <TD>系统服务器CPU、内存、空间使用状况 </TD>
    <TD>
      <DIV align=center>周 </DIV><INPUT value=199463805 type=hidden name=logid> 
    </TD>
    <TD>
      <DIV align=center>邓</DIV></TD>
    <TD><INPUT  maxLength=100 size=10 name=content> </TD>
    <TD><INPUT maxLength=500 name=remark> </TD>
    <TD colSpan=2>
      <TABLE border=0 cellSpacing=0 cellPadding=0 width="100%">
        <TBODY>
        <TR>
          <TD width="6%"><INPUT id=attach disabled value=0 type=checkbox> 
          <TD width="40%"><INPUT 
            style="BORDER-BOTTOM: #6699cc 1px solid; BORDER-LEFT: #6699cc 1px solid; HEIGHT: 19px; FONT-SIZE: 12px; BORDER-TOP: #6699cc 1px solid; BORDER-RIGHT: #6699cc 1px solid" 
            id=file0 size=15 type=file name=file(3)> </TD>
          <TD width="50%"><INPUT type=hidden name=delfile> <INPUT id=oldfile 
            type=hidden name=oldfile> </TD></TR></TBODY></TABLE></TD></TR>
  <TR>
    <TD>
      <DIV align=center>5</DIV>
    <TD>系统日志检查 </TD>
    <TD>
      <DIV align=center>周 </DIV><INPUT value=199463819 type=hidden name=logid> 
    </TD>
    <TD>
      <DIV align=center>邓</DIV></TD>
    <TD><INPUT  maxLength=100 size=10 name=content> </TD>
    <TD><INPUT maxLength=500 name=remark> </TD>
    <TD colSpan=2>
      <TABLE border=0 cellSpacing=0 cellPadding=0 width="100%">
        <TBODY>
        <TR>
          <TD width="6%"><INPUT id=attach disabled value=0 type=checkbox> 
          <TD width="40%"><INPUT 
            style="BORDER-BOTTOM: #6699cc 1px solid; BORDER-LEFT: #6699cc 1px solid; HEIGHT: 19px; FONT-SIZE: 12px; BORDER-TOP: #6699cc 1px solid; BORDER-RIGHT: #6699cc 1px solid" 
            id=file0 size=15 type=file name=file(4)> </TD>
          <TD width="50%"><INPUT type=hidden name=delfile> <INPUT id=oldfile 
            type=hidden name=oldfile> </TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
<TABLE class=table-table align=center>
  <TBODY>
  <TR>
    <TD class=table-lable_title colSpan=8>带智能巡检标记的自动填写条目</TD></TR>
  <TR>
    <TD class=table-list_title width="10%" align=middle>序号</TD>
    <TD class=table-list_title width="20%" align=middle>执行项名称</TD>
    <TD class=table-list_title width="10%" align=middle>周期</TD>
    <TD class=table-list_title width="12%" align=middle>执行人</TD>
    <TD class=table-list_title width="10%" align=middle>内容</TD>
    <TD class=table-list_title width="10%" align=middle>备注</TD>
    <TD class=table-list_title width="28%" colSpan=2 
  align=middle>附件</TD></TR></TBODY></TABLE><BR>
<DIV class=table-button><INPUT id=submit class=clsbtn2 onclick="return check()" value=提交 type=submit name=button> 
<INPUT id=transmit class=clsbtn2 onclick="javascript:parent.parent.GB_myShowClose2('0');" value=关闭 type=button name=button> 
</DIV><BR><!-- 
<br>
<div class="table-button">  
  <INPUT id=transmit type=button Class="clsbtn2" value=关闭  name=button Onclick="javascript:parent.parent.GB_myShowClose();">
</div>
 -->
<TABLE class=table-table>
  <TBODY>
  <TR>
    <TD class=table-list_title colSpan=2 noWrap align=left>已派工单列表</TD></TR>
  <TR>
    <TD width="20%">
      <DIV align=center>序号</DIV></TD>
    <TD width="80%">
      <DIV align=center>工单号</DIV></TD></TR></TBODY></TABLE></FORM><BR>
<SCRIPT type=text/javascript>
var editFlag = "muti";
function check()
{
        if(editFlag == "single")
        {
                return checkOne();
        }
        else
        {
                return checkMuti();
        }
}

function checkOne()
{
        form1.content.value = trim(form1.content.value);
        if(trim(form1.content.value) == "")
        {
/*
                alert("请填写内容!");
                form1.content.focus();
                return false;
*/
        }
        else
        {
                if(form1.attach.value == '1' && trim(form1.file0.value) == "" )
                {
                        if( trim(form1.oldfile.value)!="" && trim(form1.delfile.value)!= "")
                        {
                                alert("请填写附件！");
                                form1.file0.focus();
                                return false;
                        }                
                        if( trim(form1.oldfile.value)==""  )                
                        {
                                alert("请填写附件！");
                                form1.file0.focus();
                                return false;
                        }
                }
        }

        return true;
}

function checkMuti()
{
        var lg = form1.content.length;
        for(var i=0;i<lg;i++)
        {
                form1.content[i].value = trim(form1.content[i].value);
                if(trim(form1.content[i].value) == "")
                {
/*
                        alert("请填写内容!");
                        form1.content[i].focus();
                        return false;
*/
                }
                else
                {
                        if(form1.attach[i].value == '1' && trim(form1.file0[i].value) == "" )
                        {
                                if( trim(form1.oldfile[i].value)!="" && trim(form1.delfile[i].value)!= "")
                                {
                                        alert("请填写附件！");
                                        form1.file0[i].focus();
                                        return false;
                                }                
                                if( trim(form1.oldfile[i].value)==""  )                
                                {
                                        alert("请填写附件！");
                                        form1.file0[i].focus();
                                        return false;
                                }
                        }
                }
        
        }
        return true;

}

function dleattid(id)
{
  document.getElementById(id).style.display='none';
  document.getElementById('delfile'+id).value=id;
}
function resetAttId(id)
{
  document.getElementById(id).value = '';
}

function trim(s) {
  return s.replace( /^\s*/, "" ).replace( /\s*$/, "" );
}
</SCRIPT>
</BODY></HTML>
因是内部网只能给出 网页编码：
帮忙 实现在“内容”列 填写“正常”，实现提交就ok了（行数不固定 ，有时候是3行 有时候是 5行）， ，

看了网上大侠们写的autoit自动填表程序 ，可是发现这个网页查询了该网页只有一个表单 form1  表单元素 下却有好几个重名的content 导致我无法实现填表，所以不知道如何模仿 填写这个表格，
求教
我的程序：
#include <IE.au3>

$oIE = _IECreate("http://10.87.62.59:9080/ess/wpm/Plan.do?op=getAllMyEntryLog&editFlag=muti&year=2014&month=6&day=11&planid=159032504")  ;这个事内网网址 网页文件如代码1

$oForm = _IEFormGetObjByName ($oIE, "form1")
$oQuery = _IEFormElementGetObjByName ($oForm, "content")
_IEFormElementSetValue ($oQuery, "AutoIt IE.au3")
content, javascript, method, PUBLIC, 网页

本帖子中包含更多资源

您需要 登录 才可以下载或查看，没有账号？加入

×

相关帖子
回复

举报

Au3代码高亮发贴标签： [AU3] 你的代码 [/AU3]                   支持论坛的发展，请添加此》》网址导航《《为您的主页          
zxhou1
发表于 2014-6-12 13:09:22 | 显示全部楼层
给你点思路，参考“www378660084”大神思密达的“使用JQuery,用js操作网页,使网页操作变得极其简单”。
传送门：
http://61.153.183.105/forum.php? ... mp;highlight=jquery
回复

举报

godsky
 楼主| 发表于 2014-6-12 13:16:31 | 显示全部楼层
本帖最后由 godsky 于 2014-6-12 21:52 编辑

大神 我是菜牛没看懂啊 求直接给个答案呗呵呵！
我用代码
$oQuery = _IEFormElementGetCollection ($oForm, 6)
_IEFormElementSetValue ($oQuery, "正常")
能够填写表单，但是就是不知道如何判断表单中行数量，继续求教大神？
或者如何获取我所给出的html源码中form1.content.length 的值，有了该值我就可以循环填写表格
回复

举报

godsky
 楼主| 发表于 2014-6-12 22:24:01 | 显示全部楼层
自己解决了  这论坛人气不旺啊
#include <IE.au3>

#include <IE.au3>
#include <Array.au3>

Dim $FormArray[500][2]

$oIE = _IECreate ("http://10.87.62.59:9080/ess/wpm/Plan.do?op=getAllMyEntryLog&editFlag=muti&year=2014&month=6&day=15&planid=159032504")
$oForm = _IEFormGetCollection ($oIE,0)
 $oQuerys = _IEFormElementGetCollection ($oForm)
$j=0  ;统计填写行
    For $Query In $oQuerys

                if $Query.name="content" then
                   $j+=1
                   endif

;~     MsgBox(0, "", "名称:"&$Query.name & " 类型:"&$Query.type)
   Next
   MsgBox(0,"fgf","&j="&$j)
        for $i=0 to $j step 1
       $oQuery = _IEFormElementGetCollection ($oForm, 6+7*$i)
      _IEFormElementSetValue ($oQuery, "ok")
Next
回复

举报

godsky
 楼主| 发表于 2014-6-12 22:24:05 | 显示全部楼层
自己解决了  这论坛人气不旺啊
#include <IE.au3>

#include <IE.au3>
#include <Array.au3>

Dim $FormArray[500][2]

$oIE = _IECreate ("http://10.87.62.59:9080/ess/wpm/Plan.do?op=getAllMyEntryLog&editFlag=muti&year=2014&month=6&day=15&planid=159032504")
$oForm = _IEFormGetCollection ($oIE,0)
 $oQuerys = _IEFormElementGetCollection ($oForm)
$j=0  ;统计填写行
    For $Query In $oQuerys

                if $Query.name="content" then
                   $j+=1
                   endif

;~     MsgBox(0, "", "名称:"&$Query.name & " 类型:"&$Query.type)
   Next
   MsgBox(0,"fgf","&j="&$j)
        for $i=0 to $j step 1
       $oQuery = _IEFormElementGetCollection ($oForm, 6+7*$i)
      _IEFormElementSetValue ($oQuery, "ok")
Next
回复

举报

ak47gglllk
发表于 2014-6-14 08:53:35 | 显示全部楼层
额，大神你好，我是来拿分的，再见大神。你写的东西，俺收藏了。
回复

举报

www378660084
发表于 2014-6-14 18:01:39 | 显示全部楼层 

;jquery可以自己去官网下载
#include<IE.au3>
Global $oIE = _IECreate("http://192.168.0.86/")
js($oIE,FileRead("jquery-1.6.1.min.js"))

js($oIE,"$('input[name=""content""]').val('正常')")
js($oIE,"$('#submit').click()")

Func js($ie,$script)
        $ie.document.parentWindow.execscript("window.ScriptReturn=" & $script)
        Return $ie.document.script.ScriptReturn
EndFunc
回复

举报

godsky
 楼主| 发表于 2014-6-23 17:30:21 | 显示全部楼层
回复 7# www378660084
谢谢  ！已经在学习你给的方法了
回复

举报

godsky
 楼主| 发表于 2014-6-24 21:09:57 | 显示全部楼层
回复 7# www378660084

帮忙看看这个
http://www.autoitx.com/thread-44618-1-1.html
回复

举报

wangms
发表于 2014-6-26 16:37:52 | 显示全部楼层
进来学习..............................
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-12-23 20:37 , Processed in 0.199335 second(s), 22 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表