全面OO asp，构造属于自己的WebForm对象!(序言)，基础类以及常用函数

<%
/* ======================================================================

JScript Source File -- Created with SAPIEN Technologies PrimalScript 3.1

NAME:

AUTHOR: paradis , 罗岳良付娜
DATE  : 2004-7-12

COMMENT:

========================================================================= */
function basic(){
 var debug = false;
 var errString = "";
 
 this.addErr = function (strError){
  errString += strError;
 }
 
 this.getErrorMsg = function(){
  return errString;
 }
}
/*字符串操作
Trim(string):去除字符串两边的空格
==================================================================
*/
 
/*
==================================================================
LTrim(string):去除左边的空格
==================================================================
*/
/*
 *--------------- isEmpty(obj) -----------------
 * isEmpty(obj)
 * 功能:判断对象obj是否为空.类似于VBScript的isEmpty
 * 参数:obj,对象.
 *--------------- isEmpty(obj) -----------------
 */
function isEmpty(obj)
{

    return !(String(obj)!="" && String(obj)!="undefined")
}

function LTrim(str)
{
    var whitespace = new String(" /t/n/r");
    var s = new String(str);
   
    if (whitespace.indexOf(s.charAt(0)) != -1)
    {
        var j=0, i = s.length;
        while (j < i && whitespace.indexOf(s.charAt(j)) != -1)
        {
            j++;
        }
        s = s.substring(j, i);
    }
    return s;
}
 
/*
==================================================================
RTrim(string):去除右边的空格
==================================================================
*/
function RTrim(str)
{
    var whitespace = new String(" /t/n/r");
    var s = new String(str);
 
    if (whitespace.indexOf(s.charAt(s.length-1)) != -1)
    {
        var i = s.length - 1;
        while (i >= 0 && whitespace.indexOf(s.charAt(i)) != -1)
        {
            i--;
        }
        s = s.substring(0, i+1);
    }
    return s;
}
 
/*
==================================================================
Trim(string):去除前后空格
==================================================================
*/
function Trim(str)
{
    return RTrim(LTrim(str));
}
 %>