以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]如何更改图片保存路径  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=46093)
--  作者：hrw68529
--  发布时间：2014/2/17 10:09:00
--  [求助]如何更改图片保存路径
利用文件监视器来存储图片，以下程序如何修改：

Dim r As Row = Tables("员工").Current
r("照片") = r("工号") & ".jpg"
FileSys.CopyFile(e.FullPath, ProjectPath & "Attachments\\" & r("照片"),True)

如何将带红的一段更改为共享文件中的一个文件夹。例如改为：

FileSys.CopyFile(e.FullPath, ProjectPath & "C:\\Documents and Settings\\All Users\\Documents\\影印文件夹\\" & CurrentTable.Current("收文编号") & "_" & Index & ".jpg",True)
--  作者：Bin
--  发布时间：2014/2/17 10:12:00
--  
如果要指定路径,就不要拼接ProjectPath了

FileSys.CopyFile(e.FullPath, "C:\\Documents and Settings\\All Users\\Documents\\影印文件夹\\" & CurrentTable.Current("收文编号") & "_" & Index & ".jpg",True)