reza_shnia
دوشنبه 04 خرداد 1388, 09:42 صبح
سلام
من برای اینکه ترافیک صفحه اصلی سایت به بانک فشار نیاره ، به ذهنم رسید که :
بعد از هربار تغییر در محتویات صفحه اول سایت ، نتیجه کامپایل شده فایل index.asp را در یک فایل به اسم index.html ذخیره بکنم ، تا با این کار ترافیک بانک و بار پردازش را از روی سرور سبک کنم.
یک حسن دیگه ای که داره اینکه ، اگر به بانک سایت حمله بشه ، صفحه اصلی سایت خراب نمی شه.
حالا من برای اینکه فایل index.asp را درسمت سرور کامپایل کنم مشکل دارم.
نتیجه تحقیقاتی که من در این ضمینه کردم این هاست :
Dim fs
Dim txtfile
strfile=Server.MapPath("FILENAME.HTML")
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = fs.CreateTextFile(strFile, 8, True)
objfile.writeline("HTML CODE")
set txtfile=nothing
set fs=nothing
objfile.close
با این کد ، شما می تونید یک فایل txt ایجاد کنید و محتویات اون رو مقدار دیهی کنید.
کد دومی که من بدست آوردم و احتمالا بدرد بخور باشه اینه :
set t=fs.OpenTextFile(Server.MapPath("index.asp"),1,false,-1)
x=t.ReadAll
بعد از اجرای این کد ، مقدار متغییر x برابر محتویات فایل index.asp می شود.
حالا با تلفیق این دوتا کد ، من توقع داشتم که مشکلم حل بشه.
یعنی :
Dim fs
Dim txtfile
strfile=Server.MapPath("FILENAME.HTML")
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = fs.CreateTextFile(strFile, 8, True)
set t=fs.OpenTextFile(Server.MapPath("index.asp"),1,false,-1)
x=t.ReadAll
objfile.writeline(x)
set txtfile=nothing
set fs=nothing
objfile.close
با این کد ، سرور ، محتیویات فایل index.asp را می خواند و نتیجه را در FILENAME.HTML ذخیره می کند.
اما مشکل اینجاست که محتویات فایل FILENAME.HTML ، همون کدهای asp می شود ، نه کامپایل شده اون
یک روش دیگه ای که به ذهنم رسید ، استفاده از کد
<!--#include file="wisdom.inc"-->بود ، ولی باز هم نشد.
اگر کسی راهی به ذهنش میرسه لطفا راهنمایی کنه.
متشکرم
من برای اینکه ترافیک صفحه اصلی سایت به بانک فشار نیاره ، به ذهنم رسید که :
بعد از هربار تغییر در محتویات صفحه اول سایت ، نتیجه کامپایل شده فایل index.asp را در یک فایل به اسم index.html ذخیره بکنم ، تا با این کار ترافیک بانک و بار پردازش را از روی سرور سبک کنم.
یک حسن دیگه ای که داره اینکه ، اگر به بانک سایت حمله بشه ، صفحه اصلی سایت خراب نمی شه.
حالا من برای اینکه فایل index.asp را درسمت سرور کامپایل کنم مشکل دارم.
نتیجه تحقیقاتی که من در این ضمینه کردم این هاست :
Dim fs
Dim txtfile
strfile=Server.MapPath("FILENAME.HTML")
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = fs.CreateTextFile(strFile, 8, True)
objfile.writeline("HTML CODE")
set txtfile=nothing
set fs=nothing
objfile.close
با این کد ، شما می تونید یک فایل txt ایجاد کنید و محتویات اون رو مقدار دیهی کنید.
کد دومی که من بدست آوردم و احتمالا بدرد بخور باشه اینه :
set t=fs.OpenTextFile(Server.MapPath("index.asp"),1,false,-1)
x=t.ReadAll
بعد از اجرای این کد ، مقدار متغییر x برابر محتویات فایل index.asp می شود.
حالا با تلفیق این دوتا کد ، من توقع داشتم که مشکلم حل بشه.
یعنی :
Dim fs
Dim txtfile
strfile=Server.MapPath("FILENAME.HTML")
Set fs = Server.CreateObject("Scripting.FileSystemObject")
Set objFile = fs.CreateTextFile(strFile, 8, True)
set t=fs.OpenTextFile(Server.MapPath("index.asp"),1,false,-1)
x=t.ReadAll
objfile.writeline(x)
set txtfile=nothing
set fs=nothing
objfile.close
با این کد ، سرور ، محتیویات فایل index.asp را می خواند و نتیجه را در FILENAME.HTML ذخیره می کند.
اما مشکل اینجاست که محتویات فایل FILENAME.HTML ، همون کدهای asp می شود ، نه کامپایل شده اون
یک روش دیگه ای که به ذهنم رسید ، استفاده از کد
<!--#include file="wisdom.inc"-->بود ، ولی باز هم نشد.
اگر کسی راهی به ذهنش میرسه لطفا راهنمایی کنه.
متشکرم