On Mon, 13 Sep 2004 16:05:32 +0000 (UTC), "dave"
[snipped a load of lines]
Excuse my ignorance, but how do I split the string ? as I feel this would be
the best way forward.
Dave
Extracted from the MS scripting documents v5.6
HTH
Al.
----------------------------------------------------------
Returns a zero-based, one-dimensional array containing a specified
number of substrings.
Split(expression[, delimiter[, count[, compare]]])
Arguments
expression
Required. String expression containing substrings and delimiters. If
expression is a zero-length string, Split returns an empty array, that
is, an array with no elements and no data.
delimiter
Optional. String character used to identify substring limits. If
omitted, the space character (" ") is assumed to be the delimiter. If
delimiter is a zero-length string, a single-element array containing
the entire expression string is returned.
count
Optional. Number of substrings to be returned; -1 indicates that all
substrings are returned.
compare
Optional. Numeric value indicating the kind of comparison to use when
evaluating substrings. See Settings section for values.
Settings
The compare argument can have the following values:
Constant Value Description
vbBinaryCompare 0 Perform a binary comparison.
vbTextCompare 1 Perform a textual comparison.
Remarks
The following example uses the Split function to return an array from
a string. The function performs a textual comparison of the delimiter,
and returns all of the substrings.
Dim MyString, MyArray, Msg
MyString = "VBScriptXisXfun!"
MyArray = Split(MyString, "x", -1, 1)
' MyArray(0) contains "VBScript".
' MyArray(1) contains "is".
' MyArray(2) contains "fun!".
Msg = MyArray(0) & " " & MyArray(1)
Msg = Msg & " " & MyArray(2)
MsgBox Msg