Subversion Repositories DevTools

Rev

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

Rev 5930 Rev 5957
Line 74... Line 74...
74 
End Function
 74 
End Function
75 
'-----------------------------------------------------------------------------------------------------------------------
 75 
'-----------------------------------------------------------------------------------------------------------------------
76 
%>
 76 
%>
77 
<%
 77 
<%
78 
'==================== MAIN LINE ===============================
 78 
'==================== MAIN LINE ===============================
- 
 
 79 
If (parPkgId = "") Then
- 
 
 80 
    Call Destroy_All_Objects
79 
If (parPkgId = "") Then Response.Redirect ("index.asp")
 81 
    Response.Redirect ("index.asp")
- 
 
 82 
End If
80 
 
 83 
 
81 
PackageName = GetPackageName ( parPkgId )
 84 
PackageName = GetPackageName ( parPkgId )
82 
'==============================================================
 85 
'==============================================================
83 
%>
 86 
%>
84 
<html>
 87 
<html>