Subj : RE: [Developers] Replacing Text
To   : All
From : Robert Wolfe
Date : Fri Jan 11 2019 16:32:24

Sharing this update to my last posting as well:

                     -------- Forwarded Message ---------
Original: DATE..... 11 Jan 2019,  04:30p
Original: FROM..... Developers@winserver.com
Original: TO....... ROBERT WOLFE
Original: SUBJECT.. RE: [Developers] Replacing Text
Original: FORUM.... Private Email

On Jan 11, 2019 04:19pm, ROBERT WOLFE wrote to Developers@winserver.com:

 RW> On Jan 11, 2019 05:01am, Developers@winserver.com wrote to ROBERT WOLFE:

 >> Hi

 >> This maybe a simple question but not sure of the best way to do it.

 >> I have a variable - for example say it contains "Mr John Smith"
 >> I need to change this variable to = "Mr%20John%20Smith"
 >> So basicially finding a space and replacing it with %20

 >> Can anyone suggest the best way to do this ?

 RW> Dave, I believe something like this might help you out for a starting
 RW> point:

 RW> //
 RW> // Will search for a spaces in a string and replace it with %20/
 RW> // Coded by Robert Wolfe <robert.wolfe@winserver.org>
 RW> //

The same code converted into a function (with example usage in a full WCX)
could be used as follows:

//
// Will search for a spaces in a string and replace it with %20/
// Coded by Robert Wolfe <robert.wolfe@winserver.org>
//

#include "util.wch"
#include "cmdline.wch"

if (GetNode() = 0) then
    LoginSystem()
end if

dim string1 as string = "Mr. John Doe, Sr."

function string2 (string1 as string) as string
  dim char as string = ""
  dim index as integer = 0
  dim temp as string = ""
  for index = 1 to len(string1)
      char = mid(string1, index, 1)
      if char = " " then char = "%20"
      temp = temp + char
  next index
  string2 = temp
end function

print "string1 = "; string1
print "string2 = " ; string2(string1)

.... Platinum Xpress & Wildcat!..... Nice!!!!



-!-------------------------------------------------------------------
To unsubscribe, send e-mail to wclistserve@winserver.com with
UNSUBSCRIBE Developers in the message body on a line by itself.
To contact the list admin, e-mail ListAdmin@winserver.com
-!-------------------------------------------------------------------



                     ----- End of Forwarded Message -----

.... Platinum Xpress & Wildcat!..... Nice!!!!
--- Platinum Xpress/Win/WINServer v3.0pr5
 * Origin: Omicron Theta (1:116/17)

.