xymc 发表于 2015-4-29 14:29:41

TOM邮箱自动找不到表单信息(已解决)

本帖最后由 xymc 于 2015-5-14 15:08 编辑

#include <IE.au3>
$username = "qwe123"
dim $passwd = "a123456"

$oIE = _IECreate ("http://mail.sz.tom.com/webmail/login/index.action")
$oForm = _IEFormGetObjByName ($oIE, "xxx");就是这里找不到表单信息
$ouser = _IEFormElementGetObjByName ($oForm, "username")
$opasswd = _IEFormElementGetObjByName ($oForm, "password")
_IEFormElementSetValue ($ouser, $username)
_IEFormElementSetValue ($opasswd, $passwd)

以前是我看帮助写的TOM邮箱自动登陆,但不行,找不到表的名称
请教下大家怎么搞
这个网页源码里面我找不到表单信息

cutyourchicken 发表于 2015-4-29 14:57:21

你用360极速浏览器按F12 再找找

xymc 发表于 2015-4-29 15:18:32

回复 2# cutyourchicken

<!--以下TOM邮箱登录页头部区域,包含LOGO、顶部导航-->
      <div class="header">
              <div class="headCon">
                    <h1><a href="http://web.mail.tom.com/"><img src="/webmail-static/images/tom.com/logo.png" /></a></h1>
                <div class="topNav"><a href="http://www.tom.com/">TOM首页</a><span>|</span><a href="http://vip.tom.com/" target="_blank">VIP邮箱</a><span>|</span><a href="http://cmail.tom.com/" target="_blank">企业邮箱</a><span>|</span><a href="/webmail-static/help/tomcom/index.html" target="_blank">帮助中心</a></div>
                <div class="clear"></div>
            </div>
      </div>
      <!--以上TOM邮箱登录页头部区域,包含LOGO、顶部导航-->      
      
      <!--以下TOM邮箱登录页主体功能区域,包含banner、登录框 background:url(banner_1.png) no-repeat 47% top;-->
      <div class="main" >
              <div class="mainCon" >   
                        <div style="" id="theme"><a hidefocus="true" target="_blank" href="http://pk.tom.com/web/flashplay.do?action=androiddownload&androidgameid=1291" style="position: absolute; width: 1000px; height:425px; left: 0px; top: 0px; cursor: pointer;"></a></div>
                       
                          <div class="themeCtrl">
                        <a id="prevTheme"onClick="fPrevTheme()" title="上一张"></a>
                        <a id="nextTheme"onClick="fNextTheme()" title="下一张"></a>
                </div>
                    <div class="loginBox fr" >
                        <div class="loginTitle" >免费邮箱登录</div>       
                  
                  <div class="loginCon" >
                          <form>
                        <div class="loginLine mt0">
                            <div class="inputBox inputBox1">
                            <input type="text" id="username" name="username" class="inputText" value="用户名" onFocus="if (value =='用户名'){value =''}" onBlur="if (value ==''){value='用户名'}" title="请输入邮箱账号" />
                                                        <span class="emailEnd">@tom.com</span>
                            </div>
                        </div>
                        
                        <div class="loginLine">
                            <div class="inputBox inputBox2">
                            <!--<input type="password" class="inputText" id="password" name="password" title="请输入邮箱密码" /> -->
                            <input type="password" name="password" id="password" class="inputText" style="display:none;">
                                                        <input type="type" id="password3_$loginhash" class="inputText"name="hidenpassword" value='密码' title="请输入邮箱密码" />
                            </div>
                        </div>
                        
                        
                        
                        <div class="forget">
                            <span class="fr"><a href="/webmail/password/index.action">忘记密码?</a></span>
                                <input type="checkbox" name="chkAddress" id="chkAddress" value="y" checked="true"/>记住帐号
                        </div>
                        <div><div id="tip" class="fl ml10 "></div></div>
                                                <a href="#" id="login">登录</a>
                        <p>>>还没有TOM邮箱</p>
                        <div class="button">
                                <div class="fr"><a href="/webmail/register/index.action" id="reg">忘记密码</a></div>
                            <div class="clear"></div>
                        </div>
                        </form>
                  </div>
                  
                  <div class="loginList">
                          <h2>全新TOM邮箱</h2>
                        <ul>
                                         <li><a target="_blank" href="http://web.mail.tom.com/onlineQA/index.action?eamilTypeMark=freeEmail" >&nbsp;TOM在线答疑</a>&nbsp;</li>
                                                <li><a style="color:#f00;" target="_blank" href="http://web.mail.tom.com/webmail-static/help/tomcom/upgrade.html" >&nbsp;TOM邮箱常见问题</a></li>
                                               
                                                <!-- <li><a style="color:#f00;" target="_blank" href="http://web.mail.tom.com/webmail-static/help/tomcom/upgrade.html" >&nbsp; TOM邮箱升级常见问题!</a></li> -->
                                        </ul>
                  </div>
                                        <div class="alpha-layout" ></div>
                </div>
                               
                <div class="clear"></div>
            </div>
      </div>
      <!--以上TOM邮箱登录页主体功能区域,包含banner、登录框-->

你找找看,我没有找到

shqf 发表于 2015-4-29 19:59:28

看标签<form>里本没有name属性,你怎能找到?
找其name是为了获得form的对象,可获得对象不仅仅只有从name属性去获得这么 一种方法呀。

xin266 发表于 2015-5-1 07:39:30

可以用火车浏览器 哦

xlj310 发表于 2015-5-11 09:21:12

其实填写表单不一定要获取到form,有控件id就可以填写。你这个网页登录我给你写出了代码,记得给好评哦,亲!!!

#include <IE.au3>
Dim $username = "这是用户名", $passwd = "这是密码"

$oIE = _IECreate("http://mail.sz.tom.com/webmail/login/index.action")
$ouser = _IEGetObjById($oIE, "username")
$opasswd = _IEGetObjById($oIE, "password3_$loginhash")
$ouser.focus
$ouser.value = $username
$opasswd.focus
$opasswd = _IEGetObjById($oIE, "password")
$opasswd.value = $passwd
$oLogin = _IEGetObjById($oIE, "login")
$oLogin.click

xlj310 发表于 2015-5-11 09:21:14

其实填写表单不一定要获取到form,有控件id就可以填写。你这个网页登录我给你写出了代码,记得给好评哦,亲!!!

#include <IE.au3>
Dim $username = "这是用户名", $passwd = "这是密码"

$oIE = _IECreate("http://mail.sz.tom.com/webmail/login/index.action")
$ouser = _IEGetObjById($oIE, "username")
$opasswd = _IEGetObjById($oIE, "password3_$loginhash")
$ouser.focus
$ouser.value = $username
$opasswd.focus
$opasswd = _IEGetObjById($oIE, "password")
$opasswd.value = $passwd
$oLogin = _IEGetObjById($oIE, "login")
$oLogin.click

xymc 发表于 2015-5-14 15:07:57

回复 7# xlj310


非常感谢,爱教了
页: [1]
查看完整版本: TOM邮箱自动找不到表单信息(已解决)