Subversion Repositories DevTools

Rev

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

Rev 6548 Rev 6559
Line 64... Line 64...
64 
' --- RUN onPostBack ---
 64 
' --- RUN onPostBack ---
65 
If Request("action") <> "" AND objAccessControl.UserLogedIn Then
 65 
If Request("action") <> "" AND objAccessControl.UserLogedIn Then
66 
 
 66 
 
67 
  If objEH.Finally Then
 67 
  If objEH.Finally Then
68 
    If Request("action") = "include" Then
 68 
    If Request("action") = "include" Then
69 
      Call IncludePackages (True)
 69 
      Call IncludePackages ()
70 
      ' Redirect to the current page so that a refesh will not
 70 
      ' Redirect to the current page so that a refesh will not
71 
      ' cause a form re-submit.
 71 
      ' cause a form re-submit.
72 
      Call Destroy_All_Objects
 72 
      Call Destroy_All_Objects
73 
      Response.Redirect(ScriptName & "?rtag_id=" & parRtagId)
 73 
      Response.Redirect(ScriptName & "?rtag_id=" & parRtagId)
74 
    Else
 74 
    Else