Application 对象 错误 'ASP 0104 : 80070057' 不允许操作 /Inc/Function.asp，行 101

Question

这个要如何来解决呢？

Answer 1

Function Create_Cache(ByVal t0,ByVal t1)
Dim t2(2)
t2(0)=t1:t2(1)=Now()
Application.Lock()
Application(Sdcms_Cookies&t0)=t2
Application.UnLock()
End Function'=====================================
'检测缓存是否存在
'=====================================
Function Check_Cache(ByVal t0)
Check_Cache=False
Dim CacheData
IF IsNull(t0) Or Len(t0)=0 Then Exit Function
CacheData=Application(Sdcms_Cookies&t0)
IF IsEmpty(CacheData) Or Not IsArray(CacheData) Then Check_Cache=True:Exit Function
IF DateDiff("s",CDate(CacheData(1)),Now())>=Sdcms_CacheDate Then Check_Cache=True
End Function'=====================================
'读取缓存
'=====================================
Function Load_Cache(ByVal t0)
Dim CacheData
CacheData=Application(Sdcms_Cookies&t0)
IF IsArray(CacheData) Then Load_Cache=CacheData(0) Else Load_Cache=t0
End Function