Subversion Repositories DevTools

Rev

Rev 1325 | Rev 1364 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1325 Rev 1363
Line 918... Line 918...
918
 
918
 
919
                                       <%Dim style, delta
919
                                       <%Dim style, delta
920
                                       style = ""
920
                                       style = ""
921
                                       delta = rsQry("delta")
921
                                       delta = rsQry("delta")
922
                                       If (delta > 600) AND (IsNull(pkgId) OR pkgId = "") Then
922
                                       If (delta > 600) AND (IsNull(pkgId) OR pkgId = "") Then
-
 
923
                                          style = "style=color:Red"
923
                                          if( daemonState < 2 ) Then
924
                                          if( daemonState >= 2 ) AND (delta > 86400 ) Then
-
 
925
                                            Dim bdate, dd,mm,yy
-
 
926
                                            bdate = DateAdd("s", - delta,Now())
-
 
927
                                            dd = Day(bdate)
-
 
928
                                            mm = MonthName(Month(bdate),1)
-
 
929
                                            yy = Year( bdate)
-
 
930
                                            delta = dd & "-" & mm & "-" & yy
924
                                          	style = "style=color:Red"
931
                                          	style = ""
-
 
932
                                          ElseIf ( delta > 60*60 ) Then
-
 
933
                                            'Dim bdate, hh, mins, ss
-
 
934
                                            bdate = DateAdd("s", - delta,Now())
-
 
935
                                            delta = TimeValue( bdate)
-
 
936
                                            'delta = hh & ":" & mins & ":" & ss
925
                                          End If
937
                                          End If
926
                                       End If%>
938
                                       End If%>
927
                                       <td nowrap <%=styleNow%><%=style%>><%=delta%></td>
939
                                       <td nowrap <%=styleNow%><%=style%>><%=delta%></td>
928
                                    <%End If%>
940
                                    <%End If%>
929
 
941