主题：图片批量添加到表,怎么做?

产品图片编号已经都修改好了(产品编号为  13-122232-5,,图片列就为13-122232-5.BMP).现在上万上图片怎么添加到表A  ,自动添加表A产品编号列和图片列(我的图片文件夹放在,E:\管理项目1\Attachments\13年4月里面.怎么写代码.?

命令窗口执行一遍：

 

for each dr as datarow in datatables(”xxx“).datarows

    dr("图片") = dr("编号") & ".bmp"

next

 

 

 

我的文件夹在里面一层,也可以读出来?读了没反应.

编号如何对应图片的路径和名称，你得有规律，有规律，才能写代码。

那这样不是要先手工填好编号.然后自动添加图片.那要到什么时候.

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