前處理（經典）ASP頁面

Question

我正在運行一個經典的vbscript ASP站點和SQL2008數據庫。有幾頁處理器很重，但實際上並沒有經常改變。理想情況下，我希望服務器每晚處理一次這些數據（可能放入HTML頁面），然後再從服務器上飛走，而不必爲每個用戶處理。

任何想法，我可以做到這一點？

該應用程序本身工作得很好，所以我不想用另一種腳本語言重寫整個事情，即使經典的asp有點過山！

Answer 1

是：

你沒有指定頁面的部分是「處理器重」，但我會假設它是SQL數據的查詢和處理。一個想法是檢索數據並將其作爲緩存文件存儲在文件系統中。 XML是數據格式的不錯選擇。

而你原來的代碼是這樣的：

(psuedocode) 
get results from database 
process results to generate html file 

...修改後的代碼可以是這樣的：

check if cache file exists 
if not exist 
    get results from database 
    store results in cache file 
get results from cache file 
process results to generate html file. 

這是一般的高速緩存方法，可以應用到你有 查詢參數確定輸出的情況。根據所有組成參數簡單地生成緩存文件的名稱。因此，如果結果取決於名爲p1和p2的查詢參數，那麼當p1和p2分別具有值1234和blue時，緩存文件可能被命名爲cache-1234-blue.xml。如果您有5個不同的查詢，則可以將它們緩存爲query1-1234-blue.xml，query2-1234-blue.xml等。

你不需要這樣做「每晚」。您可以在代碼中包含緩存生命週期，並且在「如果緩存文件存在」測試中使用「如果緩存文件存在並且是新鮮的」。要做到這一點，只需獲取緩存文件上的最後修改時間戳，並查看它是否比緩存生存期更早。

Function FileOlderThan(fname, age) 
    'function returns True if the file is older than the age, 
    ' specified in minutes. 
    Dim LastModified, FSO, DateDifference 

    Set FSO = CreateObject("Scripting.FileSystemObject") 
    LastModified = FSO.GetFile(fname).DateLastModified 
    DateDifference = DateDiff("n", LastModified, Now()) 
    If DateDifference > age Then 
     FileAge = False 
    Else 
     FileAge = True 
    End If 
End Function 


fname = Server.MapPath(".") & cacheFileName 
If FileOlderThan(fname, 10) Then 
    ... retrieve fresh data ... 
End If 

這可能是10分鐘，10小時，10個請求，無論你喜歡什麼。

我上面說過，對於緩存文件中的數據格式來說，XML是一個不錯的選擇。 ADO具有SaveAsXML方法，您還可以使用附加到查詢的FOR XML子句直接從SQL2008生成XML。

---

如果「處理器重」的部分不是查詢和檢索，但在html頁面的生成，那麼你可以申請相同的排序方式，而只是直接緩存HTML文件。