| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]提示表达式不产生值 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=78909) |
| -- 作者：huhu -- 发布时间：2015/12/20 16:09:00 -- [求助]提示表达式不产生值 Dim sjwjj As String sjwjj = ftp.ChangeDir("/待用户现场确认版本_产线禁止使用/" & Format(Date.now,"yyyy")) \'进入到待用户现场确认版本_产线禁止使用\\年份目录 If ftp.DirExists(sjwjj) = False Then ftp.MakeDir(sjwjj) End If 提示表达式不产生值
|
| -- 作者：大红袍 -- 发布时间：2015/12/20 16:12:00 -- 直接写
ftp.ChangeDir("/待用户现场确认版本_产线禁止使用/" & Format(Date.now,"yyyy")) |
| -- 作者：huhu -- 发布时间：2015/12/20 16:16:00 -- 那就直接写吧。 本来是想根据年份自动创建年份目录。那就手动创建吧。
|
| -- 作者：大红袍 -- 发布时间：2015/12/20 16:18:00 -- Dim sjwjj As String = “待用户现场确认版本_产线禁止使用/" & Format(Date.now,"yyyy") If ftp.DirExists(sjwjj) = False Then ftp.MakeDir(sjwjj) End If |