vb自动提交onClick表单???

wwwyi13cn 2009-08-11 09:34:46
VB如何自动提交以下表单?重要是模拟点击"登陆"



<form name="ActionForm" method="post" action="/ecrm/login.do">

<TD height="140" valign="top">
<font class="font">请输入您的用户名及密码</font>
<br>
<font color="#FF0000"></font><br>
<TABLE cellpadding="0" cellspacing="0">
<TR>
<TD class="td">用户帐号:</TD><TD class="td"><input name="userName" type="text" value="" id="userName"></TD>
</TR>
<TR>
<TD class="td">登录密码:</TD><TD class="td"><input name="password" type="password" value="" id="password"></TD>
>
<TD><img src="/ecrm/ui/def/images/login.png"
id="login" onClick="if(check()) document.ActionForm.submit();" style="cursor:hand">
  <img src="/ecrm/ui/def/images/reset.png"
id="reset" onClick="resetAll();" style="cursor:hand"></TD>
</TR>

</form>







...全文
184 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
ylj361800875 2010-05-25
  • 打赏
  • 举报
回复
Dim Obj As Object
Set Obj = WebBrowser1.Document
Obj.All.userName.Value = Text1.Text
Obj.All.password.Value = Text2.Text
Obj.All.login.Click
不知道行不
CJM0211 2010-01-14
  • 打赏
  • 举报
回复
我也碰到类似的问题了,刚发了个帖子等高手解决
toury 2009-08-12
  • 打赏
  • 举报
回复
WebBrowser1.Document.ActionForm.login.click
wwwyi13cn 2009-08-11
  • 打赏
  • 举报
回复
WebBrowser控件
zzyong00 2009-08-11
  • 打赏
  • 举报
回复
IE.Document.Forms("ActionForm").elements("userName").value = "admin"
IE.Document.Forms("ActionForm").elements("password").value = "123456"
IE.Document.Forms("ActionForm").submit
tonyones 2009-08-11
  • 打赏
  • 举报
回复
WebBrowser控件里的吗
SYSSZ 2009-08-11
  • 打赏
  • 举报
回复
WebBrowser1.Document.Forms("ActionForm").submit行吗?这是哪个页面?贴出来可测试.
lxq19851204 2009-08-11
  • 打赏
  • 举报
回复
IE.Document.Forms("ActionForm").elements("userName").value = "admin"
IE.Document.Forms("ActionForm").elements("password").value = "123456"
IE.Document.Forms("ActionForm").submit

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧