기능은 효율성을 높이기 위해 개인 캐시 또는 공개 캐시를 설정할 수 있습니다. Stream 구성 요소 또는 FSO 구성 요소를 사용하도록 자유롭게 선택할 수 있으며 사용자 정의 파일 인코딩을 지원하고 파일
속성을 저장할 수 있습니다.
이름
공개 캐시를 사용할 때 주로 다른 템플릿을 구별하는 데 사용되는 템플릿 이름인 텍스트입니다.
체재
텍스트, 파일 인코딩 유형, 설정 가능한 값.
물체
구성요소를 사용하여 텍스트는 값을 설정할 수 있습니다.
개울
FSO
퍼블릭캐시
부울 값, 공용 캐시 사용 활성화되면 템플릿 파일이 Application 개체에 저장됩니다. 이 템플릿 클래스를 참조하는 다른 개체는 동일한 Name 값을 설정하고 공용 캐시를 열어 캐시에서 읽을 수 있습니다. (부하 방법)
프라이빗캐시
부울 값, 개인 캐시 사용 활성화되면 템플릿 파일이 개체의 내부 변수에 저장되고 이 템플릿 클래스를 참조하는 동일한 개체에서 읽을 수 있습니다. (부하 방법)
방향
텍스트, 템플릿 파일이 있는 디렉터리, 앞뒤에 슬래시나 백슬래시 없음(예: template/default)
파일
텍스트, 템플릿 파일 이름, 앞에 슬래시 또는 백슬래시 없음(예: default.html)
저장 방향
텍스트, 앞뒤에 슬래시나 백슬래시가 없는 파일이 저장되는 디렉터리입니다. 예: html/default
파일 저장
텍스트, 파일 이름 저장, 앞에 슬래시나 백슬래시 없음(예: default.html)
물체
암호
Text, 현재 텍스트, 이 개체는 SetVar 메서드를 사용할 때 대체되고, 템플릿은 Load 메서드를 사용할 때 이 개체에 오버로드됩니다.
저장
텍스트, 저장된 텍스트. SaveFront 또는 SaveLast 메서드를 사용하면 Code 개체의 텍스트가 이 개체의 시작 또는 끝 부분에 저장됩니다. 루프 후 모든 코드를 가져오는 데 사용할 수 있습니다.
방법
클리어캐시
공개 및 비공개 캐시 지우기(파일에서 템플릿 다시 로드 강제)
ClearPublicCache
공개 캐시 지우기
ClearPrivateCache
개인 캐시 지우기
클리어코드
코드 객체 지우기
클리어스토리지
저장소 개체 지우기
앞에 저장
현재 Code 개체의 텍스트를 Storage 개체의 시작 부분에 저장합니다.
마지막으로 저장
현재 Code 객체의 텍스트를 Storage 객체의 끝에 저장합니다.
코드 저장
현재 Code 개체의 텍스트를 파일에 저장합니다.
저장공간 저장
현재 Storage 개체의 텍스트를 파일로 저장합니다.
SetVar
현재 Code 개체의 텍스트를 바꾸기 위한 매개변수: 바꿀 텍스트, 바꿀 텍스트
짐
템플릿 파일을 Code 개체에 로드합니다. 개인 캐시가 활성화되어 있으면 개인 캐시에서 로드됩니다. 활성화되어 있고 공용 캐시가 있으면 공용 캐시에서 로드됩니다. 파일에서 로드됩니다.
내부 변수
ccStrPath
기본 루트 디렉터리
ccStr쿠키이름
기본 애플리케이션 객체 이름 접두사
암호
클래스 ccClsTemplate
Private ccStrCode,ccStrStorage
PrivateccStrCacheCode
비공개 ccBlnPublicCache,ccBlnPrivateCache
비공개 ccStrName,ccStrCookieName
비공개 ccStrDirection,ccStrSaveDirection,ccStrFile,ccStrSaveFile,ccStrPath
프라이빗 ccObjStream,ccObjFSO,ccStrFormat,ccIntObject,ccObjText,ccIntFormat
프라이빗 하위 클래스_Initialize
ccStrName = "default" '기본 이름
ccBlnPublicCache = 거짓
ccBlnPrivateCache = 거짓
ccStrFile = "cache.html"
ccStrSaveFile = "save_cache.html"
ccStrCookieName = "ccClass_Template" '응용 프로그램 개체 이름 접두사
ccStrFormat = "UTF-8" 'UTF-8|ASCII|GB2312|BIG5
ccIntFormat = -1
ccIntObject = 1 '기본 읽기/저장 템플릿 구성 요소 1:ADODB.Stream 2:FSO
ccStrPath = Server.MapPath("./")&"" '기본 루트 경로
End Sub
공용 속성 Let Name(ccStrName_in)
ccStrName = LCase(트림(ccStrName_in))
끝 속성
공용 속성 Let Format(ccStrFormat_in)
ccStrFormat = ccStrFormat_in
InStr(LCase(Trim(ccStrFormat_in)),"utf") > 0이면
ccIntFormat = -1
또 다른
ccIntFormat = 0
종료 조건
끝 속성
공용 속성 Let Object(ccStrObject_in)
ccStrObject_in = LCase(트림(ccStrObject_in))
InStr(ccStrObject_in,"fso") > 0이면
ccIntObject = 2
또 다른
ccIntObject = 1
종료 조건
끝 속성
공용 속성 Let PublicCache(ccBlnPublicCache_in)
ccBlnPublicCache_in = True이면 다음
ccBlnPublicCache = 참
또 다른
ccBlnPublicCache = 거짓
종료 조건
끝 속성
공용 속성 Let PrivateCache(ccBlnPrivateCache_in)
ccBlnPrivateCache_in = True인 경우 그러면
ccBlnPrivateCache = 참
또 다른
ccBlnPrivateCache = 거짓
종료 조건
끝 속성
공용 속성 Let Direction(ccStrDirection_in)
ccStrDirection = ccStrDirection_in
끝 속성
공용 속성 Let File(ccStrFile_in)
ccStrFile_in <> ""이면
ccStrFile = ccStrFile_in
종료 조건
끝 속성
공용 속성 Let SaveDirection(ccStrSaveDirection_in)
ccStrSaveDirection = ccStrSaveDirection_in
끝 속성
공용 속성 Let SaveFile(ccStrSaveFile_in)
ccStrSaveFile_in <> ""인 경우 다음
ccStrSaveFile = ccStrSaveFile_in
종료 조건
끝 속성
공공 속성 코드 가져오기
코드 = ccStrCode
끝 속성
공용 속성 저장소 가져오기
저장소=ccStrStorage
끝 속성
Public Sub ClearCache
ClearPrivateCache 호출
ClearPublicCache 호출
End Sub
Public Sub ClearPrivateCache
ccStrCacheCode = ""
End Sub
Public Sub ClearPublicCache
애플리케이션(ccStrCookieName&ccStrName) = ""
End Sub
Public Sub ClearStorage
ccStrStorage = ""
End Sub
Public Sub ClearCode
ccStrCode = ""
End Sub
Public Sub SaveFront
ccStrStorage = ccStrCode & ccStrStorage
End Sub
Public Sub SaveLast
ccStrStorage = ccStrStorage & ccStrCode
End Sub
Public Sub SaveCode
SaveToFile(1) 호출
End Sub
Public Sub SaveStorage
SaveToFile(2) 호출
End Sub
Public Sub SetVar(ccStrTag_in,ccStrValue_in)
ccStrCode = RePlace(ccStrCode,ccStrTag_in,ccStrValue_in)
End Sub
Private Sub SaveToFile(ccIntCode_in)
희미한 ccStrSaveCode
ccIntCode_in = 1이면
ccStrSaveCode = ccStrCode
또 다른
ccStrSaveCode = ccStrStorage
종료 조건
ccIntObject = 1이면
ccObjStream = Server.CreateObject("ADODB.Stream") 설정
ccObjStream 사용
.유형 = 2
.모드 = 3
.열려 있는
.Charset = ccStrFormat
.위치 = ccObjStream.Size
.WriteText ccStrSaveCode
.SaveToFile ccStrPath & ccStrSaveDirection & "" & ccStrSaveFile,2
.닫다
끝
ccObjStream = 없음으로 설정
또 다른
ccObjFSO = CreateObject("Scripting.FileSystemObject") 설정
ccObjFSO.FileExists(ccStrPath & ccStrSaveDirection & "" & ccStrSaveFile) = True인 경우 그러면
ccObjFSO.DeleteFile(ccStrPath & ccStrSaveDirection & "" & ccStrSaveFile)
종료 조건
ccObjText = ccObjFSO.OpenTextFile(ccStrPath & ccStrSaveDirection & "" & ccStrSaveFile,2,True,ccIntFormat) 설정
ccObjText.Write ccStrSaveCode
ccObjText = 없음으로 설정
ccObjFSO = 없음으로 설정
종료 조건
ccStrSaveCode = ""
하위 공용
하위 로드 종료
ccStrCode = ""
ccBlnPrivateCache = True이면 다음
ccFncIsEmpty(ccStrCacheCode) = False인 경우
ccStrCode = ccStrCacheCode
하위 종료
종료 조건
종료 조건
ccBlnPublicCache = True이면 다음
ccFncIsEmpty(Application(ccStrCookieName&ccStrName)) = False인 경우
ccStrCode = 애플리케이션(ccStrCookieName&ccStrName)
하위 종료
종료 조건
종료 조건
ccIntObject = 1이면
ccObjStream = Server.CreateObject("ADODB.Stream") 설정
ccObjStream 사용
.유형 = 2
.모드 = 3
.열려 있는
.Charset = ccStrFormat
.위치 = ccObjStream.Size
.LoadFromFile ccStrPath & ccStrDirection & "" & ccStrFile
ccStrCode = .ReadText
.닫다
끝
ccObjStream = 없음으로 설정
또 다른
ccObjFSO = CreateObject("Scripting.FileSystemObject") 설정
ccObjFSO.FileExists(ccStrPath & ccStrDirection & "" & ccStrFile) = True인 경우 그러면
ccObjText = ccObjFSO.OpenTextFile(ccStrPath & ccStrDirection & "" & ccStrFile,1,False,ccIntFormat) 설정
ccStrCode = ccObjText.ReadAll
ccObjText = 없음으로 설정
종료 조건
ccObjFSO = 없음으로 설정
종료 조건
ccBlnPrivateCache = True이면 다음
ccStrCacheCode = ccStrCode
종료 조건
ccBlnPublicCache = True이면 다음
애플리케이션(ccStrCookieName&ccStrName) = ccStrCode
종료 조건
End Sub
End 클래스
함수 ccFncIsEmpty(ByRef ccStrValue_in)
IsNull(ccStrValue_in) 또는 IsEmpty(ccStrValue_in) 또는 ccStrValue_in = ""인 경우
ccFncIsEmpty = 참
또 다른
ccFncIsEmpty = 거짓
종료 조건
기능 종료
예
템플릿 파일 내용
<#test#>
ASP 프로그램 코드
희미한 객체 템플릿
objTemplate 설정 = 새 ccClsTemplate
objTemplate.Name = "테스트"
objTemplate.Format = "UTF-8"
'캐싱 활성화
objTemplate.PublicCache = 참
objTemplate.PrivateCache = 참
'템플릿 디렉터리 및 파일 이름 설정
objTemplate.Direction = "테스트"
objTemplate.File = "test.html"
'저장 파일 디렉터리와 파일 이름을 설정합니다.
objTemplate.SaveDirection = "테스트"
objTemplate.SaveFile = "test3.html"
'템플릿 로드
objTemplate.Load를 호출합니다.
'텍스트 교체 수행
objTemplate.SetVar("<#test#>","Hello world.")를 호출합니다.
'텍스트를 스토리지에 저장
objTemplate.SaveLast를 호출합니다.
'효율성을 높이기 위해 개인 캐시에서 다시 로드되는 템플릿을 다시 로드합니다.
objTemplate.Load를 호출합니다.
'다른 값으로 대체
objTemplate.SetVar("<#test#>"," By Cloudream.")을 호출합니다.
'임시저장을 위해 Storage 끝에 저장
objTemplate.SaveLast를 호출합니다.
'코드를 파일에 저장
objTemplate.SaveCode를 호출합니다.
Response.Write objTemplate.Storage
설정 objTemplate = 없음
결과 표시
안녕하세요. Cloudream
저장 파일 결과
입니다.
클라우드림으로.