<% 클래스 CBUFFER
개인 objfso, objfile, objdict
Private M_StrPathTofile, M_TableBGCOLOR, M_STARTTIME
Private M_endTime, M_LINECOUNT, M_INTKEYMIN, M_INTKEYMAX
Private M_Codecolor, M_CommentColor, M_StringColor, M_TABSPACES
private sub class_initialize ()
tablebgcolor = 흰색
CodeColor = 파란색
commentColor = 녹색
StringColor = 회색
tabspaces =
pathtofile =
m_starttime = 0
m_endtime = 0
m_linecount = 0
keymin = 2
keymax = 8
set objdict = server.createobject (scripting.dictionary)
objdict.comparemode = 1
KreateKeywords
set objfso = server.createobject (scripting.filesystemobject)
종료 서브
private sub class_terminate ()
objdict = 아무것도 설정하지 않습니다
OBJFSO = 아무것도 설정하지 않습니다
종료 서브
공공 재산 let codecolor (incolor)
m_codecolor = <font color = & incolor &> <strong>
종료 속성
사유 재산 get codecolor ()
CodeColor = m_codecolor
종료 속성
공공 재산은 CommentColor (Incolor)를하자
m_commentColor = <font color = & incolor &>
종료 속성
사유 재산 get commentColor ()
commentColor = m_commentColor
종료 속성
공공 재산은 StringColor (Incolor)
m_stringColor = <font color = & incolor &>
종료 속성
사유 재산 GET StringColor ()
StringColor = m_stringColor
종료 속성
공공 재산은 탭 스페이스하자 (Inspaces)
m_tabspaces = Inspaces
종료 속성
사유 재산 get tabspaces ()
tabspaces = m_tabspaces
종료 속성
공공 재산 let tablebgcolor (incolor)
m_tablebgcolor = incolor
종료 속성
사유 재산 get tablebgcolor ()
tablebgcolor = m_tablebgcolor
종료 속성
공공 부동산 GET PROCISSINGTIME ()
ProcessingTime = Second (M_ENDTIME -M_STARTTIME)
종료 속성
공공 부동산 get linecount ()
linecount = m_linecount
종료 속성
공공 재산 GET PARTOFILE ()