home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 November / pcwk_11_98B.iso / Lotus / SPANISH / LOTUS027.DSK / FINDREPL.TPL < prev    next >
Text File  |  1997-02-06  |  403b  |  16 lines
  1.     .Type "Esto es un ejemplo.[Intro]"
  2.     .Type "Esto es otro ejemplo."
  3.     
  4.     .FindAndReplace.FindString = "ejemplo"
  5.     .FindAndReplace.ReplaceString = "ejemplo de script"
  6.     .InitFindAndReplace True
  7.     
  8.     REM 0 = Found, 4 = NotFound    
  9.     If .Find = 0 Then Messagebox "Se ha hallado el primer elemento.",, "Se omite"
  10.     
  11.     REM Find the next instance    
  12.     .Find
  13.     
  14.     REM Replace the rest of the words    
  15.     .ReplaceAll
  16.