捌度空間 緩存類
捌度空間 緩存類代碼
<%
class cache
private obj 'cache內容
private expiretime '過期時間
private expiretimename '過期時間application名
private cachename 'cache內容application名
private path 'url
private sub class_initialize()
path=request.servervariables("url")
path=left(path,instrrev(path,"/"))
end sub
private sub class_terminate()
end sub
public property get blempty
'是否為空
if isempty(obj) then
blempty=true
else
blempty=false
end if
end property
public property get valid
'是否可用(過期)
if isempty(obj) or not isdate(expiretime) then
valid=false
elseif cdate(expiretime)
代碼如下:
<%
class cache
private obj 'cache內容
private expiretime '過期時間
private expiretimename '過期時間application名
private cachename 'cache內容application名
private path 'url
private sub class_initialize()
path=request.servervariables("url")
path=left(path,instrrev(path,"/"))
end sub
private sub class_terminate()
end sub
public property get blempty
'是否為空
if isempty(obj) then
blempty=true
else
blempty=false
end if
end property
public property get valid
'是否可用(過期)
if isempty(obj) or not isdate(expiretime) then
valid=false
elseif cdate(expiretime)
相關文章
- ASP怎么談到應用到類的?
- 檢測函數(shù) asp class
- 遭遇ASP類的事件設計
- ASP高亮類
- Object對象的一些的隱藏函數(shù)介紹
- 淺談ASP中的類
- 在VBScript中使用類
- ASP 類專題
- 代碼與頁面的分離
- ASP代碼的對象化
- 一個asp快速字符串連接類
- 一個簡單的asp數(shù)據(jù)庫操作類
- ASP類編寫詳細說明
- 實現(xiàn)支持邏輯搜索/單詞搜索/詞組搜索+支持OR/AND關鍵字的VBS CLASS!
- ASP類Class入門 推薦
- 創(chuàng)建一個ASP通用分頁類
- 如何編寫一個ASP類
- 一個ACCESS數(shù)據(jù)庫訪問的類第1/3頁
- 分頁類,異常類
- ASP 類 Class入門