During R6 to R8 upgradation

HCL Domino Domino Forum
1

Hi All,

I have a problem while upgrading notes from R6 to R8.

I had function by Name replaceStr.Its working fine in R6.But Showing error in R8.

code:

'this function will replace the find string in s1 with the replace string

Function replaceStr(s1 As String, find As String, replace As String) As String

Dim tmpStr As String

Dim pos As Integer

 tmpStr = s1



 While Instr(tmpStr, find) <> 0            

      pos = Instr(tmpStr, find) 'get the position of the find string



      'create the new string

      tmpStr = Left( tmpStr, pos - 1) + replace + Right( tmpStr, Len(s1) - pos)



 Wend



 replaceStr = tmpStr

End Function

2

Subject: Replace is a LotusScript Keyword

Replace is a LotusScript Keyword,you shoud redefine your function to something like this:

Function replaceStr(s1 As String, find As String, newStr As String) As String

/Eva