表“资料管理”中，有两列，一列名为“单号”，单号下有1001、1002、1003等行，一列名为“资料档”，是FTP资料管理，怎样自动以每一个单号为名自动建一个FTP档案夹来管理资料？

参考：

http://www.foxtable.com/help/topics/1410.htm

Dim ftp1 As new ftpclient
ftp1.host="128.169.143.96"
ftp1.Account = "foxuser"
ftp1.password = "136137138"
If ftp1.DirectoryExists("/data") = False Then \'如果不存在Data目录
    ftp1.MakeDir("/data") \'则创建Data目录
End If

其中的("/data")怎么改成表“资料管理”中列“单号”中的单号值行？

设置在这个表的DAtaColChanged事件中

If e.DataCol.Name = "单号" Then
    If e.NewValue > "" Then
        Dim ftp1 As new ftpclient
        ftp1.host="128.169.143.96"
        ftp1.Account = "foxuser"
        ftp1.password = "136137138"
        If ftp1.DirectoryExists("/" & e.NewValue & "\'") = False Then
            ftp1.MakeDir("/" & e.NewValue & "\'")
        End If
   End If
End If

你要按顺序看帮助才行，最后从《使用指南》的第一节开始看，使用熟悉了，再按顺序看《开发指南》。

开发软件和使用软件不同，开发需要系统地学习，因为各个知识点不是独立的，是相互关联的。

例如打开"/data"目录:

Dim ftp1 As new ftpclient
ftp1.host="128.169.143.96"
ftp1.Account = "foxuser"
ftp1.password = "136137138"
ftp1.OpenManager("/data") 

通过点击打开FTP文件管理，但怎样在点击的时候得到列“单号”的值来赋予OpenManager来进行打开？

        Dim ftp1 As new ftpclient
        Dim dr As e.DataCol = e.DataCol
        dr = e.DataCol(单号)
        ftp1.host="128.169.143.96"
        ftp1.Account = "oxuser"
        ftp1.password = "136137138"
        If ftp1.DirectoryExists("/" & dr & " ")= True Then
        ftp1.OpenManager("/" & dr & " ")
        End If

应该怎样修改？

你可以将这个按钮的代码设置为：

Dim ftp1 As new ftpclient
Dim r As Row = Tables("表名").Current
ftp1.host="128.169.143.96"
ftp1.Account = "oxuser"
ftp1.password = "136137138"
If ftp1.DirectoryExists("/" & r("单号"))= False Then
   ftp1.OpenManager("/" & r("单号"))
End If

还是先按顺序看帮助吧，你这样花费的时间会是别人的很多倍，最后可能还不一定掌握得了。