<٪ فئة cbuffer
Objfso الخاص ، Objfile ، objdict
خاص m_strathtofile ، m_tablebgcolor ، m_startTime
m_endtime الخاص ، m_linecount ، m_intkeymin ، m_intkeymax
m_codecolor الخاص ، m_commentcolor ، m_stringColor ، m_tabspaces
sub sub class_initialize ()
TableBgColor = أبيض
الترميز = الأزرق
CommentColor = الأخضر
StringColor = رمادي
tabspaces =
pathtofile =
m_startTime = 0
m_endtime = 0
m_linecount = 0
Keymin = 2
keymax = 8
تعيين OBJDICT = server.createBject (scripting.dictionary)
objdict.comparemode = 1
CreateKeywords
تعيين objfso = server.createBject (scripting.filesystemObject)
نهاية الفرعية
sub sub class_terminate ()
تعيين ObjDict = لا شيء
تعيين OBJFSO = لا شيء
نهاية الفرعية
الممتلكات العامة دع الترميز (incolor)
m_codecolor = <font color = & incolor &> <strong>
نهاية الملكية
الممتلكات الخاصة الحصول على الترميز ()
codecolor = m_codecolor
نهاية الملكية
الممتلكات العامة تدع CommentColor (incolor)
m_commentColor = <font color = & incolor &>
نهاية الملكية
الممتلكات الخاصة احصل على CommentColor ()
CommentColor = m_commentColor
نهاية الملكية
الممتلكات العامة دع stringColor (incolor)
m_stringColor = <font color = & incolor &>
نهاية الملكية
الممتلكات الخاصة الحصول على StringColor ()
StringColor = m_stringColor
نهاية الملكية
الممتلكات العامة دع Tabspaces (ملهمة)
m_tabspaces = الملهم
نهاية الملكية
الممتلكات الخاصة الحصول على tabspaces ()
tabspaces = m_tabspaces
نهاية الملكية
الممتلكات العامة دع TableBgColor (incolor)
m_tablebgColor = incolor
نهاية الملكية
الممتلكات الخاصة GETBGCOLOR ()
TableBgColor = m_tablebgcolor
نهاية الملكية
الممتلكات العامة تحصل على وقت المعالجة ()
وقت المعالجة = الثاني (m_endtime - m_startTime)
نهاية الملكية
الممتلكات العامة الحصول على linecount ()
linecount = m_linecount
نهاية الملكية
الممتلكات العامة الحصول على pathtofile ()