各位大大 vba调用ie执行不了

lahanyu

ie = CreateObject("internetexplorer.application")
以前执行打开的360急速浏览器  后来手贱把360卸载了 用了qq浏览器 结果打开的是win10自带的ie  设置成默认浏览器也不行
自带的ie填表没反应 我又把qq浏览器卸载了 装了360 还是打开的ie浏览器 我把ie又卸载了 结果运行后反应都没了 直接打不开网页
各位大大 怎么搞？

huang1314wei

打开的是自带的IE才是正常的，难道你想用VBA操作其他浏览器不成？

lahanyu

huang1314wei 发表于 2018-6-6 13:04
打开的是自带的IE才是正常的，难道你想用VBA操作其他浏览器不成？

自带的ie填表用不了  360急速浏览器可以用  怎么绑定其他浏览器呢？

huang1314wei

lahanyu 发表于 2018-6-6 13:40
自带的ie填表用不了  360急速浏览器可以用  怎么绑定其他浏览器呢？

如果说自带的IE填表用不了那就有点扯了，你所谓的360浏览器能填表，因为这个浏览器是双核的，你用的还是IE内核而已，碰巧让你赶上能用上它填表，至于你想用 CreateObject("internetexplorer.application")  来所谓绑定的其它浏览器，这个是要在注册表里面修改的，找到注册表 HKEY_LOCAL_MACHINE\SOFTWARE\Classes\CLSID\{0002DF01-0000-0000-C000-000000000046}\LocalServer32   把里面的默认的数值 "C:\Program Files\Internet Explorer\IEXPLORE.EXE"   改成你想用的具体的浏览器路径即可，CreateObject("internetexplorer.application") 肯定是无法操作独立内核的浏览器，比如火狐或者谷歌这样的浏览器，像360，qq这样的双核浏览器倒是可以试试

lahanyu

huang1314wei 发表于 2018-6-6 19:59
如果说自带的IE填表用不了那就有点扯了，你所谓的360浏览器能填表，因为这个浏览器是双核的，你用的还是I ...

我是菜鸟 我也不知道为什么ie填表 没反应  360急速却可以  调用的也确实是ie内核  这个问题我通过重装ie解决了  又碰到个新问题  大神帮我看看

多选框选中的问题
<input type="checkbox" name="q0" value="1" id="q0" /><label for="q0" class="q11">关闭</label> </div>
<input type="checkbox" name="q1" value="1" id="q1" /><label for="q1" class="qll">打开</label> </div>


通过bb = r(i).getAttributeNode("for").Value得到id
用了ie.Document.getElementById("q1").Checked = "checked"
ie.Document.getElementById("q1").Checked = true
ie.Document.getElementById("q1").click
都无法实现选中
也只有一个form 折腾了一天 搞不懂

huang1314wei

lahanyu 发表于 2018-6-6 20:11
我是菜鸟 我也不知道为什么ie填表 没反应  360急速却可以  调用的也确实是ie内核  这个问题我通过重装ie ...

没有具体的网页地址，无法测试，无能为力

lahanyu

huang1314wei 发表于 2018-6-6 21:40
没有具体的网页地址，无法测试，无能为力

大大 再帮个忙   这是个考试网站  我通过对比label 选择正确答案 但是有的label 汉字前有个左对齐的代码
C. <p align="left">准确</label> </div>
把label的innertext打印出来 是个空白的回车
“
准确”

没有办法对比成功   这个怎么搞？

huang1314wei

lahanyu 发表于 2018-6-7 00:22
大大 再帮个忙   这是个考试网站  我通过对比label 选择正确答案 但是有的label 汉字前有个左对齐的代码
...

用trim()或者application.clean等一切可用的手段来清除不可见字符，或者用instr来比对字符串的一部分用来对比结果

iam_buddy

找到你要用的浏览器的地址路径Shell "C:\Users\Administrator\AppData\Roaming\360se6\Application\360se.exe " & Range("a" & i)
像这样改就能调用了

我这是360浏览器的路径