- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]手机端下载文件的问题 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=113828)
-- 发布时间：2018/1/23 20:26:00
-- [求助]手机端下载文件的问题
安卓APP
点击ceshi1.txt无反应，
我想实现用户单击文件标题后能够直接另行打开ceshi1.txt这个文件
With wb.AddTable("form1","Table1")
.RowHead = 1 \'左边第一列作为行头
.head.AddRow("序号","内容") \'表头
For Each File As String In FileSys.GetFiles(mulu)
i = i + 1
.body.AddRow(i,"<a href=\'" & File & "\'>" & File.Replace(mulu & "\\","") & "</a>")
Next
End With
此主题相关图片如下：微信图片_20180123202532.jpg
-- 发布时间：2018/1/23 20:34:00
--
安卓APP实际显示的样式
此主题相关图片如下：微信图片_20180123203818.png
[此贴子已经被作者于2018/1/23 20:38:49编辑过]
-- 发布时间：2018/1/23 20:53:00
--
文件放到事件头的路径下："d:\\web\\ceshi1.txt"
.body.AddRow(i,"<a href=\'JavaScript;\' onclick=javascrtpt:window.location.href=\'" & File.Replace(mulu & "\\","") & "\'>" & File.Replace(mulu & "\\","")
-- 发布时间：2018/1/23 20:59:00
--
搞成按钮显示的样式也挺好，就是不知道怎么能直接打开文件
此主题相关图片如下：微信图片_20180123205824.png
-- 发布时间：2018/1/23 21:09:00
--
无法直接打开，只能下载后用其它应用打开
-- 发布时间：2018/1/23 21:40:00
--
我居然搞出来了 哈哈 供其他人参考
With wb.AddButtonGroup("form1","btg111",True) \'垂直排列
For Each File As String In FileSys.GetFiles(mulu)
i = i + 1
With .Add(i,File.Replace(mulu & "\\",""),"button")
.Kind = 1
.Attribute = "onclick= javascrtpt:window.location.href=\'" & File.Replace("\\","/").Replace("d:/web","") & "\'"
End With
Next
End With
-- 发布时间：2018/1/23 21:43:00
--
但是不知道为什么要引用相对路径不能引用绝对路径，在这个地方费了好长时间
文件名字也不能有其他的空格等非法字符，也不可以
[此贴子已经被作者于2018/1/23 22:16:04编辑过]
-- 发布时间：2018/1/24 9:29:00
--
以下是引用智友软件工作室在2018/1/23 21:43:00的发言：
但是不知道为什么要引用相对路径不能引用绝对路径，在这个地方费了好长时间
但是不知道为什么要引用相对路径不能引用绝对路径，在这个地方费了好长时间
文件名字也不能有其他的空格等非法字符，也不可以
[此贴子已经被作者于2018/1/23 22:16:04编辑过]
绝对路径，可以的。
中文等问题，编码一下就行了 http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=98762&authorid=0&page=0&star=1