I suggest that you add a clientscript-tag after you´ve run your servercode.

Example:

<%
Sub SaveInfo
dbConns(And****)
End Sub
%>

<%if no Errors%>
<script language="JavaScript">
top.close()
</script>
<%end if%>