以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  下面是窗口beforeclose的代码错误  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=57093)

--  作者:jinzhengbe
--  发布时间:2014/9/18 5:17:00
--  下面是窗口beforeclose的代码错误


图片点击可在新窗口打开查看此主题相关图片如下:捕获.jpg
图片点击可在新窗口打开查看

 

下面是窗口beforeclose的代码 上面的错误显示是这个部分的 data属性错误

Dim d As String = Tables("商品").Current("bh1")

FileSys.CopyDirectory("D:\\as", "D:\\上盘\\publicbox\\222\\原图\\" & d & "\\" )
FileSys.CopyDirectory("D:\\shuiyin", "D:\\上盘\\publicbox\\222\\shuiyin\\" & d & "\\" )
FileSys.CopyDirectory("D:\\taobao", "D:\\上盘\\publicbox\\222\\淘宝" & d & "\\" )

 

 

请问该怎么修改?


--  作者:Bin
--  发布时间:2014/9/18 8:34:00
--  
FileSys.CopyDirectory("D:\\as", "D:\\上盘\\publicbox\\222\\原图\\" & d  )
FileSys.CopyDirectory("D:\\shuiyin", "D:\\上盘\\publicbox\\222\\shuiyin\\" & d )
FileSys.CopyDirectory("D:\\taobao", "D:\\上盘\\publicbox\\222\\淘宝" & d )

不行,说明你目录没读写权限.

--  作者:jinzhengbe
--  发布时间:2014/9/18 9:03:00
--  
奥 是真么回事啊, 谢谢了~~~~
--  作者:有点甜
--  发布时间:2014/9/18 9:08:00
--  
  弹出一下d看看,你的路径肯定有问题