- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]姓名与照片对应批量插入的问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=20775)
-- 发布时间：2012/6/19 14:26:00
-- [求助]姓名与照片对应批量插入的问题
首先把照片按名字排列好放在一个文件夹内，如“王余林.jpg”；
文件夹为：D:\\My Documents\\Foxtable\\工装证件照
在表内A列输入“王余林”，B列自动插入该照片。
B列属性设置扩展类型为：图片。
事件代码：
If e.DataCol.Name = "姓名" Then
For Each File As String In FileSys.GetFiles("D:\\My Documents\\Foxtable\\驾乘人员台账\\工装证件照")
Next
e.DataRow("照片") = e.DataRow("姓名") & ".jpg"
End If
这段代码不能完成我想要的效果，只能单独一个一个插入照片。因为人员很多，手动输入太麻烦！请高手帮帮忙！
-- 发布时间：2012/6/19 14:32:00
--
还有个补充：如果姓名完全相同，怎么办？附件里面有！
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:foxtable.rar |
比如张强，我们这里就有2个。
[此贴子已经被作者于2012-6-19 14:43:27编辑过]
-- 发布时间：2012/6/19 14:36:00
--
各位走过的，路过的，不要错过！帮帮忙！
-- 发布时间：2012/6/19 14:41:00
--
不要沉啊！！狐爸帮帮忙！！！！！
-- 发布时间：2012/6/19 14:49:00
--
看官们拉一把兄弟
-- 发布时间：2012/6/19 15:05:00
--
用身份证号码可避免姓名重复问题！
-- 发布时间：2012/6/19 15:32:00
--
1.相片宜改为备注列;
2.相片应放在主程序下的[Images]文件夹中:这样代码简洁点,且也直观在列中显示; If e.DataCol.Name = "姓名" Then
If e.DataRow.Isnull("姓名") = False Then
e.DataRow("照片") = e.DataRow("姓名") & ".jpg"
Else
e.DataRow("照片") = Nothing
End If
End If
3.既然人员很多,为规范管理,应另设人员ID表,以ID区分不同人员
[此贴子已经被作者于2012-6-19 15:35:10编辑过]
-- 发布时间：2012/6/19 15:56:00
--
感谢7楼高手的耐心解答！
6楼的兄弟也感谢你！
[此贴子已经被作者于2012-6-19 15:56:19编辑过]