sql = "select FileName,Attach from Attach where ID=" & ID & ""
            ds = SqlHelper.ExecuteDataset(pConnstr, CommandType.Text, sql)
            If ds.Tables(0).Rows.Count > 0 Then
                For i = 0 To ds.Tables(0).Rows.Count - 1
                    SaveFileName = Application.StartupPath + "\Main\Data\" + Now.ToString("yyyyMMdd_HHmmss") + ds.Tables(0).Rows(i).Item("FileName")
                    Dim imgData() As Byte
                    imgData = ds.Tables(0).Rows(0).Item("Attach")
                    Dim fs As FileStream
                    fs = File.Create(SaveFileName, imgData.Length - 1)
                    fs.Write(imgData, 0, imgData.Length - 1)
                    fs.Close()
             Next            End If
以上是我的下载代码,但是只能下载到固定地址,我想在点击下载的瞬间可以弹出询问保存或者打开的提示窗口,应该怎么写,希望各位大佬给指点下,最好给点代码提示,拜谢。