Download script virker ikke i IE og Opera?

Hej, jeg har lavet et script til at downloade filer uden at brugeren kan se den direkte link til filen.
Jeg bruger aspsmartupload for at kunne gør det, men en meget skummel ting sker hvis man bruger IE og Opera.
Hvis man henter f.eks. en zip fil med IE kan man ikke åbne filen og i opera kan man åbne zip filen, men ikke filen i zip filen.
Og det hele virker fint i firefox?????

Det er koden:

download = Request.QueryString("download")
filename = Request.QueryString("filename")
id = Request.QueryString("id")
dcount = Request.QueryString("dcount")
referer = Request.ServerVariables("HTTP_REFERER")
httphost = Request.ServerVariables("HTTP_HOST")

if (download = "true" AND filename <> "") AND (instr(referer, "none01.lir.dk")<>0 AND referer <> "") AND (left(referer,20) = "http://none01.lir.dk" OR left(referer,24) = "http://www.none01.lir.dk") then
  Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")
  dir = "my_small_scripts/files_to_download/" & filename
  call mySmartUpload.DownloadFile(dir)
  ' mySmartUpload.DownloadFile("my_small_scripts/files_to_download/" & filename)
  set mySmartUpload = nothing
  strsql = "UPDATE my_scripts SET downloadcount = '" & dcount+1 & "', lastdownloaded = '" & FormatDateTime(Now, vbShortDate) & " " & FormatDateTime(Now, vbShortTime) & "' WHERE id = '" & id & "'"
  con.execute(strsql)
  'Response.Redirect("default.asp?page=2")
  elseif download = "true" then
  Response.Write(left(referer,24))
  Response.Write("<div class=""error"">You are not allowed to make a direct link to a file!</div><br />")
end if

  Set rs = Server.CreateObject("ADODB.Recordset")
  strsql = "SELECT * FROM my_scripts ORDER BY id DESC"
  rs.Open strsql, con, 1, 2
  Do While NOT rs.EOF
%>
<table width="100%" border="0" class="table">
            <tr align="center" class="nav_long">
            <td valign="top"><span class="style4">
        <%=rs("name")%>
        </span></td>         
            </tr>
              <td height="100%" align="left" valign="top">
<table width="100%" border="0" class="collapse">
  <tr>
    <td width="22%" valign="top" class="underline2">Description:</td>
    <td width="78%" valign="top"class="underline2"><%=rs("description")%></td>
  </tr>
  <tr>
    <td valign="top" class="underline2">Author:</td>
    <td valign="top" class="underline2"><%=rs("author")%></td>
  </tr>
  <tr>
    <td valign="top" class="underline2">Version:</td>
    <td valign="top" class="underline2"><%=rs("version")%></td>
  </tr>
  <tr>
    <td valign="top" class="underline2">Release date: </td>
    <td valign="top" class="underline2"><%=rs("releasedate")%></td>
  </tr>
  <tr>
    <td valign="top" class="underline2">Last time downloaded: </td>
    <td valign="top" class="underline2"><%=rs("lastdownloaded")%></td>
  </tr>
  <tr>
    <td valign="top" class="underline2">Filesize:</td>
    <td valign="top" class="underline2"><%=rs("filesize")%></td>
  </tr>
  <tr>
    <td valign="top" class="underline2">Downloaded:</td>
    <td valign="top" class="underline2"><%=rs("downloadcount")%> time(s) </td>
  </tr>
  <tr>
    <td valign="top">&nbsp;</td>
    <td valign="top" align="left">
    <form method="post" action="default.asp?page=2&download=true&filename=<%=rs("filename")%>&dcount=<%=rs("downloadcount")%>&id=<%=rs("id")%>">
    <input type="submit" class="mainoption" value="Download" />
    </form>
    </td>
  </tr>
</table>
      </td>
            </tr>
          </table>
      <br />
<%
rs.MoveNext
loop
set rs = nothing
con.Close
set con = nothing
%>