- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 直接登陆邮箱 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=17395)
-- 发布时间：2012/3/12 14:30:00
-- 直接登陆邮箱
能打开邮箱并能填入用户名和密码，要点击确定方可进入，同时FOXTABEL会弹出一个错误窗口。
以下代码要如何修改？
Dim OjbIe As Object = CreateObject("InternetExplorer.Application")
With OjbIe
.Visible = True
.Navigate("http://reg.163.com/")
Application.DoEvents
Do While .Busy
Application.DoEvents
Loop
Dim DoM As Object = .Document
With DoM
.getElementById("userName").Value = "wangliang1618@163.com"
.getElementById("password").Value = "wl24715858"
.getElementById("loginform").submit
End With
.Visible = True
End With
此主题相关图片如下：1.jpg
此主题相关图片如下：2.jpg
-- 发布时间：2012/3/12 14:54:00
--
有人回吗？
-- 发布时间：2012/3/12 15:06:00
--
看看问题出在哪一行：
http://www.foxtable.com/help/topics/1485.htm
-- 发布时间：2012/3/12 15:31:00
--
现在可以直接进去了，但还是会弹出错误窗口，麻烦一下，我查不到，请帮忙修改一下！！
-- 发布时间：2012/3/12 15:53:00
--
我也不会的
-- 发布时间：2012/3/12 21:12:00
-- 时段数据怎么从Excel表格批量复制
Dim Proc As New Process
Proc.File=https://reg.163.com/logins.jspusername=wangliang1618@163.com&password=wl24715858&Type=1&url=http://fm163.163.com/coremail/fcg/ntesdoor2?
Proc.Start()
-- 发布时间：2012/3/12 22:09:00
--
Dim Proc As New Process
Proc.File=https://reg.163.com/logins.jspusername=wangliang1618@163.com&password=wl24715858&Type=1&url=http://fm163.163.com/coremail/fcg/ntesdoor2?
Proc.Start()
这个代码也不行呀，请高手指点！
-- 发布时间：2012/3/13 8:04:00
--
一直在使用中，你给的邮箱密码是错的
-- 发布时间：2012/3/13 9:05:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目254.table |
-- 发布时间：2012/3/13 9:34:00
--
呵呵，学习.