SCRIPT que corrige a lentidão de atualização do cache.

cacheFix.asp

Function LZ(ByVal Number)
 If Number < 10 Then
   LZ = "0" & CStr(Number)
 Else
   LZ = CStr(Number)
 End If
End Function

Function TimeStamp
 Dim CurrTime
 CurrTime = Now()

 TimeStamp = CStr(Year(CurrTime)) & "-" _
   & LZ(Month(CurrTime)) & "-" _
   & LZ(Day(CurrTime)) & " " _
   & LZ(Hour(CurrTime)) & ":" _
   & LZ(Minute(CurrTime)) & ":" _
   & LZ(Second(CurrTime))
End Function

'modelo de include no html
'<script src="../Html/SACIT00000s0.js?<%=Escape(TimeStamp()) %>" type="text/javascript"></script>
'<script src="../Html/SACIT00010s0.js?<%=Escape(TimeStamp()) %>" type="text/javascript">