以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]怎么把截取的图片自动保存到数据表中的图片扩展列里面？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=133594)
--  作者：yjm789000
--  发布时间：2019/4/17 0:21:00
--  [求助]怎么把截取的图片自动保存到数据表中的图片扩展列里面？
Dim proc As new Process
proc.File = ApplicationPath & "capture.exe"
proc.WaitForClose = True
proc.Start
If ClipBoard.GetImage IsNot Nothing Then
    ClipBoard.GetImage.save("d:\\test.jpg")
    msgbox("保存到了d盘")
End If

怎么把截取的图片自动保存到数据表中的图片扩展列里面？
--  作者：有点甜
--  发布时间：2019/4/17 10:16:00
--  

参考

 

Dim proc As new Process
proc.File = ApplicationPath & "capture.exe"
proc.WaitForClose = True
proc.Start
If ClipBoard.GetImage IsNot Nothing Then
    Dim r As Row = Tables("表A").current
    ClipBoard.GetImage.save(ProjectPath & "attachments/" & r("_Identify") & ".jpg")
    r("第三列") =  r("_Identify") & ".jpg"
    msgbox("ok")
End If