How to remove the spaces from a string

[suresh vasu]

Hi Anand,

I have written some code for you, which is working fine. It will work for any string irrespective of spaces it contains.

Code:

str = "Suresh Vasu Kondapally"
newStr = ""
For i=1 to len(str)
    char = Mid(str,i,1)
    if(char<>" ") then
    newStr = newStr+Mid(str,i,1)
    End if
Next
MsgBox newStr

Do let me know if you get problem in using the code.

Suresh.