Reload vindue

Jeg åbner et pop-up vindue fra mit hovedvindue når en bruger skal redigere en artikel. Når brugeren klikker submit opdateres DB'en og pop-up sinuet lukkes. Jeg vil imidlertid gerne opdatere indholdet i mit hovedvindue automatisk. Hvad gør jeg ?

Her er lidt kode:

<% if mode = "rediger" then %>
<%
'Hent værdier fra DB
SQL = "Select * from artikler where artikelid = " & Request.QueryString ("id")
Set rs = Conn.execute(SQL)
userlevel = rs("userlevel")
titel = rs("titel")
teaser = rs("teaser")
tekst = rs("tekst")
sortorder = rs("sortorder")
billedtekst = rs("billedtekst")
billede = rs("billede")
%>
<!--#include file="EZEditor/gemfunktioner.inc"-->
<table cellpadding=5 cellspacing=0 class="tekst" width="100%">
<form name="artikel" method="post" action="artikelEdit.asp?mode=rediger_process" onSubmit="return checkform();">
<tr bgcolor="#C6BC9F">
  <td><b>Rediger artikel</b></td>
</tr>
<tr bgcolor="#ECE9D8">
  <td class="tekst"><b>Rettighedsniveau:</b><br>
  <select name="userlevel">
  <%
  SQL = "Select * from usertypes"
  Set rs = Conn.execute(SQL)
  do while not rs.eof
        Response.Write "<option "
       
        if userlevel = rs("usertypeid") then
        Response.Write "selected "
        end if
       
        Response.write "value=""" & rs("usertypeid") & """>" & rs("usertype") & "</option>"
  rs.movenext
  loop
  %>
  </select>
  </td>
</tr>
<tr bgcolor="#ECE9D8">
  <td class="tekst"><b>Overskrift:</b><br><input type="text" name="titel" size="74" value="<%=titel%>"></td>
</tr>
<tr bgcolor="#ECE9D8">
  <td class="tekst"><b>Teaser:</b><br>
  <textarea cols="64" rows="5" name="teaser"><%=teaser%></textarea></td>
</tr>
<tr bgcolor="#ECE9D8">
  <td><b>Tekst:</b><br>
  <iframe height="400" width="538" style="position:relative;top:4px;" name="EZEditor" src="ezeditor/editor.asp?inputUrl=http://www.bfss.dk/includes/artikeltekst.asp?id=<%= Request.QueryString ("id") %>">
  </iframe>
  </td>
</tr>
<tr bgcolor="#ECE9D8">
  <td><b>Billedtekst:</b><br>
  <textarea cols="64" rows="5" name="billedtekst"><%=billedtekst%></textarea>
  </td>
</tr>
<tr>
  <td>
  <input type="submit" class="button" value="Opdater" id=submit2 name=submit2><input type="button" value="Fortryd" onclick="window.close()">
  <input type="hidden" name="tekst_i_editor" value="artikel_tekst">
  <input type="hidden" name="artikel_tekst" value="<%=htmlenc(artikel_tekst)%>">
  </td>
</tr>
<input type="hidden" name="artikelid" value="<%=Request.QueryString ("id")%>">
<input type="hidden" name="kategoriid" value="<%=Request.QueryString ("kategoriid")%>">
</form>
</table>
<% end if %>

<% if mode = "rediger_process" then %>
<%
userlevel = Request.Form("userlevel")
titel = dbtext(Request.Form("titel"))
teaser = dbtext(Request.Form("teaser"))
tekst = dbtext(Request.Form("artikel_tekst"))
billedtekst = dbtext(Request.Form("billedtekst"))

SQL = "Update artikler set userlevel = "&userlevel&", titel = '"&titel&"', teaser = '"&teaser&"', tekst = '"&tekst&"', billedtekst = '"&billedtekst&"', sidstopdateret = #"&now()&"#, sidstopdateretaf = '"&Session("user_login")&"' where artikelid = " & Request.Form("artikelid")
Conn.execute(SQL)
%>
<script>
window.close()
</script>
<% end if %>