home *** CD-ROM | disk | FTP | other *** search
/ PC World 2001 January / PCWorld_2001-01_cd.bin / Software / Topware / sambar / _SETUP.1 / stmex.stm < prev    next >
Text File  |  1999-08-28  |  2KB  |  77 lines
  1. <HTML>
  2. <HEAD><TITLE>Sambar Scripting Example</TITLE></HEAD>
  3. <BODY bgcolor=#ffffff>
  4. <H1>Sambar Scripting Example</H1>
  5. <B>If/Then Expressions:</B>
  6. <P>
  7. <BLOCKQUOTE>
  8. <RCif RC$foo = null>
  9.     <RC$foo = 111>
  10.     <RC$bar = 222>
  11. <RCelse>
  12.     <RC$foo = RC$foo + 100>
  13. <RCendif>
  14.  
  15. <RCif RC$foo = null><BR>
  16.     <RC$foo = 111><BR>
  17.     <RC$bar = 222><BR>
  18. <RCelse><BR>
  19.     <RC$foo = RC$foo + 100><BR>
  20. <RCendif><BR>
  21. </BLOCKQUOTE>
  22. <P>
  23. <B>Form Parameters:</B>
  24. <P>
  25. <BLOCKQUOTE>
  26. <RC$foo> = <RC$foo><BR>
  27. <RC$bar> = <RC$bar><BR>
  28. </BLOCKQUOTE>
  29. <P>
  30. <B>Variable Assignment:</B>
  31. <P>
  32. <BLOCKQUOTE>
  33. <RC$tmp = (RC$foo + RC$bar) * 2>
  34. <RC$tmp = (RC$foo + RC$bar) * 2><BR>
  35. <RC$tmp> = <RC$tmp>
  36. </BLOCKQUOTE>
  37. <P> 
  38. <B>Scalar Functions:</B>
  39. <P>
  40. <BLOCKQUOTE>
  41. <RC$foo = This is a test string to strip>
  42. <RC$foo = This is a test string to strip><BR>
  43. <RC$pos = RC@grep(RC$foo,string)>
  44. <RC$pos = RC@grep(RC$foo,string)><BR>
  45.  
  46. <RCif RC$pos > -1>
  47.     <RC$tmp = RC@substring(RC$foo, 0, RC$pos)>
  48. <RCelse>
  49.     <RC$tmp = Not found>
  50. <RCendif>
  51. <BR>
  52. <RCif RC$pos > -1><BR>
  53.     <RC$tmp = RC@substring(RC$foo, 0, RC$pos)><BR>
  54. <RCelse><BR>
  55.     <RC$tmp = Not found><BR>
  56. <RCendif><BR>
  57. <BR>
  58. <RC$tmp> = <RC$tmp>
  59. <BR>
  60. <RC$tmp = RC@sprintf("%s---%s", RC$foo, again)>
  61. <RC$tmp = RC@sprintf("%s---%s", RC$foo, again)><BR>
  62. <BR>
  63. <RC$tmp> = <RC$tmp>
  64. <BR>
  65. <RC$foo = RC@left(RC$tmp, 4)><BR>
  66. <RC$foo = RC@left(RC$tmp, 4)><BR>
  67. <RC$foo> = <RC$foo><BR>
  68. <BR>
  69. <RC$foo = RC@right(RC$tmp, 5)>
  70. <RC$foo = RC@right(RC$tmp, 5)><BR>
  71. <RC$foo> = <RC$foo><BR>
  72. <BR>
  73. </BLOCKQUOTE>
  74. <P> 
  75. </BODY>
  76. </HTML>
  77.