In case it's any use to anyone, I wrote this little IDE script to escape
quotes.
I keep it in the Scripts directory beside the IDE
The idea is, you type the string as you want it, select it in the code
editor, then run the script.
Dim s As String
Dim prePost As String
s = seltext
If instr(1,s,chr(13)) > 0 Then
print "unpredictable with multi-line strings"
Else
If Left(s,1) = """" And Right(s,1) = """" Then
s = Mid(s, 2, len( s ) - 2)
prePost = """"
End If
s = prePost + ReplaceAll(s,"""","""""") + prePost
SelText = s
End If
--
Steve Garman
Using REALbasic 2006r2 Professional on Windows XP Pro
_______________________________________________
Unsubscribe or switch delivery mode:
<http://www.realsoftware.com/support/listmanager/>
Search the archives of this list here:
<http://support.realsoftware.com/listarchives/lists.html>
