1. Host Virtual Umum Diimplementasikan Menggunakan ADODB.Stream disediakan
Salinan kode adalah sebagai berikut:
FunctionLoadTempletFile (ByValpath)
OnerrorresumeNext
dimobjstream
setoBjStream = server.CreateObject ("adodb.stream")
TanpaBJStream
.type = 2
.mode = 3
.membuka
.LoadFromFileServer.mappath (Path)
iferr.number <> 0then
err.clear
response.write ("Template yang dimuat sebelumnya [" & Path & "] tidak ada!")
response.end ()
endif
.charset = "" & chrset & ""
.posisi = 2
loadTempletFile = .readtext
.menutup
endwith
setobjstream = tidak ada
fungsi endfungsi
2. Gunakan FSO untuk mengimplementasikan kecepatan pemuatan templat, tetapi banyak host virtual tidak menyediakan fungsi FSO.
Salinan kode adalah sebagai berikut:
'*************************************************************************************************************
'Nama fungsi: LoadTemplate
'Efek: Keluarkan konten template
'Parameter: Alamat TemplateFname Template
'Nilai Pengembalian: Konten Template
'**********************************************************************************************
FunctionLoadTemplate (TemplateFname)
OnerrorresumeNext
DIMFSO, Fileobj, FileStreamobj
SetFSO = createObject ("Scripting.FilesystemObject")