Why not do a mid from 2 to len-1 ?
or using replaceall (excerpt from Lang Ref):
The ReplaceAll function replaces all occurrences of oldString in
sourceString with newString. ReplaceAll is case-insensitive.
If newString is an empty string (""), the ReplaceAll function deletes
every occurrence of the oldString in the sourceString.
If oldString is an empty string (""), the ReplaceAll function returns an
unchanged copy of the sourceString.
On Jue, 28 de Septiembre de 2006, 7:08 pm, GAmoore at aol dot com wrote:
> Thanks Norman and Jose. So I guess I need to write a little method to
> strip
> the quotes off by finding out the ascii for double quotes? Or maybe
> something
> like this... (Is there separate ascii for left quotes and right quotes?)
>
> dim i as integer
> dim s, t as string
>
> t = "Jones, Jim"
> s = ""
> for i = 1 to len(t)
> c = mid(t, i)
> if c <>""" and c <> """ then s = s + c
> next
> _______________________________________________
> 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>
>
_______________________________________________
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>
|