I am trying to to replace single quotes with 2 single quotes in a sql query. Unfortunately the sql is in a legacy plugin. Any ideas?

Is there a Replace() function or anything similar in legacy.  

 Thanks

Uma

Hi Uma,

There wasn't a Replace() in cypress enable (legacy), however, here is a function that replaces the single quote for a double quote that served me for more years than I care to remember in the legacy world.
Play with it to your hearts content.

Function PQ(ByVal astrValue As String) As String
   Const SQ = "'"
   Dim i As Integer
   Dim VL As Integer
   Dim sCtC As String
   Dim NV As String
   VL = Len(astrValue)
   If VL = 0 Then
      PQ = astrValue
      Exit Function
   End If
   For i = 1 To VL
      sCtC = Mid$(astrValue, i, 1)
      If sCtC = SQ Then
         NV = NV & SQ & SQ
      Else
         NV = NV & sCtC
      End If
   Next i
   PQ = NV
End Function

Dave

Thanks a lot, Dave

I will try this.

Uma