以下是原始碼：
<%
class StringOperations
'***********************************************************************
'' @功能說明: 把字串換為char型數組
'' @參數說明: - str [string]: 需要轉換的字串
'' @傳回值: - [Array] Char型數組
'************************************************************************
public function toCharArray(byVal str)
redim charArray(len(str))
for i = 1 to len(str)
charArray(i-1) = Mid(str,i,1)
next
toCharArray = charArray
end function
'****************************************************************************
'' @功能說明: 把一個數群組轉換成一個字串
'' @參數說明: - arr [Array]: 需要轉換的資料
'' @傳回值: - [string] 字串
'****************************************************************************
public function arrayToString(byVal arr)
for i = 0 to UBound(arr)
strObj = strObj & arr(i)
next
varrayToString = strObj
end function
'****************************************************************************
'' @功能說明: 檢查源字串str是否以chars開頭
'' @參數說明: - str [string]: 源字串
'' @參數說明: - chars [string]: 比較的字元/字串
'' @傳回值: - [bool]
'****************************************************************************
public function startsWith(byVal str, chars)
if Left(str,len(chars)) = chars then
startsWith = true
else
startsWith = false
end if
end function
