다음과 같이 코드를 복사하십시오. <%
'/// ***************************************************************************
'공통 공개 기능 라이브러리 파일 이름 : pubFunction.asp
'***************************************************************************** //
constgo_back = "<ahref = 'javaScript : history.back (1)'> [이전 페이지로 돌아 가기] </a>"
constcloser = "<ahref = 'javaScript : self.close ()'> 『닫기 창』</a>"
'// ***********************************************************************
'pubfgdy (test, tag, bh)는 분리기 및 레이블에 따라 지정된 문자열의 지정된 값 함수를 호출합니다. 매개 변수 : 분리 된 문자열, 태그 분리기, BH 레이블을 테스트합니다
'******************************************************************************** //
functionpubfgdy (테스트, 태그, bh)
pubfgdy = ""
iftest <> ""Andisnumeric (bh) = Truethen
Dimtests
tests = split (테스트 및 태그, 태그)
그런 다음 ifbh <ubound (테스트)
pubfgdy = 테스트 (BH)
endif
또 다른
pubfgdy = ""
종료 기능
endif
최종 기능 장애
'// ***********************************************************************
'PubCodeGF (OldTest) 코드 사양 함수, 매개 변수 : OldTest 원본 콘텐츠, 새로 새로운 콘텐츠
'******************************************************************************** //
functionpubcodegf (OldTest)
DimNewTest : NewTest = Trim (OldTest)
ifisnull (newtest) OrnewTest = ""thencode_admin = "": exitfunction
newtest = replace (NewTest, " '", "" "")
pubcodegf = 새로운 테스트
최종 기능 장애
'// ***********************************************************************
'PubCodeHtml (OldTest) 블록 HTML 코드 함수, 매개 변수 : OldTest 원본 콘텐츠, 새로운 새로운 콘텐츠
'******************************************************************************** //
functionpubcodehtml (OldTest)
DimNewTest : NewTest = OldTest
ifisnull (newtest) OrnewTest = ""whenpubcodehtml = "": exitfunction
newtest = replace (newtest, "<", "<")
newtest = replace (newtest, ">", ">")
newtest = replace (newtest, chr (39), "") '단일 인용문
newtest = replace (newtest, chr (34), "") '이중 따옴표
newtest = 교체 (NewTest, Chr (32), "") '공간
NewTest = Replace (NewTest, Chr (9), "") '테이블