[已解决]打开不成功？

hahada

怎么回事？

最佳答案

月排行榜 / 总排行榜

hwc2ycy

2014-4-19 19:37

1. Sub demos()
   
2.     Dim ie As Object, url$
   
3.     Set ie = CreateObject("InternetExplorer.Application")
   
4.     With ie
   
5.         .Navigate "http://192.168.1.110/logincheck.php?UNAME=用户名&PASSWORD=123"
   
6.         .Visible = True
   
7.     End With
   
8.     Set ie = Nothing
   
9. End Sub

复制代码

跳转到最佳答案楼层

hwc2ycy

1. shell “iexplore.exe  http://192.168.1.110/logincheck.php?UNAME=用户名&PASSWORD=123"

复制代码

试试。
有可能需要加上IE的路径才成。

蝶·舞

是不是地址有问题？

hahada

hwc2ycy 发表于 2014-4-19 19:32
试试。
有可能需要加上IE的路径才成。

试试？

hwc2ycy

1. Sub demos()
   
2.     Dim ie As Object, url$
   
3.     Set ie = CreateObject("InternetExplorer.Application")
   
4.     With ie
   
5.         .Navigate "http://192.168.1.110/logincheck.php?UNAME=用户名&PASSWORD=123"
   
6.         .Visible = True
   
7.     End With
   
8.     Set ie = Nothing
   
9. End Sub

复制代码

hahada

hwc2ycy 发表于 2014-4-19 19:37

怎么不行？

hahada

hwc2ycy 发表于 2014-4-19 19:37

试过了不行

hahada

hwc2ycy 发表于 2014-4-19 19:37

测试成功

hahada

hwc2ycy 发表于 2014-4-19 19:37

上次打不开，后来又能打开网页，终于找到原因了，必须随便打开一个网页，才能用这个代码
怎么解决？？？