| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 图片批量添加到表,怎么做? (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=48436) |
| -- 作者：永不言弃 -- 发布时间：2014/3/28 16:21:00 -- 图片批量添加到表,怎么做? 产品图片编号已经都修改好了(产品编号为 13-122232-5,,图片列就为13-122232-5.BMP).现在上万上图片怎么添加到表A ,自动添加表A产品编号列和图片列(我的图片文件夹放在,E:\\管理项目1\\Attachments\\13年4月里面.怎么写代码.? |
| -- 作者：狐狸爸爸 -- 发布时间：2014/3/28 16:23:00 -- 命令窗口执行一遍：
for each dr as datarow in datatables(”xxx“).datarows dr("图片") = dr("编号") & ".bmp" next
|
| -- 作者：永不言弃 -- 发布时间：2014/3/28 16:27:00 -- 我的文件夹在里面一层,也可以读出来?读了没反应. [此贴子已经被作者于2014-3-28 16:28:58编辑过]
|
| -- 作者：狐狸爸爸 -- 发布时间：2014/3/28 16:28:00 -- 编号如何对应图片的路径和名称，你得有规律，有规律，才能写代码。 |
| -- 作者：永不言弃 -- 发布时间：2014/3/28 16:49:00 -- 那这样不是要先手工填好编号.然后自动添加图片.那要到什么时候. |
| -- 作者：狐狸爸爸 -- 发布时间：2014/3/28 16:54:00 -- dim pth as string = "E:\\管理项目1\\Attachments\\13年4月里面" For each file as string in Filesy.GetName(ph) dim dr as datarow = datatables("xxx").AddNew dr("文件") = file.subString(pth.Length) dim nm as string = filesys.getname(file) dr("编号") = nm.substring(0,nm.length -4) next |