VBScript: Split ( )
Descrição:

Devolve um array com um numero especificado de substrings.
Dim MeuString, MeuArray, Msg
MeuString = "VBScriptXéXgiro!"
MeuArray = Split(MyString, "x", -1, 1)
' MeuArray(0) tem "VBScript".
' MeuArray(1) tem "é".
' MeuArray(2) tem "giro!".
Msg = MeuArray(0) & " " & MeuArray(1)
Msg = Msg & " " & MeuArray(2)
Response.write Msg