求助网页自动登陆

userlong · 发表于 2008-11-22 10:03:35

我的网页代码是这样的如何实现自动登陆？
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<HTML><HEAD><TITLE>Drcom上网登录窗</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<STYLE>A {
TEXT-DECORATION: none
}
.f1 {
FONT-SIZE: 9pt; LINE-HEIGHT: 14pt; FONT-FAMILY: Verdana
}
.f2 {
FONT-SIZE: 8pt; LINE-HEIGHT: 12pt; FONT-FAMILY: Verdana
}
</STYLE>

<META content="MSHTML 6.00.2900.5583" name=GENERATOR></HEAD>
<BODY>
<FORM name=form1 action="" method=post>
<CENTER>
<TABLE height="80%" width=600 border=0>
  <TBODY>
  <TR>
<TD height="100%">
   <DIV align=center>
   <CENTER>
   <TABLE style="BORDER-COLLAPSE: collapse" borderColor=#111111 height=397
   cellSpacing=0 cellPadding=0 width=450 bgColor=#ffffff border=0>
      <TBODY>
      <TR>
      <TD width=450 colSpan=2 height=60>
         <P align=center><IMG height=44 src="Drcom上网登录窗.files/4.gif"
         width=350 border=0></P></TD></TR>
      <TR>
      <TD width=450 colSpan=2 height=70>
         <DIV align=center><FONT color=#000000 font
         ;>需登录用户请使用（房间号）+@+（酒店代码）登录，例：808@DrCOM。如有疑问请与总台联系，谢谢！ </FONT></DIV>
         <DIV style="WIDTH: 450px; HEIGHT: 20px" align=center><FONT
         color=#000000 font ;></FONT></DIV></TD></TR>
      <TR>
      <TD class=f1 align=right width=450 bgColor=#94a9be colSpan=2
height=28>
         <P class=f1 align=center><FONT
      color=#ffffff>请输入您的帐号和密码</FONT></P></TD></TR>
      <TR>
      <TD class=f1 align=right width=205 bgColor=#d3dce4 height=65>帐号
         Account :</TD>
      <TD class=f1 width=245 bgColor=#d3dce4 height=65>
         <P> <INPUT
         style="BORDER-RIGHT: #999999 1px solid; BORDER-TOP: #999999 1px solid; FONT-SIZE: 9pt; BACKGROUND: #ffffff; BORDER-LEFT: #999999 1px solid; COLOR: #000000; BORDER-BOTTOM: #999999 1px solid; FONT-FAMILY: verdana; 1px: "
         maxLength=26 name=DDDDD></P></TD></TR>
      <TR>
      <TD class=f1 align=right width=205 bgColor=#d3dce4 height=15>密码
         Password :</TD>
      <TD class=f1 width=245 bgColor=#d3dce4 height=15>
         <P> <INPUT
         style="BORDER-RIGHT: #999999 1px solid; BORDER-TOP: #999999 1px solid; FONT-SIZE: 9pt; BACKGROUND: #ffffff; BORDER-LEFT: #999999 1px solid; COLOR: #000000; BORDER-BOTTOM: #999999 1px solid; FONT-FAMILY: verdana; 1px: "
         type=password maxLength=16 name=upass></P></TD></TR>
      <TR>
      <TD width=450 bgColor=#d3dce4 colSpan=2 height=35>
         <P class=f1 align=center><INPUT type=checkbox value=1 name=0><FONT
         color=#1c6db7> </FONT>我使用VPN</P></TD></TR>
      <TR>
      <TD width=450 bgColor=#d3dce4 colSpan=2 height=44>
         <P align=center><INPUT style="BORDER-RIGHT: rgb(23,24,79) 1px solid; BORDER-TOP: rgb(194,217,227) 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: rgb(139,141,218) 1px solid; WIDTH: 100px; COLOR: rgb(255,255,255); BORDER-BOTTOM: rgb(100,130,160) 1px solid; FONT-FAMILY: Verdana; HEIGHT: 25px; BACKGROUND-COLOR: rgb(105,130,150)" type=submit value="登录 Login" name=0MKKey>   
<INPUT style="BORDER-RIGHT: rgb(23,24,79) 1px solid; BORDER-TOP: rgb(194,217,227) 1px solid; FONT-SIZE: 9pt; BORDER-LEFT: rgb(139,141,218) 1px solid; WIDTH: 100px; COLOR: rgb(255,255,255); BORDER-BOTTOM: rgb(23,24,79) 1px solid; FONT-FAMILY: Verdana; HEIGHT: 25px; BACKGROUND-COLOR: rgb(105,130,150)" type=reset value="重置 Reset" name=1MKKey></P></TD></TR>
      <TR>
      <TD width=450 bgColor=#94a9be colSpan=2 height=31>
         <P class=f1 align=center><A href="http://218.85.148.22/9.htm"><FONT
         color=#ffffff>修改密码 Edit Password</FONT></A></P></TD></TR>
      <TR>
      <TD width=450 bgColor=#d3dce4 colSpan=2 height=43>
         <P class=f2 align=center><FONT size=1><BR></FONT>© 2006 <A
         href="http://www.doctorcom.com/" target=_blank>CITY HOTSPOT</A>. All
         Rights
  Reserved. </P></TD></TR></TBODY></TABLE></CENTER></DIV></TD></TR></TBODY></TABLE></CENTER></FORM></BODY></HTML>

userlong · 发表于 2008-11-22 11:19:16

怎么没人来呢

qin147 · 发表于 2008-11-22 11:39:34

没研究过网页这块的

userlong · 发表于 2008-11-23 08:36:51

还是没人来帮我解决我自己解决吧！随便发结果

#include <IE.au3>

$oIE = _IECreate("URL",0,1,1,1 )

_IELoadWait ($oIE)

$UserName = _IEGetObjById ($oIE, "DDDDD")
If IsObj($UserName) Then $UserName.value = "帐号"
$PassWord = _IEGetObjById ($oIE, "upass")
If IsObj($PassWord) Then $PassWord.value = "密码"
$submit = _IEGetObjByName ($oIE, "0MKKey")
If IsObj($submit) Then $submit.click

liongodmien · 发表于 2008-11-24 16:56:06

呵呵，自己动手丰衣足食

		自动登录	找回密码
密码			加入

求助 网页自动登陆

相关帖子

求助网页自动登陆