以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助 文件监视器  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=86985)

--  作者:youwei_dong
--  发布时间:2016/6/30 9:09:00
--  求助 文件监视器

 

Dim r As Row = Tables("bflb").Current
r("wjm") = r("jssj") & ".jpg"
FileSys.CopyFile(e.FullPath , ProjectPath & "DVR\\" & r("wjm"),True)

 

 

 

 

 

错误提示

 

.NET Framework 版本:2.0.50727.8689
Foxtable 版本:2016.6.16.1
错误所在事件:文件监视器,FileCreated
详细错误信息:
不支持给定路径的格式。


--  作者:Hyphen
--  发布时间:2016/6/30 9:12:00
--  
msgbox(ProjectPath & "DVR\\" & r("wjm"))弹出看看
--  作者:youwei_dong
--  发布时间:2016/6/30 9:17:00
--  
弹出   C:\\Users\\youwei_dong\\Desktop\\新建文件夹\\管理项目1\\dvr\\0:00:00.jpg
--  作者:大红袍
--  发布时间:2016/6/30 9:25:00
--  

改成这样吧

 

FileSys.CopyFile(e.FullPath , ProjectPath & "DVR\\" & e.Name, True)


--  作者:youwei_dong
--  发布时间:2016/6/30 9:37:00
--  

这样不报错了  但是也没有重命名文件啊

 


--  作者:大红袍
--  发布时间:2016/6/30 9:39:00
--  

 你要重命名为什么啊?

 

Dim r As Row = Tables("bflb").Current
r("wjm") = r("jssj").replace(":", "") & ".jpg"
FileSys.CopyFile(e.FullPath , ProjectPath & "DVR\\" & r("wjm"),True)


--  作者:youwei_dong
--  发布时间:2016/6/30 9:41:00
--  

因为 需要到一定时间后 在删除这个文件啊

 


--  作者:大红袍
--  发布时间:2016/6/30 9:41:00
--  
 看6楼。
--  作者:youwei_dong
--  发布时间:2016/6/30 9:43:00
--  
.NET Framework 版本:2.0.50727.8689
Foxtable 版本:2016.6.16.1
错误所在事件:文件监视器,FileCreated
详细错误信息:
未找到类型“Date”的公共成员“replace”。

--  作者:大红袍
--  发布时间:2016/6/30 9:44:00
--  

Dim r As Row = Tables("bflb").Current
r("wjm") = Format(r("jssj"), "yyyyMMddHHmmss") & ".jpg"
FileSys.CopyFile(e.FullPath , ProjectPath & "DVR\\" & r("wjm"),True)