我在軟件測試這個行業也是做過很多年了，自己的方向也是自動化測試，對VBScript腳本也算是了解，在測試過程中 
也應用了一些，所以來談談如何使用VBScript來開發自動化測試。
　　首先先介紹幾個可以在自動化測試開發中用到的VBScript的幾個函數。

1、InStr 函數
描述
　　返回某字符串在另一字符串中第一次出現的位置。
語法
InStr([start, ]string1, string2[, compare]) 
InStr 函數的語法有以下參數： 
　　　　　　 參數 描述 
start 可選。數值表達式，用于設置每次搜索的開始位置。如果省略，將從第一個字符的位置開始搜索。如果 start 包含 Null，則會出現錯誤。如果已指定 compare，則必須要有 start 參數。 
string1 必選。接受搜索的字符串表達式。 
string2 必選。要搜索的字符串表達式。 
compare 可選。指示在計算子字符串時使用的比較類型的數值。有關數值，請參閱“設置”部分。如果省略，將執行二進制比較。

示例：
　　這個函數說明的是一個字符串在另一個字符串中出現的位置，在自動化測試中，經常用作比較結果來使用。
比如：
　　　　

Dim a,b
a="rtyi"
b="1345krkrtyi:{""><?"

If InStr(b,a)>0 Then
    MsgBox"測試結果通過"
Else
    MsgBox "測試結果失敗"
End If

2、Split 函數
描述
　　返回基于0的一維數組，其中包含指定數目的子字符串。
語法
Split(expression[, delimiter[, count[, start]]]) 
　　Split 函數的語法有以下參數： 
　　　　　　　　 參數 描述 
expression 必選。字符串表達式，包含子字符串和分隔符。如果 expression 為零長度字符串，Split 返回空數組，即不包含元素和數據的數組。 
delimiter 可選。用于標識子字符串界限的字符。如果省略，使用空格 ("") 作為分隔符。如果 delimiter 為零長度字符串，則返回包含整個 expression 字符串的單元素數組。 
count 可選。被返回的子字符串數目，-1 指示返回所有子字符串。 
compare 可選。指示在計算子字符串時使用的比較類型的數值。有關數值，請參閱“設置”部分。

示例：
　　這個函數主要用于拆分字符串用，在自動化測試開發中主要用于拆分測試數據。
比如：

Dim a,b,i

a="rt124,y556,57777,<>:/*&%"
b=Split(a,",")

For i=0 To Ubound(b)
    MsgBox b(i)
Next