<% @ Language = VBScript %>
<%
Response.buffer=true
Response.ExpiresAbsolute = Now() - 1
Response.AddHeader "Cache-Control", "private"
%>
Residential Appraiser for Los Angeles, Orange County, Riverside, San Bernardino
<%
TS = Now()
Y = CStr(DatePart("yyyy",TS))
M = CStr(DatePart("m",TS))
If Len(M) = 1 Then M = "0" & M
D = CStr(DatePart("d",TS))
If Len(D) = 1 Then D = "0" & D
H = CStr(DatePart("h",TS))
If Len(H) = 1 Then H = "0" & H
N = CStr(DatePart("h",TS))
If Len(N) = 1 Then N = "0" & N
S = CStr(DatePart("s",TS))
If Len(S) = 1 Then S = "0" & S
TS = M & "/" & D & "/" & Y
%>
