专家坐堂-[求助]为啥没有创建目录呢？Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]为啥没有创建目录呢？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=65156)

--  作者：liujywwy
--  发布时间：2015/3/10 15:00:00
--  [求助]为啥没有创建目录呢？

Dim ftp As new FTPClient
ftp.Host = "192..168.1.35"
ftp.Account = "tester"
ftp.Password = "tester"

ftp.ChangeDir("\\待用户现场确认版本_产线禁止使用\\2015") \'进入到待用户现场确认版本_产线禁止使用\\2015目录
Dim lj As String = "\\待用户现场确认版本_产线禁止使用\\2015\\" & Tables("临时版本跟踪表").current("临时版本编号") & "(" & Tables("临时版本跟踪表").current("客户") & "_" & Tables("临时版本跟踪表").current("博达机型") & ")"
If ftp.DirExists(lj) = False Then
ftp.MakeDir(lj)
End If

--  作者：Bin
--  发布时间：2015/3/10 15:03:00
--
不报错,也没有创建目录? 你弹出一下LJ看看

--  作者：有点甜
--  发布时间：2015/3/10 15:03:00
--

你的路径有问题，msgbox(lj) 看一下

--  作者：liujywwy
--  发布时间：2015/3/10 15:10:00
--

此主题相关图片如下：lj.png

--  作者：有点甜
--  发布时间：2015/3/10 15:14:00
--

前面的路径肯定有问题，路径必须是从最开始的根路径开始的。

不然你就把ftp账号密码发上来测试

--  作者：liujywwy
--  发布时间：2015/3/10 15:27:00
--

设置了根目录，账号密码都有

此主题相关图片如下：扩展.png

--  作者：有点甜
--  发布时间：2015/3/10 15:29:00
--
你的根目录明显是 route_bin 啊，要一起写进去啊

--  作者：liujywwy
--  发布时间：2015/3/10 15:31:00
--
我很早就试过了，一起写进去，也没创建目录。
ftp.ChangeDir("\\route_bin\\待用户现场确认版本_产线禁止使用\\2015") \'进入到待用户现场确认版本_产线禁止使用\\2015目录
Dim lj As String = "\\route_bin\\待用户现场确认版本_产线禁止使用\\2015\\" & Tables("临时版本跟踪表").current("临时版本编号") & "(" & Tables("临时版本跟踪表").current("客户") & "_" & Tables("临时版本跟踪表").current("博达机型") & ")"
If ftp.DirExists(lj) = False Then
ftp.MakeDir(lj)
End If

--  作者：有点甜
--  发布时间：2015/3/10 15:32:00
--
不可能。那你一级一级的创建看看，先不要写那么长的代码啊。

--  作者：liujywwy
--  发布时间：2015/3/10 15:41:00
--
Dim lj As String = "\\route_bin\\待用户现场确认版本_产线禁止使用\\2015\\" & Tables("临时版本跟踪表").current("临时版本编号")
创建一个临时版本编号的目录都没创建成功。
哪里的问题呢？