<%
my_date=Now
Response.Write FormatDateTime(my_date,4)
response.Write("
")
min=Minute(Now)
response.Write(min)
min2=min+2
if min2>=60 then
min2=min2-60
'hr=hr+1
end if
%>
<%Response.AddHeader "Refresh", "10;URL=log.asp?done=yes"
%>
<%
if request.QueryString("done")="yes" then
response.write("its next refresh")
Set objRS1 = objConn.Execute(sql)
objConn.Close
Set objConn = Nothing
response.Redirect("log.asp")
'Response.AddHeader "Refresh", "10;URL=right.asp"
elseif request.QueryString("done")="" then
response.Write("it first time page")
end if
%>