Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]关闭指定标签页


  共有4321人关注过本帖树形打印复制链接

主题：[求助]关闭指定标签页
帅哥哟，离线，有人找我吗？
chnfo
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2202 积分：18130 威望：0 精华：0 注册：2011/11/26 20:21:00 		[求助]关闭指定标签页  发帖心情 Post By：2016/4/4 20:55:00 [显示全部帖子]

showAppWindow方法可以关闭窗口。有什么方法可以关闭指定网址的标签页？

 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2202 积分：18130 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2016/4/5 10:45:00 [显示全部帖子]

很难说清楚，终于有网络可以上了。上传个附件，狐友们指教
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:延时打开网页.rar
 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2202 积分：18130 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2016/4/5 15:39:00 [显示全部帖子]

袍兄，实际验证情况如下：
static i As Integer = 1
static idx As Integer = 1
If i > 6 Then                      ‘加入的这段代码本来是希望如果打开的页面超过6个就自动关闭第一个，但实际上所有的网页都会打开不会关闭任何一个，如果网页多的话，CPU会迅速到100%，内存也会用光
    If vars("ies").count > 0 Then
        vars("ies")(0).Visible = False
        vars("ies").RemoveAt(0)
    End If
End If
i += 1
Dim t As Table = Tables("d")
If idx > t.count - 1 Then
    idx = 0
    e.Form.TimerEnabled = False     ‘应当直接加上这一个，否则idx＝0以后，可能会继续循环执行下去’
Else
    idx += 1
End If

‘以下这段代码应当放在上面的else后面，否则会报出idx为负数的错误’
Dim ie = CreateObject("internetexplorer.application")
ie.Visible = True
ie.Navigate(t.Rows(idx)("Link"))
vars("ies").add(ie)
[此贴子已经被作者于2016/4/5 15:40:44编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2202 积分：18130 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2016/4/5 16:24:00 [显示全部帖子]

1、msgbox是执行了，但是测试了4轮。
1轮：除第8行的网页关闭，其它都全部显示直至结束
2轮：这次是第3行
3轮：这次是全部显示
4轮：这次是第9行
 下载信息  [文件大小：   下载次数： ]
点击浏览该文件:延时打开网页2.rar

        vars("ies")(0).Visible = False
        vars("ies")(0) = Nothing
        vars("ies").RemoveAt(0)
－－－－是不是这个方法对网页不起作用？

[此贴子已经被作者于2016/4/5 16:24:23编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2202 积分：18130 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2016/4/5 16:40:00 [显示全部帖子]

.NET Framework 版本：2.0.50727.5485
Foxtable 版本：2016.3.27.1
错误所在事件：窗口,窗口1,TimerTick
详细错误信息：
未指定的错误 (异常来自 HRESULT:0x80004005 (E_FAIL))
 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2202 积分：18130 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2016/4/5 20:47:00 [显示全部帖子]

袍兄，我上传的附件，用你的方法确定报错，两台电脑都是

 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2202 积分：18130 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2016/4/5 21:12:00 [显示全部帖子]

我这确实报错了，麻烦袍兄再看哈
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:延时打开网页修改后.zip
 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2202 积分：18130 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2016/4/5 21:42:00 [显示全部帖子]

360

 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2202 积分：18130 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2016/4/5 21:45:00 [显示全部帖子]

一般用谷歌，次之360，一般不用IE。可能调用谷歌是其它方法，明天去公司试下，我电脑是edge了
[此贴子已经被作者于2016/4/5 22:02:30编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
chnfo
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：九尾狐 帖子：2202 积分：18130 威望：0 精华：0 注册：2011/11/26 20:21:00 		  发帖心情 Post By：2016/4/5 22:13:00 [显示全部帖子]

还是去装个iE算了，最好是iE哪个版本？

 回到顶部
总数 23 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04907 秒, 8 次数据查询