Automatisk download giver problemer

Jeg har følgende script:

<%@ Language=VBScript LCID=1030 EnableSessionState=False %>
<% 'download.asp
Option Explicit
Dim strFileSpec, objStream

strFileSpec = request.querystring("file")

Set objStream = Server.CreateObject("ADODB.Stream")

objStream.Type = 1
objStream.Open
objStream.LoadFromFile (strFileSpec)
Response.ContentType = "image/jpg"
Response.BinaryWrite (objStream.Read)

objStream.Close
Set objStream = Nothing
%>

Dette skal bruges til at downloade filer med...
Jeg kan sagtens få dialogboksen frem med muligheden for at downloade, men filen jeg har muligheden for at downloade er download.asp der er den fil jeg kalder med...

Jeg ønsker at få siden til at downloade forskellige filer også af forskellige typer. Siden skal bruges i forbindelse med et uploadsystem som jeg allerede har lavet. Det skal uploade følgende filtyper: (.jpg, .bmp, .gif, .doc. .txt)

Hvad gør jeg...?