space delimited text file

[Joacim Andersson]

If you have VB6 then you can use the Replace function:

strText = Replace(strText, " ", ";")

If you dont have VB6 then use the following function:

Public Function ReplaceText(strText$, strFind$, strReplaceWith$)
Dim strRetVal$, iPos%
strRetVal = strText
Do
iPos = InStr(strRetVal, strFind)
If iPos > 0 Then
strRetVal = Left$(strRetVal, iPos -1) & strReplaceWith & Mid$(strRetVal, iPos + Len(strFind))
End If
Loop While iPos > 0
ReplaceText = strRetVal
End Function

Good luck!

------------------
Joacim Andersson
[email protected]
[email protected]
www.YellowBlazer.com