主题：[原创]如何批量添加带图片的商品？有思路求代码

这个真的不好办，要不另外做个按钮，一次选择多个文件。

Dim dlg As New OpenFileDialog
dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.OK Then
    For Each fl As String In dlg.FileNames
        Dim dr As DataRow = DataTables("表A").AddNew()
        dr("文件") = filesys.GetName(fl)
    Next
End If