如下代码
http://192.168.1.238/excel.htm?xzai=757-106-29172&id=1
手机浏览器 点击 "btn5" 下载保存 文件名 并不是 drw("文件名")，而是 excel.htm，电脑浏览器确可以正确保存。
如何修改代码，请帮助！
fl = "d:\web\images\" & fl & "\" & drw("文件名") '合成含路径的文件名
wb.title = drw("文件名") & "下载"
If filesys.FileExists(fl) Then '如果是请求一个已经存在的文件
If e.GetValues.ContainsKey("go") Then
e.WriteFile(fl)
Return ""
Else
'wb.InsertHTML("<p align='center' style='margin-top:5px'>" & drw("文件名") & "</p>")
With wb.AddButtonGroup("","btg2", False) '生成换页按钮
With .Add("btn5", "点击下载","",e.Request.url.Tostring & "&go=a")
.Attribute = "download='" & drw("文件名") & "'"
End With
End With
End If
End If
加好友 
发短信
Post By：2019/7/25 15:02:00 [显示全部帖子]
