以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  批量插入图片怎么弄呢?  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=89762)

--  作者:戴森宇
--  发布时间:2016/8/29 15:32:00
--  批量插入图片怎么弄呢?

看了论坛里面一些帖子,设置了表达式列,图片名称+\'jpg"

然后把图片放在IMAGES下,可是没有任何反应


--  作者:大红袍
--  发布时间:2016/8/29 15:38:00
--  

 Dim dlg As new OpenFileDialog
dlg.MultiSelect = True
If dlg.ShowDialog = DialogResult.OK Then
    Dim t As Table = Tables("表A")
    Dim path As String = t.cols("第十列").DataCol.DefaultFolder
    If path = Nothing Then path = ProjectPath & "attachment"
    For Each f As String In dlg.FileNames
        FileSys.CopyFile(f, path & FileSys.GetName(f), True)
        Dim nr As Row = t.addnew
        nr("第十列") = FileSys.GetName(f)
    Next
End If


--  作者:戴森宇
--  发布时间:2016/8/29 15:59:00
--  
可以不用写代码的形式嘛?
--  作者:大红袍
--  发布时间:2016/8/29 16:06:00
--  

做一个按钮,然后执行,即可。

 

或者你用具体实例说明你要做什么