Foxtable(狐表)用户栏目专家坐堂 → listview 如何读取外部数据源中的照片?


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

主题:listview 如何读取外部数据源中的照片?

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


加好友 发短信
等级:童狐 帖子:217 积分:1646 威望:0 精华:0 注册:2018/1/21 10:25:00
listview 如何读取外部数据源中的照片?  发帖心情 Post By:2019/6/13 12:05:00 [只看该作者]


Dim tr As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim nd As WinForm.TreeNode = tr.SelectedNode
Dim lv1 As WinForm.ListView = e.Form.Controls("ListView1")
lv1.StopRedraw() '暂停绘制
lv1.Rows.Clear() '清除原来的行
lv1.Images.Clear() '清除原来的图片
lv1.View = ViewMode.LargeIcon '显示模式为大图标
lv1.Images.LargeSize = New Size(65,75) '定义大图标尺寸

Dim drs As List ( of DataRow ) = DataTables("部门表").Select("[部门编码] = '" & nd.FullName & "'")
For Each dr As DataRow In drs '从数据表中提取数据
    Dim vr As  WinForm.ListViewRow =  lv1.Rows.Add() '增加一行
    Dim Key As String = dr("照片") '获取此员工的照片文件
    lv1.Images.AddLargeImage(Key, Key) '添加照片,直接用文件名作为图片键值
    vr.ImageKey = key
    vr.Tag = dr '建立和数据表中行的对应
    vr.name = dr("身份证号")  '设置标题
    vr.Text = dr("姓名")  '设置标题
    If dr("性别") = "女" Then '设置分组
        vr.text = vr.text & "(女)"
    End If
Next

上述 dr("照片") 是一个包含网络路径的字符串。
如果该字符串 = "张三.jpg",代码执行和显示没有任何问题。
如果该字符串是/员工档案/开发者/员工照片/张三.jpg,这是 一个网络数据源的路径,listview却显示不出来照片。
请问如何修改代码?
[此贴子已经被作者于2019/6/13 12:06:51编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2019/6/13 13:16:00 [只看该作者]

对应ftp的图片,你需要先下载到本地电脑,才能显示出来的。

 

http://www.foxtable.com/webhelp/scr/1410.htm

 


 回到顶部