以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]根据用户名判断文件夹  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=173706)

--  作者:工匠
--  发布时间:2021/12/13 0:06:00
--  [求助]根据用户名判断文件夹
老师好:
请教一下,根据用户名判断复制文件目录
Dim name As String = User.Name

msgbox(Name)


FileSys.CopyDirectory (ProjectPath & "Attachments", "\\\\192.168.3.1\\shuju\\用户报表\\YH03",True)  \'  写固定用户文件夹可以执行复制内容


FileSys.CopyDirectory (ProjectPath & "Attachments", "\\\\192.168.3.1\\shuju\\用户报表\\ & name & ",True)  \'  合并变量当前用户未执行复制内容  

如何拼接当前用户名(对应的用户名文件夹名),才能实现复制

谢谢!

--  作者:有点蓝
--  发布时间:2021/12/13 8:37:00
--  
FileSys.CopyDirectory (ProjectPath & "Attachments", "\\\\192.168.3.1\\shuju\\用户报表\\" & name,True)