| Line 51... |
Line 51... |
| 51 |
' Make sure pv_id exists as it may be removed
|
51 |
' Make sure pv_id exists as it may be removed
|
| 52 |
If pkgInfoHash.Item("pv_id") = "" Then Response.Redirect ("dependencies.asp?rtag_id="& Request("rtag_id"))
|
52 |
If pkgInfoHash.Item("pv_id") = "" Then Response.Redirect ("dependencies.asp?rtag_id="& Request("rtag_id"))
|
| 53 |
|
53 |
|
| 54 |
Else
|
54 |
Else
|
| 55 |
If (ScriptName <> "dependencies.asp") AND (ScriptName <> "find.asp")Then Response.Redirect ("dependencies.asp?rtag_id="& Request("rtag_id"))
|
55 |
If (ScriptName <> "dependencies.asp") AND (ScriptName <> "find.asp")Then Response.Redirect ("dependencies.asp?rtag_id="& Request("rtag_id"))
|
| - |
|
56 |
' Get basic information - if no package is present
|
| - |
|
57 |
Call Get_NoPkg_Info( Request("rtag_id") )
|
| 56 |
End If
|
58 |
End If
|
| 57 |
|
59 |
|
| 58 |
|
60 |
|
| 59 |
'----------------------------------------------
|
61 |
'----------------------------------------------
|
| 60 |
%>
|
62 |
%>
|
| Line 235... |
Line 237... |
| 235 |
|
237 |
|
| 236 |
'-----------------------------------------------------------------------------------------------------------------------------
|
238 |
'-----------------------------------------------------------------------------------------------------------------------------
|
| 237 |
Sub RenderDaemonBar(irtag_id,ipv_id)
|
239 |
Sub RenderDaemonBar(irtag_id,ipv_id)
|
| 238 |
%>
|
240 |
%>
|
| 239 |
<!-- Daemon Bar ---------------------------- -->
|
241 |
<!-- Daemon Bar ---------------------------- -->
|
| 240 |
<table width="100%" border="0" cellspacing="2" cellpadding="0">
|
242 |
<table border="0" cellspacing="2" cellpadding="0">
|
| 241 |
<tr>
|
243 |
<tr>
|
| 242 |
<td valign=bottom>
|
244 |
<td valign=bottom>
|
| 243 |
<%
|
245 |
<%
|
| 244 |
If irtag_id<>"" Then
|
246 |
If irtag_id<>"" Then
|
| 245 |
Dim objDmSts: Set objDmSts = New DaemonStatus
|
247 |
Dim objDmSts: Set objDmSts = New DaemonStatus
|
| Line 259... |
Line 261... |
| 259 |
|
261 |
|
| 260 |
'-----------------------------------------------------------------------------------------------------------------------------
|
262 |
'-----------------------------------------------------------------------------------------------------------------------------
|
| 261 |
Sub RenderActionBar(irtag_id,ipv_id)
|
263 |
Sub RenderActionBar(irtag_id,ipv_id)
|
| 262 |
Response.write("<table border=0 cellpadding=0 cellspacing=0>")
|
264 |
Response.write("<table border=0 cellpadding=0 cellspacing=0>")
|
| 263 |
Response.write(" <tr>")
|
265 |
Response.write(" <tr>")
|
| 264 |
Response.write(" <td width='50%'>")
|
266 |
Response.write(" <td width='99%'>")
|
| 265 |
If Not ((ipv_id = "") or (IsNull(ipv_id))) Then
|
267 |
If Not ((ipv_id = "") or (IsNull(ipv_id))) Then
|
| 266 |
Call RenderActionButtons
|
268 |
Call RenderActionButtons
|
| 267 |
End If
|
269 |
End If
|
| 268 |
Response.write(" </td>")
|
270 |
Response.write(" </td>")
|
| 269 |
|
271 |
|