以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]新建FTP文件夹  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=120382)
--  作者：purplebluesky
--  发布时间：2018/6/13 23:57:00
--  [求助]新建FTP文件夹
 请问下用代码实现远程FTP文件夹该如何写，动态建立文件夹名称和表A中的项目编号一样，谢谢！！

我在新增行里写了如下代码：

可以建立文件夹但是，不知道怎么让文件夹的名字和项目编号列中的选定行一样。。

Dim r As String
r = e.DataRow("项目编号")

If ftp1.DirExists("\\r") Then
    MessageBox.show("目录已经存在","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
   Else ftp1.makedir("\\r")
End If
--  作者：有点甜
--  发布时间：2018/6/14 0:04:00
--  

Dim r As String
r = e.DataRow("项目编号")

If ftp1.DirExists("/" & r) Then
    MessageBox.show("目录已经存在","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
Else

    ftp1.makedir("/" & r)
End If
--  作者：purplebluesky
--  发布时间：2018/6/14 10:04:00
--  
谢谢老师，搞定了！