1. يتم توفير المضيفين الظاهريين العامين الذين يتم تنفيذها باستخدام ADODB.Stream
نسخة الكود كما يلي:
FunctionLoadTempletFile (ByvalPath)
onerrorresumenext
Dimobjstream
setObjStream = server.createBject ("Adodb.stream")
بدون BJStream
.type = 2
. وضع = 3
.يفتح
.LoadFromFileserver.mappath (المسار)
iferr.number <> 0then
err.clear
Response.write ("قالب التحميل مسبقًا [" & path & "] غير موجود!")
استجابة.
Endif
.charset = "" & chrset & ""
.position=2
loadTempletFile = .readtext
.يغلق
endwith
setObjStream = لا شيء
الوظيفية
2. استخدم FSO لتنفيذ سرعة التحميل للقوالب ، ولكن العديد من المضيفين الافتراضيين لا يوفرون وظائف FSO.
نسخة الكود كما يلي:
'*************************************************************************************************
اسم الوظيفة: loadtemplate
التأثير: أخرج محتوى القالب
'المعلمة: عنوان قالب templatefname
'قيمة الإرجاع: محتوى القالب
'**************************************************************************************************
FunctionLoadTemplate (templatefname)
onerrorresumenext
Dimfso ، FileObj ، Filestreamobj
setfso = createObject ("scripting.filesystemObject")