ASP中一个字符串处理类(2)

'''' @功能说明: 复制N个字符串str
'''' @参数说明:  - str [string]: 源字符串
'''' @参数说明:  - n [int]: 复制次数
'''' @返回值:   - [string] 复制后的字符串
''****************************************************************************
public function clone(byVal str, n)
 for i = 1 to n
  value = value & str
 next
 clone = value
end function
''****************************************************************************
'''' @功能说明: 删除源字符串str的前N个字符
'''' @参数说明:  - str [string]: 源字符串
'''' @参数说明:  - n [int]: 删除的字符个数
'''' @返回值:   - [string] 删除后的字符串
''****************************************************************************
public function trimStart(byVal str, n)
 value = Mid(str, n+1)
 trimStart = value
end function
''****************************************************************************
'''' @功能说明: 删除源字符串str的最后N个字符串
'''' @参数说明:  - str [string]: 源字符串
'''' @参数说明:  - n [int]: 删除的字符个数
'''' @返回值:   - [string] 删除后的字符串
''****************************************************************************
public function trimEnd(byVal str, n)
 value = Left(str, len(str)-n)
 trimEnd = value
end function
''****************************************************************************
'''' @功能说明: 检查字符character是否是英文字符 A-Z or a-z
'''' @参数说明:  - character [char]: 检查的字符
'''' @返回值:   - [bool] 如果是英文字符,返回TRUE,反之为FALSE
''****************************************************************************
public function isAlphabetic(byVal character)
 asciiValue = cint(asc(character))
 if (65 <= asciiValue and asciiValue <= 90) or (97 <= asciiValue and asciiValue <= 122) then
  isAlphabetic = true
 else
  isAlphabetic = false
 end if
end function
''****************************************************************************
'''' @功能说明: 对str字符串进行大小写转换
'''' @参数说明:  - str [string]: 源字符串