以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 填写完整的文件路径 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=151546) |
||||
-- 作者:yfy13338431925 -- 发布时间:2020/6/27 15:39:00 -- 填写完整的文件路径 假定表中有两列,分别是身份证号码和照片,希望向照片列添加文件的时候,能自动根据照片存放的位置和身份证号码,向照片列填写完整的文件路径, 在将BeforeAttachFile事件代码中的 e.FileName = dr("身份证号码") & ".jpg" 该如何写? Dim dr As
DataRow = e.DataRow |
||||
-- 作者:有点蓝 -- 发布时间:2020/6/27 16:07:00 -- Dim dr As DataRow = e.DataRow If dr.IsNull("身份证号码") Then MessageBox.Show("请先输入身份证号码!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information) e.Cancel = True Else Dim dir As String = FileSys.GetParentPath(e.FileName) e.FileName = dir & "\\" & dr("身份证号码") & ".jpg" End If
|
||||
-- 作者:fytea -- 发布时间:2020/6/27 18:09:00 -- 蓝老师;结果不对啊,填充的结果是 \\照片号.pdf。盘符等路径信息没有 |
||||
-- 作者:yfy13338431925 -- 发布时间:2020/6/27 22:00:00 -- 我也试了,结果不是我想要的 |
||||
-- 作者:gudao123456 -- 发布时间:2020/6/27 22:14:00 -- to 1楼:图片文件名是:"身份证号码.jpg"吗?如果不是,你写上这个文件名是读不出来的,首先你在命名图片文件名时就必须把身份证号码写上。在图片列写文件名只是 把原来命名的文件明名写上来而已。 |
||||
-- 作者:yfy13338431925 -- 发布时间:2020/6/27 22:16:00 -- 是pdf,不是读取,是填写存放地址 |
||||
-- 作者:yfy13338431925 -- 发布时间:2020/6/28 0:49:00 --
|
||||
-- 作者:yfy13338431925 -- 发布时间:2020/6/28 8:50:00 -- 蓝老师,帮我看看啊 |
||||
-- 作者:有点蓝 -- 发布时间:2020/6/28 9:25:00 -- e.FileName = e.DataCol.DefaultFolder & "\\" & dr("照片号") & ".jpg" |
||||
-- 作者:yfy13338431925 -- 发布时间:2020/6/28 20:28:00 -- 老师,还是报错。结果也不对 |