แบ่งปันสิ่งที่ดีไดนามิกรวมไฟล์ (ไฟล์ไดนามิกรวม)

เร็วเท่าที่ปี 2003 ฉันเห็นบทความเกี่ยวกับในอุดมคติสีน้ำเงิน ฉันคิดว่ามันมีพลังมากในเวลานั้น แต่หลังจากใช้จริงแล้วมันก็ไม่สะดวกและผลของการรวมนั้นไม่ดี

หลังจากนั้นฉันเห็นเวอร์ชันที่ได้รับการปรับปรุงบนเว็บไซต์ แต่มันก็ไม่ได้มีประโยชน์มาก ~~~

อนิจจาฉันรู้สึกว่าฉันต้องการที่จะยอมแพ้ ASP ในเวลานั้น แต่เนื่องจาก บริษัท ยังคงใช้ ASP เพื่อพัฒนาฉันไม่มีทางเลือก ...

วันนี้ฉันต้องจำวันนี้ ~~~ ฉันพบสิ่งที่ดีเช่นนี้ในเว็บไซต์ต่างประเทศซึ่งยอดเยี่ยมมาก ~~~ Greatworks !!!

บางไดนามิกรวมถึงรหัสที่ฉันลองก่อนไม่สามารถรวมคลาสหรือแม้แต่ฟังก์ชั่น ~~~ หรือรวมอยู่ในไฟล์รวมไม่สามารถรวมได้ ...

ตอนนี้ชั้นเรียนที่เขียนโดย Ghost Guy (Dselkirk) สามารถทำสิ่งนี้ให้เราได้ ~~~

การคัดลอกรหัสมีดังนี้:

-

publicinclude, inclult_vars

setinclude = newCls_include

classescls_include

Privatesubclass_initialize ()

setinclude_vars = server.createObject ("scripting.dictionary")

enddub

Privatesubclass_deactivate ()

arr_variables.removeall

setinclude_vars = ไม่มีอะไร

setinclude = ไม่มีอะไร

enddub

PublicDefaultFunctionInclude (byvalstr_path)

dimstr_source

ifstr_path <> "" แล้ว

str_source = readfile (str_path)

ifstr_source <> "" แล้ว

processincludesstr_source

Convert2Codestr_Source

formatcodestr_source

ifstr_source <> "" แล้ว

ifrequest.querystring ("debug") = 1 จากนั้น

Response.writestr_source

Response.end

อื่น

ExecuteGlobalstr_source

include_vars.removeall