home bbs files messages ]

Just a sample of the Echomail archive

Cooperative anarchy at its finest, still active today. Darkrealms is the Zone 1 Hub.

   WILDCAT!_SUPPORT      Support for the Wildcat BBS software      1,697 messages   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]

   Message 685 of 1,697   
   Robert Wolfe to All   
   RE: [Developers] Replacing Text   
   11 Jan 19 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    
    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    
   //   
      
   #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)   

[   << oldest   |   < older   |   list   |   newer >   |   newest >>   ]


(c) 1994,  bbs@darkrealms.ca