download file dialog

Does anyone know how to display the "download a file" dialog box using vbscript? I am looking for a script that will prompt the user "Open from current location" and "or, Save to disk" no matter which type of file is referenced. I.E., now if I do an href to a Word Document (in html) IE5 opens the doc automatically in its Word Browser thing, I want a prompt.

Thanks for any help.

Use the DoFileDownload API function.

Code:

---

Private Declare Function DoFileDownload _
Lib "shdocvw.dll" (ByVal lpszFile As String) As Long


Private Sub Command1_Click()

  Text1.text = "http://www.mysite.com/myfile.zip"
  Dim sDownload As String
  sDownload = StrConv(Text1.text, vbUnicode)
  Call DoFileDownload(sDownload)

End Sub

---

Thanks alot, it looks like that'll be exactly what I need.