Foxtable(狐表)用户栏目专家坐堂 → 批量保存照片


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

主题:批量保存照片

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


加好友 发短信
等级:一尾狐 帖子:465 积分:3216 威望:0 精华:0 注册:2017/4/18 1:15:00
  发帖心情 Post By:2017/7/14 23:43:00 [只看该作者]

经过测试出现以下问题:

(1)如果第二次单击保存按钮时便会把照片名字完全相同的照片又保存一遍的,能把名字完全相同的照片只能保存一次吗?

(2)还有一个问题就是: 假如照片名称和表中的客户名里都有两个文件“王力、王力勇”他会将照片存放在表中客户名叫王力中两张照片的,应该是表中客户名要存放照片名称前部分完全一致的

(3)再一个问题是把程序关闭后重行启动程序后照片不显示,选择打开提示文件不存在,必须重新设置才显示照片。

 

[此贴子已经被作者于2017/7/15 8:04:53编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  12楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105493 积分:536456 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/15 8:34:00 [只看该作者]

图片文件名称是怎么样的?截图看看

 回到顶部
帅哥哟,离线,有人找我吗?
裴保民
  13楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:八尾狐 帖子:1989 积分:12631 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2017/7/15 8:53:00 [只看该作者]

作品名:以客户名+手持身份证或者经营场所等等一个客户可能有很多照片,但命名是有规律的都是表中客户名做前缀+照片性质为命名的

 回到顶部
帅哥,在线噢!
有点蓝
  14楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105493 积分:536456 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/15 8:59:00 [只看该作者]

我要看实际数据,麻烦截图说明

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


加好友 发短信
等级:一尾狐 帖子:465 积分:3216 威望:0 精华:0 注册:2017/4/18 1:15:00
  发帖心情 Post By:2017/7/15 12:11:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:123.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:233.png
图片点击可在新窗口打开查看

 回到顶部
帅哥,在线噢!
有点蓝
  16楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105493 积分:536456 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/15 14:07:00 [只看该作者]

姓名和其它内容就不能价格空格或者其它符号隔开么。

除了“手持身份证”、“经营场所”、“收银台”、“营业执照”之外还会有其它类型的字符吗。如果其它内容不固定,没有办法取人名的。

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


加好友 发短信
等级:一尾狐 帖子:465 积分:3216 威望:0 精华:0 注册:2017/4/18 1:15:00
  发帖心情 Post By:2017/7/15 14:51:00 [只看该作者]

还有其他照片的,一个客户最多有十几张照片的。除了“手持身份证”、“经营场所”、“收银台”、“营业执照”之外可能还有“经营场所1” 、“经营场所2” “经营场所3 、“经营场所4”、“经营全景” 、“经营门头” 、“市场大门头” 、“商品”“租赁合同“ 、“授权书”等等照片。 所有照片的命名都是以客户姓名为前缀+其他字符命名的。没有其他字符。

应该怎么处理这个问题比较好?

 

[此贴子已经被作者于2017/7/15 15:01:13编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  18楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105493 积分:536456 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/15 15:10:00 [只看该作者]

客户姓名+分隔符+其他字符,如:张三-手持身份证,就算是空格都可以:张三 手持身份证

不然没有办法判断正确的名称的。

你要遍历所有的其它字符,然后去掉。如果出现一个新的其它字符又要改代码

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


加好友 发短信
等级:一尾狐 帖子:465 积分:3216 威望:0 精华:0 注册:2017/4/18 1:15:00
  发帖心情 Post By:2017/7/15 15:15:00 [只看该作者]

那就是在客户名和其他字符之间都一个固定字符吗?可以加一个“的”呀。加完以后怎么处理呢?

 回到顶部
帅哥,在线噢!
有点蓝
  20楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105493 积分:536456 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/7/15 15:21:00 [只看该作者]

你要保证的字不会出现在人名或者其它字符中才行

......
For Each file As String In FileSys.GetFiles(dlg.SelectedPath)
            Dim name As String = FileSys.GetName(file)
            Dim n2() As String = name.Split("的")
            If n2(0) = dr("第一列") Then
                FileSys.CopyFile(file, ProjectPath & "图片/" & name, True)
                If dr.IsNull("第二列")
                    dr("第二列") = name
                Else
                    dr("第二列") &= vbcrlf & name
                End If
            End If
        Next
......

 回到顶部
总数 52 上一页 1 2 3 4 5 6 下一页