【VBS编程进阶】：掌握高级技巧，轻松管理IE窗口和标签页！


参考资源链接：[VBScript中开启IE的两种方法：Application与WScript.Shell示例](https://wenku.csdn.net/doc/64533e54ea0840391e778de9?spm=1055.2635.3001.10343)
# 1. VBS基础与自动化原理

## 简介
Visual Basic Scripting Edition（VBS）是一种轻量级、易于学习的脚本语言，广泛用于Windows操作系统的自动化任务。它支持快速开发简单工具和应用程序，尤其在自动化日常任务和系统管理方面非常有用。

## 基本概念
VBS允许用户编写小段代码，执行如文件管理、系统设置更改等简单任务。理解VBS的基本概念是实现有效自动化的重要前提，包括变量、控制结构、过程以及对象等。

' 示例：一个简单的VBS脚本，显示"Hello, World!"
Dim msg
msg = "Hello, World!"
WScript.Echo msg

## 自动化原理
自动化是通过预先设定的程序来自动执行任务的过程。VBS自动化原理主要依赖于对Windows系统环境、应用程序和网络资源的接口调用和操作，通过编写脚本来实现这一过程。在下一章节中，我们将深入探讨VBS脚本如何与Internet Explorer浏览器进行交互，这是其自动化能力的典型应用场景之一。

# 2. VBS与IE的交互机制

### 2.1 VBS脚本基础

#### 2.1.1 VBS语法概述

Visual Basic Scripting Edition (VBS) 是一种轻量级的编程语言，通常用于快速开发小的自动化脚本。它的语法简洁，与Visual Basic类似，但专为脚本编写而设计。VBS不需要编译，可以直接通过Windows Script Host执行，因此在Windows环境下使用非常方便。

VBS的基本语法结构包括变量声明、循环、条件判断、过程和函数定义等。在编写VBS脚本时，我们需要注意以下几点：

- 变量声明不需要指定类型，VBS是弱类型语言。
- 变量名区分大小写。
- 注释以单引号`'`开头。
- 条件语句使用`If...Then...Else...End If`结构。
- 循环语句包括`For...Next`、`Do...Loop`、`While...Wend`等。

' 示例：VBS变量声明和简单输出
Dim message
message = "Hello, VBS!"
WScript.Echo message

在上述代码中，`Dim` 关键字用于声明变量`message`，然后将字符串赋值给这个变量，并使用`WScript.Echo`输出这个变量的值。

#### 2.1.2 VBS中的对象模型

VBS对象模型是基于组件对象模型(COM)的，它允许我们通过脚本操作各种COM对象。这意味着我们可以使用VBS来控制Windows应用程序、系统组件甚至是其他脚本语言编写的对象。

对象在VBS中是通过点号`.`来访问其属性和方法的。例如，以下是一个操作文件系统的简单示例：

' 示例：VBS操作文件系统
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.OpenTextFile("C:\test.txt", 1)
While Not objFile.AtEndOfStream
    WScript.Echo objFile.ReadLine()
Wend
objFile.Close
objFSO.Quit

在这个示例中，`CreateObject`函数用于创建一个FileSystemObject对象实例，该对象提供了访问文件系统的接口。通过调用`OpenTextFile`方法，我们打开一个文本文件并逐行读取它的内容。

### 2.2 IE自动化对象模型

#### 2.2.1 InternetExplorer对象的属性和方法

VBS与IE的交互主要是通过InternetExplorer对象模型实现的。InternetExplorer对象模型为开发者提供了一套丰富的属性和方法，用于控制IE浏览器的各个方面。它允许我们创建IE实例、打开新窗口、导航到特定URL、管理浏览器窗口和标签页等。

以下是一些常用的InternetExplorer对象属性和方法：

- `Visible`: 设置浏览器窗口是否可见。
- `Navigate`: 导航到指定的URL。
- `Stop`: 停止当前加载的页面。
- `Refresh`: 刷新当前页面。
- `Quit`: 关闭浏览器实例。

' 示例：使用VBS控制IE浏览器打开网页
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Visible = True
objIE.Navigate "http://www.example.com"
While objIE.Busy Or objIE.readyState <> 4
    WScript.Sleep 100
Wend

在这个示例中，我们首先创建了一个InternetExplorer对象实例，设置其可见性为`True`，然后导航到指定的URL。通过轮询`Busy`属性和`readyState`属性，我们等待浏览器加载完成。

#### 2.2.2 通过VBS控制IE窗口

通过VBS控制IE窗口，可以模拟用户与浏览器之间的交互。这不仅限于简单的导航，还涵盖了模拟点击、填写表单、抓取页面数据等高级操作。

要控制IE窗口，我们首先需要理解InternetExplorer对象模型提供的几个关键属性和方法：

- `Document`: 代表浏览器窗口中的当前HTML文档。
- `FullName`: 表示浏览器窗口的标题栏文本。
- `Top`: 浏览器窗口距离屏幕顶部的像素值。
- `Left`: 浏览器窗口距离屏幕左侧的像素值。

' 示例：通过VBS控制IE窗口
Set objIE = CreateObject("InternetExplorer.Application")
objIE.Navigate "http://www.example.com"
objIE.Visible = True

While objIE.Busy Or objIE.readyState <> 4
    WScript.Sleep 100
Wend

' 在页面加载完成后执行操作
Set objDoc = objIE.Document
objDoc.all.searchBox.Value = "VBS automation"
objDoc.all.searchButton.Click

' 更改窗口位置和大小
objIE.Width = 800
objIE.Height = 600
objIE.Left = 100
objIE.Top = 100

在这个示例中，我们在页面加载完成后，使用`Document`对象访问页面元素，并模拟用户填写搜索框、点击搜索按钮的动作。之后，我们通过设置IE对象的`Width`、`Height`、`Left`和`Top`属性来调整浏览器窗