코드 사본은 다음과 같습니다.
<%
ClassStringOperations
''****************************************************************************
'' ''@function 설명 : 문자열을 숯 배열로 바꿉니다
'' ''@parameter 설명 : -Str [String] : 변환 해야하는 문자열
'' ''@return value :-[배열] char 유형 배열
''****************************************************************************
Chararray에 대한 공개 기능 (byvalstr)
redimchararray (len (str))
fori = 1tolen (str)
chararray (i-1) = MID (str, i, 1)
다음
tochararray = chararray
최종 기능 장애
''****************************************************************************
'' ''@function 설명 : 배열을 문자열로 변환합니다
'' ''@parameter 설명 : -arr [array] : 변환 해야하는 데이터
'' ''@return value :-[String] 문자열
''****************************************************************************
PublicFunctionArraytostring (byvalarr)
fori = 0toubound (arr)
strobj = strobj & arr (i)
다음
Arraytostring = strobj
최종 기능 장애
''****************************************************************************
'' ''@function 설명 : 소스 문자열 str가 숯으로 시작하는지 확인
'' ''@parameter 설명 : -Str [String] : 소스 문자열
'' ''@parameter 설명 : -chars [String] : 비교 문자/문자열
'' ''@return value :-[bool]
''****************************************************************************
PublicFunctionStartSwith (ByValStr, chars)
ifleft (str, len (chars)) = charsthen
startswith = true
또 다른
startswith = false
endif
최종 기능 장애
''****************************************************************************
'' '' '@function 설명 : 소스 문자열 str가 숯으로 끝나는 지 확인
'' ''@parameter 설명 : -Str [String] : 소스 문자열
'' ''@parameter 설명 : -chars [String] : 비교 문자/문자열
'' ''@return value :-[bool]
''****************************************************************************
PublicFunctionEndSwith (ByValStr, chars)
ifright (str, len (chars)) = charsthen
endswith = true
또 다른
endswith = false
endif
최종 기능 장애
''****************************************************************************
'' ''@function 설명 : 복사 n 문자열