prepstr.ssc

PowerBuilder8.0开发分散式应用所帶的例程

<!--SCRIPT PSOBJMOD
    import( site.GetRootDocument().location + "/ObjMod80.ssc" );
    session.active = true;
    InitObjects(session);
-->
<!--SCRIPT // {{ SCRIPT()
/*
 * Preprocess a string to replace any characters (like angle
 * brackets) that will not display properly by an HTML browser.
 */

function PreprocessString( value )
{
  var newValue;
  var i;
  var character;

  newValue = '';
  for( i = 0; i < value.length; i++ ) {
    character = value.charAt(i);
    if( character == '<' ) {
      newValue += '&lt';
      if( i != value.length ) {
        newValue += ';';
      }
    } else if( character == '>' ) {
      newValue += '&gt';
      if( i != value.length ) {
        newValue += ';';
      }
    } else if( character == '"' ) {
      newValue += '&quot';
      if( i != value.length ) {
        newValue += ';';
      }
    } else if( character == '&' ) {
      newValue += '&amp';
      if( i != value.length ) {
        newValue += ';';
      }
    } else {
      newValue += character;
    }
  }
  return newValue;
}
// }}
-->