Foxtable(狐表)用户栏目专家坐堂 → 什么显示多文件内容


  共有3242人关注过本帖树形打印复制链接

主题:什么显示多文件内容

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106063 积分:539408 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/20 11:27:00 [显示全部帖子]


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106063 积分:539408 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/20 11:39:00 [显示全部帖子]

for each s as string in pr.lines("图片一")
.AddImage("img/" & s)
next
[此贴子已经被作者于2021/8/20 11:38:53编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106063 积分:539408 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/20 11:55:00 [显示全部帖子]

DataRow提供了一个Lines属性,该属性以字符集合的形式返回或设置单元格内容。


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106063 积分:539408 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/20 14:23:00 [显示全部帖子]

.AddImage("img/" & pr.lines("图片一")(0))

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106063 积分:539408 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/20 14:47:00 [显示全部帖子]

Case "receive.htm"
    For Each key As String In e.Files.Keys
        If e.Files(key).count > 6 Then
            e.WriteString("不能大于6个图片")
            Return
        End If
    Next
    For Each fln As String In e.Files(key)
……正常接收

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106063 积分:539408 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/21 8:57:00 [显示全部帖子]

如果新文件和旧文件重名,保存时肯定会覆盖掉旧的文件

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106063 积分:539408 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/21 10:19:00 [显示全部帖子]

If key = "up1" Then
    Dim lst As List(of String) = dr.Lines("图片一")
    For Each fln As String In e.Files(key)
        e.SaveFile(key,fln,"D:\web\img\" & fln) 
        lst.Add(n)
    Next
    dr.Lines("图片一") = lst
End If

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106063 积分:539408 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/21 10:41:00 [显示全部帖子]

lst.Add(fln)

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106063 积分:539408 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/21 11:16:00 [显示全部帖子]

另外使用一个集合存储上传的图片。然后遍历源单元格的集合,判断不在上传的图片中的就删除掉

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106063 积分:539408 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/8/21 13:37:00 [显示全部帖子]

搞错了,参考:http://www.foxtable.com/mobilehelp/topics/0094.htm


 回到顶部
总数 17 1 2 下一页