以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]发布后文件升级包的文件代码如何写  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=109646)

--  作者:ymjr2011
--  发布时间:2017/11/16 10:31:00
--  [求助]发布后文件升级包的文件代码如何写
如果将发布后的文件升级包放在192.168.1.11\\xsserver 这个文件夹下,用代码应该怎么写?(不是在这里设置)

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20171116102818.png
图片点击可在新窗口打开查看


--  作者:ymjr2011
--  发布时间:2017/11/16 10:44:00
--  
我的目的就是想从文件监视器中的 filecreated事件中,监测到有新的文件就复制到这个地址的文件夹下
--  作者:有点甜
--  发布时间:2017/11/16 10:58:00
--  

 

发布那里设置,固定生成在某一个路径,在做一个按钮或者定时器,检测路径下是否有文件,如果有文件,就拷贝过去呗。

 

你也可以自己打包,打包很简单,参考 http://www.foxtable.com/webhelp/scr/2075.htm

 


--  作者:ymjr2011
--  发布时间:2017/11/16 11:08:00
--  
我的目的就是想从文件监视器中的 filecreated事件中,监测到有新的文件就复制到这个地址的文件夹下(关于升级包只是举例,就是想复制某目录下的一个文件到以下地址的共享文件夹下去)
FileSys.CopyFile(e.FullPath , "192.168.1.266\\server\\" & e.Name)

以上不成功!

--  作者:有点甜
--  发布时间:2017/11/16 11:31:00
--  

代码这样写

 

FileSys.CopyFile(e.FullPath , "\\\\192.168.1.266\\server\\" & e.Name)

 

执行后报什么错?


--  作者:ymjr2011
--  发布时间:2017/11/16 11:53:00
--  
以下是引用有点甜在2017/11/16 11:31:00的发言:

代码这样写

 

FileSys.CopyFile(e.FullPath , "\\\\192.168.1.266\\server\\" & e.Name)

 

执行后报什么错?


没反应,也没复制过去


--  作者:有点甜
--  发布时间:2017/11/16 12:38:00
--  

执行这个有什么问题?

 

Dim proc As new Process
proc.File = "\\\\192.168.1.266\\server\\"
proc.start


--  作者:ymjr2011
--  发布时间:2017/11/16 14:12:00
--  
没问题,可以直接打开


--  作者:有点甜
--  发布时间:2017/11/16 15:15:00
--  

弹出值

 

msgbox(e.FullPath )

msgbox("\\\\192.168.1.266\\server\\" & e.Name)

FileSys.CopyFile(e.FullPath , "\\\\192.168.1.266\\server\\" & e.Name)


--  作者:ymjr2011
--  发布时间:2017/11/16 15:56:00
--  
好了,改成FTP方式 了,以上还是不行
[此贴子已经被作者于2017/11/16 15:57:05编辑过]