如何创建新的浏览器进程并自动登录账号 - VB6论坛

已结贴√ 问题点数：20 回复次数：14

如何创建新的浏览器进程并自动登录账号

我用的浏览器是傲游1.6，所以每次执行InternetExplorer.Navigate都会在当前浏览器中以新标签的方式打开网页，但在同一浏览器中访问同一网页时会使用相同的cookie，或者有其他的冲突。我想让InternetExplorer.Navigate执行后打开一个新的傲游浏览器进程（也就是一个新的浏览器窗口）打开网页，如何做？
我弄的是校内，所以多个进程的浏览器可以开多个号。

搜索更多相关主题的帖子: 浏览器　网页　进程　

第 2 楼

得分:0

用程序名 + 网址,在新的进程中打开网页.

能用IE的话,建议你这里用IE打开.
明确指出运行 IE 进程,然后通过传递参数的方式来打开指定的网页.

授人于鱼，不如授人于渔
早已停用QQ了

第 3 楼

得分:0

回复 2楼风吹过b

哦..谢谢
但InternetExplorer.Navigate是通过默认的浏览器登录，我现在默认的浏览器是傲游，在不改变默认浏览器的情况下能不能调用IE去登录？

第 4 楼

得分:0

InternetExplorer理论上是调用了IE，而傲游拦截了调用IE的请求。这时尝试直接启动iexplore.exe

第 5 楼

得分:0

回复 4楼 multiple1902

不明白。。那应该怎么办呢？我是想直接在代码里启动IE并登录

第 6 楼

得分:0

这时尝试直接启动iexplore.exe

第 7 楼

得分:0

'定义IE的位置,只适用于 Win32 ,不适用于 Win64
Private Const IEPATH = "C:\Program Files\Internet Explorer\IEXPLORE.EXE"

'强制使用IE打开指定的网址,因为 IE位置里包含了空格,所以要用双引号引起来.
Shell Chr(34) & IEPATH & Chr(34) & " " & 登录页URL, vbNormalFocus

授人于鱼，不如授人于渔
早已停用QQ了

第 8 楼

得分:0

回复 6楼 multiple1902

这样是用IE打开了多个IE窗口，但他们的进程都是同一个，所以不能实现多帐户的登录。

第 9 楼

得分:0

回复 7楼风吹过b

但是我是要用InternetExplorer.Navigate这个方法去登录账号，不是仅仅只打开指定页面。。
或者还有没有更深点的办法。。？

第 10 楼

得分:0

资料:

VB填充IE上的输入框并提交
  假设登录页面的HTML代码如下：

  <!DOCTYPE   HTML   PUBLIC   "-//W3C//DTD   HTML   4.0   Transitional//EN">

  <html>
  <head>
    <title>testPage</title>
  </head>

  <body>

  <FORM   name=chh   method   =   "POST"   action   =   "login.asp">

      <table   width="100%"   border="0"   cellspacing="0"   cellpadding="2">
          <tr>
              <td   width="31%"   align="center">用户：</td>
              <td   width="69%"   align="left">
                <input   name="LoginName"   type="text"   id="LoginName"   size="12">
              </td>
          </tr>
          <tr>
              <td   width="31%"   align="center">密码：</td>
              <td   width="69%"   align="left">
                <input   name="LoginPassword"   type="password"   id="LoginPassword"   size="12">
              </td>
          </tr>
      </table>
  <input   type   =   "submit"   id   =   "clickme"   value   =   "提交">
  </FORM>
  </body>
  </html>


  很简单的页面，在上面有一个登录的Form，一个用户名输入框LoginName，一个密码输入框LoginPassword和一个提交按钮clickme



  然后用IE打开这个页面，注意页面的title设置为testPage。



  然后打开VB，在工程中引用Microsoft   internet   controls：

  Private   Sub   Command1_Click()
          Dim   IEList   As   New   ShellWindows
          Dim   browser
          Dim   Doc

          On   Error   Resume   Next

          '遍历当前地浏览器窗口
          For   Each   browser   In   IEList
                  '找到需要地IE窗口
                  If   browser.Document.Title   =   "testPage"   Then
                          '获得浏览器地文档对象
                          Set   Doc   =   browser.Document

                          '填写用户名字段
                          Doc.body.All("LoginName").Value   =   "eddie"
                          '填写密码字段
                          Doc.body.All("LoginPassword").Value   =   "123456"

                          '提交
                          Doc.body.All("clickme").Click
                  End   If
          Next
  End   Sub

授人于鱼，不如授人于渔
早已停用QQ了