应该是file2=A.docx
以下代码测试通过
Select Case e.Path
Case "test.htm"
Dim wb As New weui
wb.AddForm("","form1","download.htm?file=" & UrlEncode("F2/123.doc"))
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "审批", "submit")
End With
e.WriteString(wb.Build)
Case "download.htm"
Dim file As String = e.Values("file")
Dim fs As System.IO.FileStream = Nothing
fs = System.IO.File.Open("f:\" & file, System.IO.FileMode.Open)
Dim btFile As Byte() = New Byte(fs.Length - 1) {}
fs.Read(btFile, 0, Convert.ToInt32(fs.Length))
fs.Close()
e.Response.Headers("Content-Disposition") = "attachment;filename=" & FileSys.GetName(file)
'输出文件格式
e.Response.C
Dim output = e.response.OutputStream
output.Write(btFile,0,btFile.Length)
output.Close()
End Select
加好友 
发短信
Post By：2017/9/12 21:27:00 [显示全部帖子]
